吱吱声 - 如何移动圆圈？

Question

在Squeak Smalltalk环境中，我正在尝试学习Morphic。有许多很多Morphic类，我无法确定最适合我当前应用程序的类，我不想发明任何已经存在的东西。相关代码/信息的链接将不胜感激。虽然Pharo可能更好，但我仍然坚持使用Squeak atm。

我的问题是：
使用Squeak和Morphic，如何创建某种画布，将其放入可移动，可滚动，可调整大小的窗口，在桌面上显示，将circleMorph放到该画布上，并允许用户抓住圆圈并移动它在画布上？

谢谢！

Answer 1

打开工作区并输入：

| window canvas circle |
window := SystemWindow new.
canvas := PasteUpMorph new.
window addMorphBack: canvas.
canvas bounds: window bounds.
circle := CircleMorph new.
canvas addMorphCentered: circle.
window openAsIs.

这将在桌面上创建一个可以拖放的圆圈。浏览CircleMorph类以查找您可以执行的其他操作。另外，请查看www.squeak.org处的文档部分。那里有很多很好的教程。