Einlesen einer FORTRAN Binärdatei mit Delphi

[Mavarik]

Also... Ich mache sowas immer so:

Delphi-Quellcode:

{$A1} // Wichtig

Const
   Recordlaenge = 2245; // Filesize / Recordlaenge passt!

type
    TStruct = Record
                A    : Byte; // Bin ich mir sicher
                B    : Word; // Bin ich mir sicher
                C    : Byte; // Bin ich mir sicher
                Rest : Array[1..Recordlaenge-4 {Sizeof A-C} ] of Byte;
              end;
var
  F : File;

Procedure Readit;
var
  Struct : TStruct;
begin
  Assignfile(F,'Bla.dat');
  Reset(F,1);
  Blockread(F,Struct,sizeof(Struct));
  Closefile(F);
end;

So kannst Du schön mit dem Debugger durch gehen und im ganz schnell alles ändern.

Mavarik