Ein kleiner Nachsatz sei mir gestattet. Bis XP SP2..... (gefühlt) war das Block.. schneller als der Filestream (mit entsprechender Buffersize!) danach war es umgekehrt, darum hab ich längst alle Block.. durch TFilestream ersetzt.
Und "Monsterklassen" sind dafür auch nicht nötig.
Delphi-Quellcode:
fs.create(....,...);
repeat
gelesen:=fs.read(buffer,zulesen);
until gelesen<zulesen;
fs.free;
Gruß
K-H