Pharo4 Spec GUI:如何更改字体大小

时间:2015-09-29 12:51:36

标签: smalltalk specifications pharo

我正在考虑在Pharo中编写我的下一个项目。为此,我需要创建一个可以从更远的地方看到的状态监视器。 GUI非常简单。基本上只是几个标签和按钮。问题在于:我需要字体相当大 - 这样才能从更远的地方看到它。我怎样才能做到这一点?这是一些示例代码。我的两个标签需要改变字体格式:

initializeWidgets
  last1 := self newLabel.
  last1 label: '88,88'.

  last2 := self newLabel.
  last2 label: '99,99'.

非常感谢!!!

2 个答案:

答案 0 :(得分:3)

目前尚未得到很好的支持。您可以解决此问题重置 构建小部件时的字体:

|lm|
lm:=LabelModel new.
lm label:'Hello'.
lm whenBuiltDo: [ :w | w widget font: (LogicalFont familyName: 'Source Code Pro' pointSize: 30)].
lm openWithSpec.

答案 1 :(得分:0)

在ComposableModel的lm whenBuiltDo:方法中使用initializeWidgets时,我们没有像上面的建议那样获得LabelModel,而是使用MorphicLabelAdapter。那个人确实再次理解widget并返回LabelModel。所以上面的例子需要阅读:

... lm whenBuiltDo: [ :w | w widget widget font: (LogicalFont familyName: 'Source Code Pro' pointSize: 30)]. lm openWithSpec.