Squeak - 如何移动一个圆圈？

Question

在Squeak Smalltalk环境中，我试图学习Morphic。有许多Morphic类，我无法确定用于当前应用程序的最合适的一个，并且我更倾向于不发明此时已存在的任何内容。链接到相关的代码/信息将不胜感激。虽然Pharo可能会更好，但我被Squeak atm卡住了。

我的问题是：
使用吱吱声和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。那里有很多很好的教程。