Вверх ↑
Разработчик
Ответов: 26324
Рейтинг: 2147
#1: 2012-06-26 20:21:21 ЛС | профиль | цитата
edd писал(а):
А то я уже не въезжаю, я сегодня тысячи вариантов перебрал...

Тю! Так, что ли Ничего не менял, кроме записи



Add(MainForm,4108664,161,140)
{
Width=1025
Height=907
BorderStyle=3
Position=1
}
Add(Memo,15917647,385,196)
{
Left=130
Top=225
Width=875
Height=195
ScrollBars=3
link(onChange,7957250:doEvent1,[])
}
Add(Button,14219835,210,140)
{
Left=10
Top=230
Width=100
Height=35
Caption="Открыть Фаил"
link(onClick,3689900:doExecute,[])
}
Add(ODialog,3689900,266,140)
{
link(onExecute,1246970:doOpen,[])
}
Add(FileStream,1246970,322,140)
{
Point(doPosition)
link(onLoad,10845221:doConvert,[(366,146)(366,184)(310,184)(310,223)])
}
Add(Button,4048424,406,462)
{
Left=10
Top=265
Width=100
Height=35
Caption="Speichern"
link(onClick,8319352:doExecute,[])
}
Add(SDialog,8319352,455,462)
{
link(onExecute,5362181:doEvent1,[])
}
Add(Stream2Hex,10845221,322,217)
{
link(onResult,15917647:doText,[])
link(Data,1246970:Stream,[])
}
Add(Stream2Hex,16753366,385,287)
{
Mode=3
link(onResult,2292302:doText,[])
link(Data,16065428:Var2,[])
}
Add(Memo,2292302,532,266)
{
Left=130
Top=430
Width=875
Height=195
ScrollBars=3
}
Add(MemoryStream,4979363,546,343)
{
Point(doSize)
}
Add(Stream2Hex,4165317,441,315)
{
Mode=1
link(onResult,4979363:doCopy,[(509,321)(509,349)])
link(Data,16065428:Var3,[(447,257)])
}
Add(GetDataEx,16065428,385,252)
{
link(Data,15917647:Text,[])
}
Add(Hub,7957250,434,196)
{
link(onEvent1,4165317:doConvert,[(460,202)(460,262)(429,262)(429,321)])
link(onEvent2,16753366:doConvert,[(511,209)(511,273)(373,273)(373,293)])
}
Add(FileStream,3685658,602,462)
{
Mode=1
Point(doCopyFromStream)
}
Add(DoData,12691313,546,490)
{
link(onEventData,3685658:doCopyFromStream,[(590,496)(590,482)])
link(Data,4979363:Stream,[])
}
Add(Hub,5362181,504,462)
{
OutCount=3
link(onEvent1,3685658:doOpen,[])
link(onEvent2,12691313:doData,[(532,475)(532,496)])
link(onEvent3,3685658:doClose,[(571,482)(571,475)])
}

карма: 22

0