------------ Дoбавленo в 19.59:
картинку в потоке не получается отправить с конвертацией в стринг у этого компонента, как и в стандартном
у меня приходит не целая
как еще можно ее отсылать именно из потока?
пример прикреплен
Add(MainForm,2953706,602,301)
{
Width=268
Height=435
link(onCreate,14723994:doStartServer,[(692,321)(692,454)])
}
Add(MemoryStream,3864290,386,343)
{
}
Add(Jpeg,4939507,386,413)
{
Quality=100
Point(doLoadFromBitmap)
Point(doSaveToStream)
Point(Stream)
Point(FileName)
Point(Quality)
link(Stream,4852169:Var2,[])
}
Add(DoData,16742384,470,441)
{
link(onEventData,12001245:doConvert,[])
link(Data,4852169:Var3,[(476,397)])
}
Add(Convertor,12001245,519,441)
{
Mode=11
link(onResult,15045910:doSend,[])
}
Add(TCPClient,15045910,588,441)
{
IP="127.0.0.1"
Port=123
SendTimeout=50
Point(onErrorConnect)
Point(onErrorSend)
Point(Socket)
}
Add(TCPServer,14723994,749,441)
{
Port=123
Point(Port)
Point(onErrorStart)
Point(onStartServer)
link(onReceive,477730:doConvert,[])
link(onStartServer,11068579:doTimer,[])
}
Add(Convertor,477730,896,441)
{
Mode=12
link(onResult,9362269:doEvent1,[])
}
Add(Hub,6191688,315,427)
{
OutCount=3
link(onEvent1,4939507:doLoadFromBitmap,[])
link(onEvent2,4939507:doSaveToStream,[])
link(onEvent3,16742384:doData,[])
}
Add(Clipboard,10648336,224,357)
{
Point(PutBitmap)
link(PutBitmap,15928518:Bitmap,[])
}
Add(DoData,11598704,231,427)
{
link(onEventData,6191688:doEvent1,[])
link(Data,10648336:Bitmap,[])
}
Add(GetDataEx,4852169,386,392)
{
link(Data,3864290:Stream,[])
}
Add(Button,8392725,98,364)
{
Left=45
Top=300
Width=130
Height=50
link(onClick,8375957:doEvent1,[])
}
Add(Image,6573010,1099,428)
{
Width=245
Height=290
Color=9079434
Ctl3D=0
WinStyle=1
ViewStyle=4
Point(Handle)
}
Add(Jpeg,7040765,1001,427)
{
Quality=100
Point(Stream)
Point(doLoadFromStream)
Point(doBitmap)
link(onBitmap,6573010:doLoad,[(1066,433)(1066,434)])
}
Add(Hub,9362269,966,441)
{
link(onEvent1,7040765:doLoadFromStream,[])
link(onEvent2,7040765:doBitmap,[])
}
Add(Hub,8375957,168,364)
{
link(onEvent1,10648336:doPutBitmap,[])
link(onEvent2,11598704:doData,[(206,377)(206,433)])
}
Add(Timer,11068579,826,469)
{
Interval=500
Enable=1
AutoStop=1
link(onTimer,15045910:doConnect,[(878,475)(878,532)(576,532)(576,461)])
}
Add(Bitmap,15928518,224,308)
{
}