.. dann könnte man eventuell noch
FileOpen:
Zitat:
Opens a specified file using a specified
access mode.
Unit
SysUtils
Syntax
function FileOpen(const FileName: string; Mode: Cardinal): Integer;
FileRead:
Zitat:
Reads a specified number of bytes from a file.
Unit
SysUtils
Syntax
function FileRead(Handle: Integer; var Buffer: Type; Count: Cardinal): Integer;
ausprobieren.
Grüße
Klaus