Thema: Socket C&S

Einzelnen Beitrag anzeigen

Redeemer

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
485 Beiträge
 
Delphi 2009 Professional
 
#5

AW: Socket C&S

  Alt 6. Feb 2018, 21:45
Irgendwie so (nicht getestet):
Delphi-Quellcode:
var
  buf: TBytes;
  len: Integer;
begin
  // bla bla
  len := Length(buf);
  SendBuf(len, 4);
  SendBuf(buf[0], Length(buf));
end;
Delphi-Quellcode:
var
  buf: TBytes;
  len: Integer;
begin
  Socket.ReceiveBuf(len, 4);
  SetLength(buf, len);
  Socket.ReceiveBuf(buf[0], len);
  // bla bla
end;
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat