【问题标题】:Squeak - How do I move a circle?吱吱声 - 我如何移动一个圆圈?
【发布时间】:2009-06-29 14:17:05
【问题描述】:
在 Squeak Smalltalk 环境中,我正在尝试学习 Morphic。有很多很多 Morphic 类,我无法确定最适合用于我当前应用程序的类,并且我不想发明目前已经存在的任何东西。相关代码/信息的链接将不胜感激。虽然 Pharo 可能会更好,但我还是被 Squeak atm 卡住了。
我的问题是:
使用 Squeak 和 Morphic,我如何创建某种画布,将其放入可移动、可滚动、可调整大小的窗口中,将其显示在桌面上,将 circleMorph 拖放到该画布上,并允许用户抓住圆圈并四处移动在画布上?
谢谢!
【问题讨论】:
标签:
smalltalk
pharo
squeak
morphic
【解决方案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 的文档部分。那里有很多很好的教程。