Настройка точек в Pharo Smalltalk

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

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

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

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

smalltalk pharo squeak morphic
person William McCarty    schedule 08.05.2013    source источник

Ответы (1)


arrow_upward
2
arrow_downward

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
person camillobruni    schedule 08.05.2013
comment
Спасибо это именно то что я искал - person William McCarty; 08.05.2013