Und warum nicht File of Byte? Ist zwar etwas veraltet, aber funktioniert
entschuldige Progman, aber noch schlimmer geht doch kaum, Byte für Byte auslesen ist ja beinahe wie Buchstaben meißeln.
Jeder bevorzugt ja seine eigene Vorgehensweise, darum ist das nicht der Weisheit letzter Schluß:
Delphi-Quellcode:
const
maxbuff=1023;
var
buffer : array [0..maxbuff] of byte;
fs : tFileStream;
bytesred : integer;
fs:=Tfilestream.create(meinedatei,meineparameter);
repeat
bytesred:=fs.read(buffer,sizeof(bugffer));
{ tu was mit buffer }
until bytesred<>sizeof(buffer);
fs.free;
Nichts spricht dagegen statt buffer/array..of byte z.B. Buffer/array of tDatetime zu verwenden, dann könnten die Daten schon verarbeitungsfertig vorliegen.
Wenn man als Typen ein selbstdefiniertes Record nutzen will sollte man aber auf packed achten, damit keine Daten verloren gehen.
Gruß
K-H
Gruß
K-H