Datei kürzen (truncate) für files > 4.294 GB

[Jasmine]

Hallo zusammen,

vielen Dank für eure Tips.

Ich habe die Lösung von himitsu mit der Seek64 funktion ausprobiert,
die jedoch bei mir, beim Aufruf von
TFlushFunc(TFileRec(F).FlushFunc)(F);
eine Exception der Klasse EAccessViolation, Zugriffsverletzung an Adresse 00000000,
Lesen von Adresse 00000000, verursacht.

Habe dann den Aufruf ausgeklammert und alles klappt einwandfrei.

Ebenso :
recNum := recNum * TFileRec(F).RecSize;

da ich irgendwie nicht verstehe, warum mein neuer Pointer Wert mit der Größe der
eigendlichen Datei mulipliziert werden sollte ?!?

Über lehrreiche Erklärungen würde ich mich freuen.

Danke nochmals an alle,

Jasmine