savedialog/opendialog

[himitsu]

laut OH

Delphi-Quellcode:

BlockRead(F, eintrag, 300 * SizeOf(TDaten));
//oder
Var R: Integer;  // tatsächlich gelesene Bytes 
BlockRead(F, eintrag, 300 * SizeOf(TDaten), R);

laut System.pas

Delphi-Quellcode:

Var R: Integer;
BlockRead(F, @eintrag, 300 * SizeOf(TDaten), R);

Aber vermutlich weren wohl die OH-Varianten genutzt ... das in System.pas ist nur bestimmt nur die CompilerMagic-Variante (CompilerIntern).


Also wird das Erste von OH gut passen Ô.o