Make(delphi)
ver(4.05 build 186)
Add(MainForm,3627141,308,308)
{
Width=403
Height=324
Caption=" Menu"
link(onCreate,4404277:doTimer,[(362,328)(362,475)])
}
Add(Menu,126380,196,315)
{
Menu=#9:Программа|1:(|4:Exit|1:)|8:СОМ-ПОРТ|1:(|5:Номер|1:(|1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|2:10|2:11|2:12|2:13|2:14|2:15|2:16|2:17|2:18|2:19|2:20|1:)|8:Скорость|1:(|3:300|3:600|4:1200|4:2400|4:4800|4:9600|5:14400|5:19200|5:38400|5:57600|6:115200|1:)|
Point(onSelectNum)
link(onSelectNum,2345105:doEvent,[])
}
Add(IndexToChanel,2345105,245,322)
{
Count=36
link(onEvent2,3627141:doClose,[])
link(onEvent5,9397911:doWork1,[])
link(onEvent6,9397911:doWork2,[])
link(onEvent7,9397911:doWork3,[])
link(onEvent8,9397911:doWork4,[])
link(onEvent9,9397911:doWork5,[])
link(onEvent10,9397911:doWork6,[])
link(onEvent11,9397911:doWork7,[])
link(onEvent12,9397911:doWork8,[])
link(onEvent13,9397911:doWork9,[])
link(onEvent14,9397911:doWork10,[])
link(onEvent15,9397911:doWork11,[])
link(onEvent16,9397911:doWork12,[])
link(onEvent17,9397911:doWork13,[])
link(onEvent18,9397911:doWork14,[])
link(onEvent19,9397911:doWork15,[])
link(onEvent20,9397911:doWork16,[])
link(onEvent21,9397911:doWork17,[])
link(onEvent22,9397911:doWork18,[])
link(onEvent23,9397911:doWork19,[])
link(onEvent24,9397911:doWork20,[])
link(onEvent26,5044480:doWork1,[])
link(onEvent27,5044480:doWork2,[])
link(onEvent28,5044480:doWork3,[])
link(onEvent29,5044480:doWork4,[])
link(onEvent30,5044480:doWork5,[])
link(onEvent31,5044480:doWork6,[])
link(onEvent32,5044480:doWork7,[])
link(onEvent33,5044480:doWork8,[])
link(onEvent34,5044480:doWork9,[])
link(onEvent35,5044480:doWork10,[])
link(onEvent36,5044480:doWork11,[])
}
Add(If_else,2513173,581,448)
{
Type=5
Op2=String()
}
Add(ComboBox,7690426,560,371)
{
Left=10
Top=264
Width=75
Height=21
Color=15780518
Font=[MS Sans Serif,8,1,0,1]
Visible=1
WinStyle=4
Strings=#3:300|3:600|4:1200|4:2400|4:4800|4:9600|5:14400|5:19200|5:38400|5:57600|6:115200|
Text="19200"
Point(doSelect)
Point(EditText)
Point(onSelect)
link(onSelect,15276317:doText,[])
}
Add(ComboBox,8658105,427,308)
{
Left=35
Top=238
Width=50
Height=21
Color=15780518
Font=[MS Sans Serif,8,1,0,1]
Visible=1
WinStyle=4
Strings=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|2:10|2:11|2:12|2:13|2:14|2:15|2:16|2:17|2:18|2:19|2:20|
Text=""
DataType=1
DropDownCount=15
Point(doSelect)
Point(onSelect)
Point(EditText)
link(onSelect,15694920:doText,[])
}
Add(COM,6263210,518,441)
{
BaudRate=15
link(onRead,2513173:doCompare,[])
link(Port,8658105:EditText,[(524,401)(447,401)])
link(BaudRate,7690426:EditText,[(531,432)(580,432)])
}
Add(Timer,4404277,413,469)
{
Interval=32
link(onTimer,13091773:doData,[])
}
Add(DoData,13091773,462,469)
{
Data=Integer(30)
link(onEventData,6263210:doRead,[])
}
Add(ChanelToIndex,5044480,308,497)
{
Count=11
link(onIndex,7690426:doSelect,[(450,503)(450,419)])
}
Add(ChanelToIndex,9397911,308,350)
{
Count=20
link(onIndex,8658105:doSelect,[])
}
Add(Label,15694920,490,322)
{
Left=200
Top=19
Width=24
Height=24
Caption=""
link(Text,8658105:String,[(496,310)(468,310)(468,372)(440,372)])
}
Add(Label,15276317,616,385)
{
Left=295
Top=20
Width=79
Height=19
Caption=""
link(Text,7690426:String,[(622,373)(598,373)(598,435)(573,435)])
}
Add(Label,16302235,532,322)
{
Left=123
Top=19
Width=64
Height=17
Caption="сом-порт №"
Alignment=2
}
Add(Label,14437045,665,385)
{
Left=235
Top=20
Width=52
Height=17
Caption="Скорость"
}
Редактировалось 1 раз(а), последний 2019-01-17 05:26:50