TFIleStream und Pointer

[Dax]

Du nimmst dir einen Filestream und dereferenzierst Data:

Delphi-Quellcode:

fs := TFileStream.Create(DateiName, fmCreate);  // Sollte global ausgeführt werden

procedure OnReceive({...});
begin
  fs.Write(Data^, DataLen);
  if LastPacket then 
    fs.Destroy;
end;

BtW: Ist nur eine Idee, musst es wohl noch ausbauen.