Es gibt in Delphi mittlerweile auch ein
TBufferedFileStream
. Das überschreibt die beiden virtuellen
Read
-Methoden. Das ist auch nötig, da die Implementierung von
THandleStream
(dem Vorfahr von
TFileStream
) diese beiden Methoden separat implementiert. Mit der Implementierung beider Varianten ist man somit immer auf der sicheren Seite.
Delphi-Quellcode:
function Read(var Buffer; Count: Longint): Longint; override;
function Read(Buffer: TBytes; Offset, Count: Longint): Longint; override;
In der Implementierung ruft die zweite die erste auf.