我正在探索Mac OS 5.2中的Squeak。
我在RectangleMorph'r'中绘制线(PolygonMorph)。当我翻译'r'时,线条会翻译,但是当我重新缩放'r'时,线条不会重新缩放。
运行下面的片段。然后使用Halo转换并调整矩形“ r”的大小。您会看到“ p”行已翻译但未缩放。
r := RectangleMorph new.
"[Pharo] r:= Morph.new."
r extent: 500@500.
r openInWindow.
p := PolygonMorph
vertices: {(r left)@(r top). (r right)@(r bottom)}
color: Color white borderWidth: 2 borderColor: Color white.
r addMorph: p.
Run Code Online (Sandbox Code Playgroud)
我怎样才能得到'p'重新缩放?
再见
我可以通过多种方式修改Squeak中Text的外观,但仍然找不到简单的方法来显式更改字体大小(以数字表示)。你知道怎么做吗?
这是我的片段:
text1 := Text string: 'Hello ' attribute: (TextColor color: Color red).
text2 := Text string: 'World!' attribute:TextEmphasis normal.
text2 addAttribute: (TextColor color: Color magenta).
text2 addAttribute: (TextFontChange font2).
text2 addAttribute: (TextEmphasis underlined).
text := text1, ' ', text2.
(text asMorph) openInWorld .
Run Code Online (Sandbox Code Playgroud) 它无法使笔在Morph中正常工作。
我到达下面的代码段,但是在移动笔后我不明白如何更新“变形”视图。我试图在各种(sm,pen,(sm所有者))对象中发送“已更改”,但无法解决。
如果我调整窗口大小,则会在下面的代码段中绘制线条。或者,如果我把“ openInWindow”作为最后一行。
sm := SketchMorph new.
sm clearExtent: 600@600 fillColor: (Color yellow) darker darker.
sm position: 100@100.
sm openInWindow.
pen := sm penOnMyForm.
pen defaultNib: 4; color: (Color red).
pen up.
pen goto: 10@10.
pen down.
pen goto: 100@100.
Run Code Online (Sandbox Code Playgroud) 我试图Transcript从自己的窗户上打开一个窗口,Workspace但找不到方法。
我TRID解决它自己Exploring的DockingBarMorph,但我没有成功。
我的问题是:
1]当我按“工具->脚本”时,执行的表达式是什么?
2]您能找到挖掘到DockingBarMorph中的信息吗?
3]如果我想在菜单中添加/修改条目,或者只是看到什么功能,该怎么办?
我希望 irb 默认不打印我的对象属性。那可能吗?例如,我有:
class Test
@tmp = nil
def initialize(str)
@tmp = str
self
end
end
Run Code Online (Sandbox Code Playgroud)
我得到:
irb> t = Test.new("hello")
=> #<Test:0x18f6198 @tmp="hello">
Run Code Online (Sandbox Code Playgroud)
我不想看到@tmp="hello"部分。