smalltalk - 在 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:允许您直接更改 a 中的点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