Регулирующие точки в Pharo Smalltalk

Question

Я новичок в Smalltalk, поэтому, пожалуйста, несите меня. Я просто пытаюсь сделать простой рисунок с помощью Morphs.

Теперь я могу создавать Круги и Линии, но у меня возникают проблемы с настройкой начальной и конечной точки в моей рабочей области.

Если вы можете предложить любой совет, я очень благодарен!

man := Morph new. 
head := CircleMorph new color: Color blue. 
body := LineMorph new. 
man addMorph: head. 
man addMorph: body. 
man openInWindow. 

Answer 1

verticesAt:put: позволяет напрямую изменять точки в LineMorph:

line := LineMorph new. 
line verticesAt: 1 put: 0@0. 
line verticesAt: 2 put: 100@50. 

или использовать метод #vertices:color:borderWidth:borderColor: класса стороны:

LineMorph 
    vertices: (Array with: 0@0 with: 100@50) 
    color: Color transparent 
    borderWidth: 1 
    borderColor: Color black