dann wird das DSPack wohl einen 2-sekündigen Puffer nutzt
so, und Folgendes hätte man sich ganz leicht, mit Hilfe des
MSDN, zusammensetzen können.
Delphi-Quellcode:
Var H: THandle;
Buf: Array[0..4095] of Byte;
W: LongWord;
H := CreateFile(PChar(Dateiname), GENERIC_READ, FILE_SHARE_READ, nil, OPEN_EXISTING, FILE_FLAG_NO_BUFFERING, 0);
ReadFile(H, Buffer, 4094, W, nil);
CloseHandle(H);
Die 4 KB sind Absicht.
Denn, wie man im
MSDN gelesen haben sollte, muß man hier in ganzen Sektoren lesen.
(Festplatte/USB-Stick/Speicherkarten = 512 Byte pro Sektor und CD/DVD = 4 KB pro Sektor)
Da ReadFile nun direkt ließt, muß die Platte erstmal hochfahren, bevor es weitergeht.