Вверх ↑
Разработчик
Ответов: 26170
Рейтинг: 2127
#1: 2009-07-03 15:34:43 ЛС | профиль | цитата
GanjaKyp писал(а):
если есть что то проще то я тоже с удовольствием посмотрю

Хитер бобер

На вот тебе в бинарный файл



Add(MainForm,9736489,259,322)
{
Width=717
Height=430
}
Add(Button,2390559,259,140)
{
Left=400
Top=365
Width=65
TabOrder=-1
Caption="Открыть"
link(onClick,12260279:doEvent1,[])
}
Add(Button,6355258,259,273)
{
Left=258
Top=365
Width=65
TabOrder=-1
Caption="Сохранить"
link(onClick,6308574:doEvent1,[])
}
Add(Memo,14309302,483,196)
{
Left=25
Top=50
Width=650
}
Add(Memo,5598948,483,315)
{
Left=25
Top=155
Width=650
}
Add(Memo,13053085,483,420)
{
Left=25
Top=265
Width=650
}
Add(StreamArray,6702358,665,210)
{
Streams=[]
FileName="Probe.bin"
}
Add(DoData,10720090,483,273)
{
link(onEventData,12372708:doConvert,[])
link(Data,14309302:Text,[])
}
Add(Convertor,12372708,539,273)
{
Mode=12
link(onResult,8693394:doWork2,[])
}
Add(ArrayRW,3024960,665,259)
{
link(onRead,6971494:doConvert,[])
link(Array,6702358:Array,[])
}
Add(Hub,6308574,308,273)
{
OutCount=4
link(onEvent1,10720090:doData,[])
link(onEvent2,15546089:doData,[(361,286)(361,384)])
link(onEvent3,2111271:doData,[(349,293)(349,489)])
link(onEvent4,6702358:doSave,[(337,300)(337,519)(640,519)(640,216)])
}
Add(DoData,15546089,483,378)
{
link(onEventData,6288866:doConvert,[])
link(Data,5598948:Text,[])
}
Add(Convertor,6288866,539,378)
{
Mode=12
link(onResult,420691:doWork2,[])
}
Add(HubEx,8693394,623,266)
{
link(onEvent,3024960:doAdd,[])
}
Add(DoData,2111271,483,483)
{
link(onEventData,12921795:doConvert,[])
link(Data,13053085:Text,[])
}
Add(Convertor,12921795,539,483)
{
Mode=12
link(onResult,420691:doWork3,[(627,489)])
}
Add(HubEx,420691,623,371)
{
Angle=3
link(onEvent,8693394:doWork3,[])
}
Add(Hub,12260279,308,140)
{
OutCount=4
link(onEvent1,6702358:doLoad,[(571,146)(571,223)])
link(onEvent2,16695951:doWork1,[])
link(onEvent3,16695951:doWork2,[])
link(onEvent4,16695951:doWork3,[])
}
Add(ChanelToIndex,16695951,350,147)
{
Count=3
link(onIndex,2405694:doValue,[])
}
Add(Memory,2405694,399,147)
{
link(onData,3024960:doRead,[(548,153)(548,265)])
}
Add(IndexToChanel,423579,399,217)
{
Count=3
Point(Index)
link(onEvent1,14309302:doText,[])
link(onEvent2,5598948:doText,[(457,230)(457,342)])
link(onEvent3,13053085:doText,[(448,237)(448,447)])
link(Index,2405694:Value,[])
}
Add(Convertor,6971494,721,259)
{
Mode=11
link(onResult,423579:doEvent,[(771,265)(771,133)(387,133)(387,223)])
}
Add(Button,4156387,259,203)
{
Left=328
Top=365
Width=65
TabOrder=-1
Caption="Очичтить"
link(onClick,6845802:doEvent1,[])
}
Add(Hub,6845802,308,203)
{
OutCount=3
link(onEvent1,14309302:doClear,[])
link(onEvent2,5598948:doClear,[(382,216)(382,328)])
link(onEvent3,13053085:doClear,[(375,223)(375,433)])
}


Там можно еще и зипы поставить на входе и выходе
карма: 22

0