typisierte Datei mit freiem Offset einlesen

[Muetze1]

Oder gleich die alten Pascal Routinen mit ihren Spinnenweben so liegenlassen und TStream nutzen:

Delphi-Quellcode:

type
  TDoubleData = packed record
    Double1, Double2, Double3: double;
  end;
var
  lStream: TStream;
  lData: TDoubleData;
begin
  lStream := TFileStream.Create('deinFile.ext', fmOpenRead);
  try
    lStream.Position := x; // deine Position X
    lStream.ReadBuffer(lData, sizeof(lData));
  finally
    lStream.Free;
  end;
end;