ΨΨΨ Smalltalk/ Squeak 教えろゴルァ ΨΨΨ
17 ：デフォルトの名無しさん：
フォントをちょっと大きくするコード。すこしは見やすくなると思います。
Workspaceなどにコピペ → マウスで選択 → メニューから"do it"または Alt + d して下さい。
| textStyle |
textStyle := TextConstants at: #DefaultTextStyle.
Preferences setSystemFontTo: (textStyle fontOfSize: 15).
Preferences setListFontTo: (textStyle fontOfSize: 15).
Preferences setMenuFontTo: (textStyle fontOfSize: 15).
Preferences setFlapsFontTo: (textStyle fontOfSize: 15).
他国語化キットからのパクリです。
Workspaceなどにコピペ → マウスで選択 → メニューから"do it"または Alt + d して下さい。
| textStyle |
textStyle := TextConstants at: #DefaultTextStyle.
Preferences setSystemFontTo: (textStyle fontOfSize: 15).
Preferences setListFontTo: (textStyle fontOfSize: 15).
Preferences setMenuFontTo: (textStyle fontOfSize: 15).
Preferences setFlapsFontTo: (textStyle fontOfSize: 15).
他国語化キットからのパクリです。
|
|
|