Lindawb

Thank you all, I'm not that processional developer in Delphi , I thought may be someone can help me with piece of code send and receive stream, I'm kind of show-me developer :( I will keep searching hope will find it Thanks to all of you.

Thank you so much, I really appreciate your time and support, without people like you new developers never learn :) you all awesome! any idea where is TWSocketThrdClient located on which uint ? Thanks again

Thank you so much for your time, I will work on this and try to understand how , where to use those and how to fill in as I said I'm not that good developer, but getting there 🙂 there are many good examples in ICS, but I can't find any stream example not even on the search engines. Thanks again for your time.

I don't know if possible to use HTTP for RDP, client send screen, the admin send mouse and keyboard inputs , I'm just stuck with sending and reading TMemoryStream, Thank you for any advice or suggestion.

First thank you so much for your time and explanation, and sorry I didn't explain more, All I'm trying to do send screenshot to the server (admin) , I can't use FTP or HTTP, I'm trying to do screen share program kind of RDP. I thought if I understand how to send image I will do the rest, as I have code on how to capture scree and save to the MemStream Now I understand your point, I guess you mea something like this: Client side: (Sender) fstream := TMemoryStream.Create; try WSocket1.SendStr(inttostr(fstream.Size)); wsocket1.Send(fstream.Memory, fstream.Size); finally fstream.Free; end; Server (Receiver), as you said, I guess I have problem below. procedure TTcpSrvForm.ClientDataAvailable( Sender : TObject; Error : Word); var MyStream: TMemoryStream; Buf : array [0..1024] of AnsiChar; Len : Integer; begin Len := TCustomLineWSocket(Sender).Receive(@Buf, Sizeof(Buf) - 1); if Len <= 0 then Exit; Buf[Len] := #0; MyStream := TMemoryStream.Create; MyStream.WriteBuffer(Buf, Len); end; Thank you for any advice or suggestion.