Add(MainForm,16112679,175,84)
{
Width=391
Height=460
Point(onClose)
link(onCreate,11516863:doOpen,[])
link(onClose,11516863:doClose,[])
}
Add(Button,9912329,175,133)
{
Width=375
Height=40
Align=2
Caption="Получить днные"
link(onClick,5865439:doData,[])
}
Add(StreamConvertor,5814995,273,133)
{
Mode=3
link(onResult,11516863:doWrite,[(312,139)(312,118)])
}
Add(StreamConvertor,6062037,392,112)
{
Mode=7
link(onResult,6720437:doEvent1,[])
}
Add(DoData,5865439,224,133)
{
Data=String(4552001E8480001E84800001)
link(onEventData,5814995:doConvert,[])
}
Add(COMEX,11516863,329,98)
{
Port=2
BaudRate=19
link(onSyncRead,6062037:doConvert,[])
}
Add(MemoryStream,10924119,560,112)
{
Point(doPosition)
}
Add(Hub,6720437,448,112)
{
OutCount=4
link(onEvent1,10924119:doCopy,[])
link(onEvent2,3822863:doData,[(487,125)(487,132)])
link(onEvent3,13981960:doClear,[(480,132)(480,167)(599,167)(599,195)])
link(onEvent4,16026104:doFor,[(473,139)(473,188)])
}
Add(DoData,3822863,497,126)
{
Data=Integer(0)
link(onEventData,10924119:doPosition,[])
}
Add(DataToFileEx,2610789,560,182)
{
DataSize=2
BigEndian=0
link(onGet,13981960:doAdd,[])
link(Stream,10924119:Stream,[])
}
Add(For,16026104,490,182)
{
Step=2
link(onEvent,2610789:doGet,[])
link(onStop,10359056:doData,[(550,195)(550,244)])
link(End,10924119:Size,[(503,173)(573,173)])
}
Add(Memo,490568,693,238)
{
Top=40
Width=375
Height=381
Align=5
Font=[Lucida Console,12,0,0,204]
Antialiased=1
ScrollBars=3
}
Add(StrList,13981960,630,182)
{
}
Add(DoData,10359056,630,238)
{
link(onEventData,490568:doAdd,[])
link(Data,13981960:Text,[])
}
Ответов: 933
Рейтинг: 197
|
|||
Запусти и покажи что в Memo (лучше выложить)
|
|||
карма: 19 |
|