Did you know SD-WANs can improve network connectivity? Check out this webinar to learn how an SD-WAN simplified, one-click tool can help you migrate and manage data in the cloud.
procedure TClient.SendBuffer(Buffer: TIdBytes; BufferSize: Cardinal); Var Strm: TIdMemoryBufferStream; begin ClientThread.Lock; try if not idtcp.Connected then begin exit; end; Strm := TIdMemoryBufferStream.Create(PByte(Buffer), BufferSize); try FTCP.Socket.WriteLn('streamcmd'); FTCP.Socket.LargeStream := True; FTCP.Socket.Write(Strm, 0, True); finally Strm.Free; end; finally ClientThread.Unlock; end; end;
MS := TMemoryStream.Create; AContext.Connection.Socket.LargeStream := true; AContext.Connection.Socket.ReadStream(MS, -1, False); MS.Position := 0;
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.