Вверх ↑
Ответов: 207
Рейтинг: 14
#1: 2020-05-21 18:02:00 ЛС | профиль | цитата
Rysik, Чем RE_Check не устроил?

Add(MainForm,2953706,133,126)
{
}
Add(RE_Check,1518977,280,245)
{
Point(Expression)
link(onMatch,5824562:doData,[])
link(onDismatch,9660562:doData,[])
link(Str,4796771:Text,[(286,205)(237,205)])
link(Expression,16432300:Result,[])
}
Add(Button,13180880,133,189)
{
Left=10
Top=15
link(onClick,3825079:doEvent1,[])
}
Add(RichEdit,12035139,434,245)
{
Left=5
Top=40
Width=375
Height=215
}
Add(MultiReplace,16432300,287,189)
{
ReplaceList="#=[1-9a-fA-F];\r\n^=[1-8];"
link(Text,5287939:Text,[])
}
Add(Edit,5287939,287,133)
{
Left=245
Top=15
Width=125
Text="##000000##000^00"
}
Add(Hub,3825079,182,189)
{
link(onEvent1,16432300:doMultiReplace,[])
link(onEvent2,1518977:doCheck,[(226,202)(226,251)])
}
Add(Edit,4796771,231,133)
{
Left=80
Top=15
Width=155
Text="1f0000002a000300"
}
Add(DoData,5824562,336,245)
{
Data=String(Да)
link(onEventData,14068057:doWork2,[])
}
Add(DoData,9660562,336,252)
{
Data=String(Нет)
link(onEventData,14068057:doWork3,[(389,258)])
}
Add(HubEx,14068057,385,245)
{
link(onEvent,12035139:doAdd,[])
}
карма: 2

0