Вверх ↑
Ответов: 806
Рейтинг: 174
#1: 2025-01-27 22:35:35 ЛС | профиль | цитата
z80 писал(а):
Может подскажете еще как реализовать поле ввода для айпи как на картинке?. т е как в виндовс. что бы можно было вводить только цифры и автоматом точки стояли через каждые три цифры

Можно воспользоваться вот этим компонентом
https://forum.hiasm.com/topic/65657
Или нарисовать самому

Add(MainForm,2953706,84,105)
{
}
Add(ChildPanel,13217504,161,105)
{
}
BEGIN_SDK
Add(EditMulti,5978035,21,21)
{
EventCount=1
WorkCount=1
VarCount=1
Width=395
Height=351
VOffset=273
HOffset=84
link(doWork1,16301099:doString,[])
link(Var1,16301099:FString,[])
}
Add(Panel,2771530,35,105)
{
Left=15
Top=20
Width=235
Height=24
}
Add(Edit,14375938,105,98)
{
Align=1
Font=[Lucida Console,12,1,0,204]
WinStyle=1
Text=""
Alignment=2
DataType=2
MaxLenField=3
ClearAfterEnter=1
link(onChange,11014327:doCompare,[])
}
Add(Label,5422496,35,28)
{
Left=112
Top=2
Width=1
Height=20
Align=1
Color=16777215
Font=[Lucida Console,12,1,0,204]
Caption="."
Alignment=2
}
Add(Edit,9313454,154,147)
{
Align=1
Font=[Lucida Console,12,1,0,204]
WinStyle=1
Text=""
Alignment=2
DataType=2
MaxLenField=3
ClearAfterEnter=1
link(onChange,6649673:doCompare,[])
}
Add(Label,9250038,84,28)
{
Left=217
Top=2
Width=1
Height=20
Align=1
Color=16777215
Font=[Lucida Console,12,1,0,204]
Caption="."
Alignment=2
}
Add(Edit,15584030,189,189)
{
Align=1
Font=[Lucida Console,12,1,0,204]
WinStyle=1
Text=""
Alignment=2
DataType=2
MaxLenField=3
ClearAfterEnter=1
link(onChange,9062153:doCompare,[])
}
Add(Label,5526906,126,28)
{
Left=322
Top=2
Width=5
Height=20
Align=1
Color=16777215
Font=[Lucida Console,12,1,0,204]
Caption="."
Alignment=2
}
Add(Edit,793270,231,238)
{
Align=1
Font=[Lucida Console,12,1,0,204]
WinStyle=1
Text=""
Alignment=2
DataType=2
MaxLenField=3
ClearAfterEnter=1
link(onChange,9400180:doCompare,[])
}
Add(If_else,9400180,280,238)
{
Type=2
Op2=Integer(255)
link(onTrue,7091017:doData,[])
}
Add(DoData,7091017,329,238)
{
link(onEventData,793270:doText2,[(375,244)(375,230)(221,230)(221,251)])
}
Add(If_else,9062153,238,189)
{
Type=2
Op2=Integer(255)
link(onTrue,1326251:doData,[])
}
Add(DoData,1326251,287,189)
{
link(onEventData,15584030:doText2,[(326,195)(326,181)(179,181)(179,202)])
}
Add(If_else,6649673,203,147)
{
Type=2
Op2=Integer(255)
link(onTrue,11310243:doData,[])
}
Add(DoData,11310243,252,147)
{
link(onEventData,9313454:doText2,[(291,153)(291,139)(144,139)(144,160)])
}
Add(If_else,11014327,154,98)
{
Type=2
Op2=Integer(255)
link(onTrue,7887810:doData,[])
}
Add(DoData,7887810,203,98)
{
link(onEventData,14375938:doText2,[(242,104)(242,90)(95,90)(95,111)])
}
Add(FormatStr,16301099,105,294)
{
DataCount=4
Mask="%1.%2.%3.%4"
Point(FString)
link(onFString,5978035:onEvent1,[])
link(Str1,14375938:Text,[])
link(Str2,9313454:Text,[(118,187)(160,187)])
link(Str3,15584030:Text,[(125,229)(195,229)])
link(Str4,793270:Text,[(132,278)(237,278)])
}
END_SDK

карма: 16

1
Голосовали:z80