Add(GlobalVar,8594871,469,882)
{
 Name="1"
 Data=Integer(1)
}
Add(MainForm,2953706,21,105)
{
 Width=680
 Height=523
 Position=1
}
Add(ListBox,6998449,581,189)
{
 Left=20
 Top=190
 Width=610
 Height=265
 Font=[MS Sans Serif,12,1,0,1]
 Strings=#10:Строка 1 .|11:Строка 2 ..|12:Строка 3 ...|13:Строка 4 ....|
 Point(Index)
 Point(doSelect)
 Point(onSelect)
 Point(Handle)
 Point(PHandle)
}
Add(SendMessage,14145821,609,322)
{
 Message=13
 Point(Message)
 link(onSend,987624:doText,[])
 link(Handle,6490718:Var2,[])
 link(WParam,8551881:Var,[(622,283)(622,283)])
 link(Message,3945192:Var,[(636,299)(643,299)])
}
Add(GlobalVar,3945192,637,259)
{
 Name="LB_GETCOUNT: Integer = $18B;"
 Data=Integer(395)
}
Add(GlobalVar,8551881,616,238)
{
 Name="1"
 Data=Integer(1)
}
Add(Button,1406896,420,322)
{
 Left=25
 Top=20
 Width=130
 Caption="Количество Стр"
 link(onClick,11948046:doEvent1,[])
}
Add(Edit,987624,735,322)
{
 Left=160
 Top=20
 Width=100
}
Add(Hub,11948046,553,322)
{
 link(onEvent1,14145821:doSendMessage,[])
}
Add(SendMessage,4830632,546,658)
{
 Message=13
 Point(Message)
 link(onSend,16133515:doText,[])
 link(Handle,6490718:Var1,[(552,278)])
 link(WParam,11175836:Var,[(559,621)(552,621)])
 link(Message,9920424:Var,[(573,635)(580,635)])
}
Add(GlobalVar,9920424,574,595)
{
 Name="LB_SETCURSEL: Integer = $186;"
 Data=Integer(392)
}
Add(GlobalVar,11175836,546,567)
{
 Name="1"
 Data=Integer(1)
}
Add(Button,12995872,420,658)
{
 Left=25
 Top=70
 Width=130
 Caption="Выбранная Стр"
 link(onClick,3930054:doEvent1,[])
}
Add(Edit,16133515,672,658)
{
 Left=160
 Top=70
 Width=100
}
Add(Hub,3930054,490,658)
{
 link(onEvent1,4830632:doSendMessage,[])
}
Add(GetDataEx,1803166,609,259)
{
 link(Data,11171630:Var2,[])
}
Add(GetDataEx,6490718,609,273)
{
 link(Data,1803166:Var2,[])
}
Add(SendMessage,6927793,595,462)
{
 Message=13
 Point(Message)
 link(onSend,14013958:doText,[])
 link(Handle,1803166:Var1,[(601,264)])
 link(WParam,1038386:Var,[(608,423)(608,423)])
 link(Message,4230707:Var,[(622,439)(629,439)])
}
Add(GlobalVar,4230707,623,399)
{
 Name="LB_SELECTSTRING: Integer = $18C;"
 Data=Integer(390)
}
Add(GlobalVar,1038386,602,378)
{
 Name="2"
 Data=Integer(2)
}
Add(Button,12937074,420,462)
{
 Left=25
 Top=45
 Width=130
 Caption="Выбрать Стр"
 link(onClick,1211021:doEvent1,[])
}
Add(Edit,14013958,721,462)
{
 Left=160
 Top=45
 Width=100
}
Add(Hub,1211021,539,462)
{
 link(onEvent1,6927793:doSendMessage,[])
}
Add(SendMessage,11971428,462,1064)
{
 Message=13
 Point(Message)
 link(onSend,15087738:doEvent1,[])
 link(Handle,11171630:Var1,[(468,250)])
 link(WParam,8594871:Var,[])
 link(LParam,4569105:Memory,[(482,1038)(748,1038)])
 link(Message,14111385:Var,[])
}
Add(GlobalVar,14111385,483,973)
{
 Name="LB_GETTEXT: Integer = $189;"
 Data=Integer(393)
}
Add(Button,7299247,252,1057)
{
 Left=25
 Top=120
 Width=130
 Caption="Текс Стр"
 link(onClick,8662094:doEvent1,[])
}
Add(Edit,2203774,784,1071)
{
 Left=160
 Top=120
 Width=100
}
Add(Hub,8662094,315,1057)
{
 link(onEvent1,13475432:doEvent1,[(405,1063)(405,1007)])
 link(onEvent2,11971428:doSendMessage,[])
}
Add(GetDataEx,11171630,609,245)
{
 link(Data,5279890:Var2,[])
}
Add(SendMessage,5442742,539,805)
{
 Message=13
 Point(Message)
 link(onSend,7180028:doText,[])
 link(Handle,5279890:Var1,[(545,236)])
 link(WParam,5456717:Var,[(552,768)(545,768)])
 link(Message,5907470:Var,[(566,782)(573,782)])
}
Add(GlobalVar,5907470,567,742)
{
 Name="LB_GETTEXTLEN: Integer = $18A;"
 Data=Integer(394)
}
Add(GlobalVar,5456717,539,714)
{
 Name="3"
 Data=Integer(3)
}
Add(Button,6898713,420,805)
{
 Left=25
 Top=95
 Width=130
 Caption="Длинс Стр"
 link(onClick,2095071:doEvent1,[])
}
Add(Edit,7180028,665,805)
{
 Left=160
 Top=95
 Width=100
}
Add(Hub,2095071,483,805)
{
 link(onEvent1,5442742:doSendMessage,[])
}
Add(GetDataEx,5279890,609,231)
{
 link(Data,6998449:Handle,[])
}
Add(MemoryStream,4569105,728,987)
{
 Point(Memory)
 Point(doSize)
}
Add(DoData,10559745,665,1001)
{
 @Hint=#65:Должен быть установлен в размер, достаточный для помещения строки|15:(LB_GETTEXTLEN)|
 Data=Integer(100)
 link(onEventData,4569105:doSize,[])
 AddHint(-87,-87,198,39,@Hint)
}
Add(Hub,15087738,518,1064)
{
 link(onEvent1,13475432:doEvent2,[(560,1070)(560,1014)])
 link(onEvent2,2521060:doConvert,[])
}
Add(InfoTip,12068297,567,1043)
{
 Info=#16:Подгонка размера|
 Width=148
 Height=18
}
Add(Hub,13475432,588,1001)
{
 InCount=2
 OutCount=1
 link(onEvent1,10559745:doData,[])
}
Add(StreamConvertor,2521060,728,1071)
{
 Mode=6
 Point(Data)
 link(onResult,2203774:doText,[])
 link(Data,4569105:Stream,[])
}