Вверх ↑
Ответов: 416
Рейтинг: 57
#1: 2010-10-28 13:07:07 ЛС | профиль | цитата
Ostroga,

Add(MainForm,7179480,273,196)
{
}
Add(Label,16468967,273,147)
{
Left=35
Top=160
Width=245
Caption="Внесите данные для записи в файл"
}
Add(Edit,14761741,378,147)
{
Left=30
Top=185
Width=310
Height=30
Color=-16777201
Ctl3D=1
Text="Проверка"
}
Add(Button,6631041,329,203)
{
Left=230
Top=70
Height=40
Caption="Записать"
link(onClick,7746996:doConvert,[])
}
Add(FileStream,16606883,427,189)
{
FileName="C:\test.txt"
Mode=1
AutoCopy=0
Point(doCopyFromStream)
}
Add(Convertor,7746996,378,203)
{
Mode=12
link(onResult,16606883:doCopyFromStream,[])
link(Data,14761741:Text,[])
}




Add(MainForm,2953706,322,84)
{
Width=391
Height=148
}
Add(Hub,7734710,287,182)
{
OutCount=4
link(onEvent1,15109978:In,[])
link(onEvent2,2711550:In,[])
link(onEvent3,16131733:In,[])
link(onEvent4,15670861:In,[])
}
Add(FileStream,5843333,742,154)
{
FileName="D:\test.txt"
Mode=2
Point(doPosition)
Point(doCopyFromStream)
}
Add(DoData,5961953,749,203)
{
link(onEventData,5843333:doPosition,[(793,209)(793,191)(730,191)(730,174)])
link(Data,5843333:Size,[])
}
Add(Convertor,7988050,588,175)
{
Mode=12
link(onResult,5843333:doCopyFromStream,[])
link(Data,11908867:Text,[])
}
Add(LineBreak,1686866,637,154)
{
Caption="Open"
link(Out,5843333:doOpen,[])
Primary=[15109978,-322,28]
}
Add(LineBreak,10782422,686,161)
{
Caption="Close"
link(Out,5843333:doClose,[])
Primary=[15670861,-217,42]
}
Add(LineBreak,5296098,686,203)
{
Caption="Position"
link(Out,5961953:doData,[])
Primary=[2711550,-329,-14]
}
Add(LineBreak,797390,518,175)
{
Caption="Convert"
link(Out,7988050:doConvert,[])
Primary=[16131733,-105,21]
}
Add(Button,14622955,231,182)
{
Left=10
Top=15
Width=70
Caption="Добавить"
link(onClick,7734710:doEvent1,[])
}
Add(Edit,11908867,588,126)
{
Left=90
Top=15
Width=285
Text="Данные для добавления в файл"
}


карма: 0

0