Squeak - ¿Cómo puedo mover un círculo?

Question

En el entorno Squeak Smalltalk, yo estoy tratando de aprender mórfica. Hay muchas, muchas clases Morphic y no pueden determinar la (s) más adecuado a utilizar para mi aplicación actual, y yo prefiero no inventar cualquier cosa que ya existe en este momento. Los enlaces a código / información relevante sería apreciada. Mientras Pharo podría ser más agradable, estoy atascado con atm Squeak.

Mi pregunta es:
El uso de Squeak y mórfica, ¿cómo creo una especie de lienzo, colocarlo en una ventana de tamaño variable móvil, desplazable, lo muestro en el escritorio, coloque un circleMorph en ese lienzo, y permitir al usuario agarrar el círculo y moverlo en el lienzo?

Gracias!

Answer 1

Abrir un espacio de trabajo y el tipo:

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

Esto creará un círculo en el escritorio que puede arrastrar y soltar. Explorar la clase CircleMorph a encontrar otras cosas que puede hacer. Además, echa un vistazo a la sección de documentación en www.squeak.org . Hay un montón de buenos tutoriales allí.