Gibt es nicht sowas wie RecieveBuf. Du musst doch das Paket eh noch auseinanderbasteln.
Dann baust du dir einen Record für den Header, z.B. so:
Delphi-Quellcode:
type PHeader=^THeader
THeader=packed record
HeaderInfo1: TIrgendetwas;
HeaderInfo2: Integer;
....
data:array[0..0] of char;
end;
....
procedure Txxx.RecieveBuf(const buf; ...);
var Header:PHeader;
Data:pointer;
begin
Header:=buf;
//hier kannst du den Header analysieren ((und zum Beispiel die Länge des Datanpaketes ausrechnen/auslesen
//zum ansprechen der Daten
Data:=@Header^.data;
//oder wenn das Datenpaket ein String ist:
setlength(Datenstring,laenge); //Länge aus HeaderInfos
move(Header^.data,Datenstring[1],lanege);
...
end;
Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.