code_17681.txt
У меня ещё отправляется цифра, которая указывает на тип содержимого. 0 - картинка 1- текст.
Немного доработал схемку:
Add(MainForm,2953706,21,322)
{
Width=348
Height=422
link(onActivate,214353:doEvent1,[])
}
Add(TCP_Server,4190080,364,329)
{
Port=131
DataType=3
}
Add(TCP_Client,14904533,168,385)
{
Port=131
IP="127.0.0.1"
DataType=3
link(onRead,4949098:doUpPack,[])
}
Add(Hub,214353,105,322)
{
OutCount=3
link(onEvent2,4190080:doOpen,[])
link(onEvent3,14904533:doOpen,[(137,342)(137,391)])
}
Add(StreamPack,7064802,280,245)
{
DataCount=#1:1|1:2|1:3|0:|
link(onPack,4190080:doSend,[(328,251)(328,349)])
link(1,9251459:Var2,[])
link(2,2896682:Bitmap,[(293,233)(412,233)])
link(3,13347451:Value,[(300,237)(475,237)])
}
Add(StreamUnPack,4949098,245,385)
{
DataCount=#1:1|1:2|1:3|
link(onUpPack,1682014:doEvent,[(293,391)(293,357)(233,357)(233,552)])
}
Add(ComboBox,9477318,266,112)
{
Left=10
Top=10
Strings=#8:Картинка|5:Текст|
DataType=0
Point(Index)
}
Add(ScreenShort,16145555,203,196)
{
link(onCapture,2896682:doLoad,[])
}
Add(Bitmap,2896682,406,196)
{
}
Add(Button,4146076,77,224)
{
Left=10
Top=40
Caption="Send"
link(onClick,695219:doEvent1,[])
}
Add(Memory,13347451,469,196)
{
}
Add(IndexToChanel,1682014,245,546)
{
Point(Index)
link(onEvent1,15752469:doData,[(307,552)(307,496)])
link(onEvent2,13191645:doData,[(313,559)(313,587)])
link(Index,4949098:1,[])
}
Add(DoData,13191645,343,581)
{
link(onEventData,2080967:doMessage,[])
link(Data,4949098:3,[(349,426)(265,426)])
}
Add(DoData,15752469,336,490)
{
link(onEventData,19361:doLoad,[])
link(Data,4949098:2,[(342,444)(258,444)])
}
Add(Image,19361,420,490)
{
Top=62
Width=332
Height=322
Align=4
}
Add(Message,2080967,420,581)
{
}
Add(IndexToChanel,8369197,350,154)
{
Point(Index)
link(onEvent1,13347451:doClear,[(426,160)(426,209)])
link(onEvent2,2896682:doClear,[(394,167)(394,209)])
link(Index,9251459:Var3,[(356,142)(322,142)(322,173)])
}
Add(GetDataEx,9251459,280,168)
{
link(Data,9477318:Index,[])
}
Add(Hub,9021747,231,238)
{
link(onEvent1,8369197:doEvent,[(260,244)(260,170)])
link(onEvent2,7064802:doPack,[])
}
Add(Edit,7609783,441,77)
{
Left=170
Top=10
Width=145
Text="Text Text Text"
}
Add(Hub,695219,147,224)
{
OutCount=3
link(onEvent1,16145555:doCapture,[(182,230)(182,202)])
link(onEvent2,11908753:doData,[(174,237)(174,94)(424,94)(424,153)])
link(onEvent3,9021747:doEvent1,[])
}
Add(DoData,11908753,441,147)
{
link(onEventData,13347451:doValue,[(487,153)(487,187)(457,187)(457,202)])
link(Data,7609783:Text,[])
}