Вверх ↑
Ответов: 490
Рейтинг: 162
#1: 2022-09-23 19:08:00 ЛС | профиль | цитата
sla8a,спасибо, теперь не моргает , еще одна тонкость осталась на примере хорошо видно.
пример

Add(MainForm,2953706,98,126)
{
Width=398
Height=160
Color=16777215
}
Add(LedNumberEx,8135338,210,126)
{
Left=180
Top=45
Width=150
Height=30
Name="V"
Text="00.000"
ShowLines=0
DotSize=50
FonColor=-16777201
SegColor=16711680
NoSegColor=15000804
SegHover=16711680
NoSegHover=12632256
Point(doText)
}
Add(Label,12068493,259,126)
{
Left=325
Top=54
Width=17
Height=28
Font=[Arial,16,1,16711680,204]
Caption="V"
}
Add(ChildForm,13781660,217,189)
{
}
BEGIN_SDK
Add(EditMulti,9505279,21,21)
{
Width=461
Height=277
}
Add(MainForm,14754099,77,119)
{
Left=35
Top=105
Width=362
Height=171
Color=16777215
}
Add(Label,15858110,147,126)
{
Left=65
Top=55
Width=196
Height=17
Font=[MS Sans Serif,12,0,0,1]
Transparent=0
Caption="включена прозрачность"
}
Add(VisualShape,2255569,294,126)
{
Left=310
Top=80
Width=10
Height=25
PColor=255
PWidth=2
ShapeType=2
Transparent=0
}
Add(LedNumberEx,854376,196,126)
{
Left=185
Top=45
Width=130
Height=30
Name="V"
Text="00.000"
ShowLines=0
DotSize=50
FonColor=-16777201
SegColor=16711680
NoSegColor=15000804
SegHover=16711680
NoSegHover=12632256
Point(doText)
}
Add(Label,14495243,245,126)
{
Left=310
Top=54
Width=17
Height=28
Font=[Arial,16,1,16711680,204]
Caption="V"
}
END_SDK
Add(Label,12949701,161,126)
{
Left=35
Top=50
Width=200
Height=24
Font=[MS Sans Serif,12,0,0,1]
Caption="выключена прозрачность"
}

Что интересно в FPC работает правильно...
Еще одна особенность Label если включена прозрачность и Visible - False, элемент все равно виден что-то с этой прозрачностью не то , в разных компиляторах ведёт себя элемент непонятно, может не трогать её , а пойти другим путём...
карма: 4

0
Редактировалось 3 раз(а), последний 2022-09-23 19:46:49