Pharo Smalltalk настройка размеров шрифта, стилей и фона

Question

В основном у меня 2 проблемы, я пытаюсь написать простой графический интерфейс с помощью Pharo 4.0 Smalltalk. Я не могу изменить размер / стиль шрифта в pharo для моих ярлыков или текстовых областей / кнопки. Я также не могу изменить их цвет фона и ширину границы. Я перепробовал все способы:

font1 := (TextFontReference toFont: 
                (StrikeFont familyName: 'Atlanta' size: 22)).
TextMorph  new contents: ('test' asText addAttribute: font1); 
color: Color blue; 
autoFit: true; 
borderColor: Color green; 
borderWidth: 2.

SimpleButtonMorph new target: self;
label: 'test1';
actionSelector: #test1click; 
basicBorderColor: Color green; 
basicBorderWidth: 2; 
highlightColor: Color green.

TextMorph  new contents: 'test2'; 
color: Color blue; 
autoFit: true; 
borderColor: Color green; 
borderWidth: 2; 
font:'Atlanta' / fontName: 'Atlanta' pointSize: 22 / fontName: 'Arial' size: 32.

Ни один из вышеперечисленных вариантов не работает. в основном мне нужно настроить свои шрифты и фоны для кнопок и надписей. Как я должен идти об этом?

Answer 1

Что касается цветов фона и ширины границ, то все работает нормально, если вы добавите openInWorld,

SimpleButtonMorph new target: self;
label: 'test1';
actionSelector: #test1click; 
basicBorderColor: Color green; 
basicBorderWidth: 2; 
highlightColor: Color green;
openInWorld 

Answer 2

Цвет должен быть текстовым атрибутом (TextColor) в TextMorph, шрифт не является текстовым атрибутом (см. Классную часть Text). Атланта - это StrikeFont или TrueType? StrikeFonts - это старые растровые шрифты. Для некоторого простого кода, показывающего пользовательские цвета, шрифты и границы, вы можете загрузить CardsMorphic из браузера конфигурации