Вверх ↑
Разработчик
Ответов: 26149
Рейтинг: 2127
#1: 2015-08-01 15:44:03 ЛС | профиль | цитата
г. Mr. Braun писал(а):
Жду ответа!

В этих контролах не предусмотрена автоматическая перерисовка дефолтного состояния при изменении шрифта. Можно заставить принудительно перерисовать дефолтное состояние отправив, к примеру, тот же Caption

Add(MainForm,2953706,259,126)
{
}
Add(ButtonRush,6130926,259,189)
{
Left=15
Top=60
Width=165
Height=20
Color=8421504
Font=[Calibri,10,1,0,204]
KeyPreview=1
Name="3334"
Hint="doFont"
ColorFrom=8421504
ColorTo=8421504
ColorText=12632256
BorderColor=12632256
GradientStyle=0
ColorFromOver=7105644
ColorToOver=7105644
ColorTextOver=16777215
BorderColorOver=12632256
ShadowOffsetOver=0
GradientStyleOver=0
ColorFromDown=8618883
ColorToDown=8618883
ColorTextDown=12632256
BorderColorDown=3684408
ShadowOffsetDown=0
GradientStyleDown=0
UpdateSpeed=1
Caption="Font"
Glyphs=[]
RoundWidth=2
RoundHeight=2
Point(doFont)
Point(doCaption)
link(onClick,9641742:doFont,[])
}
Add(Font,9641742,315,189)
{
Font=[Arial,10,0,0,204]
FontDialog=0
Point(FontName)
Point(FontStyle)
link(onFont,3451310:doEvent1,[])
}
Add(Hub,3451310,378,189)
{
link(onEvent1,1150260:doFont,[])
link(onEvent2,6423518:doFont,[(404,202)(404,230)(331,230)(331,258)])
}
Add(Font,6423518,343,252)
{
Font=[Arial,10,0,0,204]
Point(FontName)
link(onFont,2700519:doEvent1,[(382,258)(382,293)(137,293)(137,195)])
link(Name,9641742:FontName,[(363,241)(321,241)])
link(Style,9641742:FontStyle,[(370,236)(328,236)])
}
Add(Label,1150260,427,182)
{
Left=20
Top=15
Width=157
Height=42
Font=[Arial,20,0,0,204]
Caption="TEXT"
AutoSize=1
Alignment=2
Point(doFont)
}
Add(Hub,2700519,147,189)
{
link(onEvent1,6130926:doFont,[])
link(onEvent2,10510575:doData,[(179,202)(179,216)])
}
Add(DoData,10510575,189,210)
{
Data=String(Font)
link(onEventData,6130926:doCaption,[(228,216)(228,202)])
}

------------ Дoбавленo в 15.44:
Обнови компоненты Rush. Я добавил туда метод doUpdate. После установки шрифта необходимо вызвать этот метод.
карма: 22

0