Truncate/SetEndOfFile, verhindern das Datei genullt wird

[Sunlight7]

Moin DP!

Mich nervt gerade das Problem, das mir (große) Dateien immer genullt werden, was mir zu lange dauert, für meine Zwecke unnötig ist und meine Nerven strapaziert...

Ums auf den Punkt zu bringen hab ich einen Test QT gemacht:

Delphi-Quellcode:

   var F:File;
    i:Cardinal;
    PC:Array[0..65535] of Char;
begin
   AssignFile(F, 'L:\~Test.tmp');
   ReWrite(F, 1);
   i:=1 * 1024 * 1024 * 1024;
   Seek(F, i+65536);
   Truncate(F);
   Seek(F, i);
   BlockWrite(F, PC, 65536); // Hier haben wir das Die-Lämmer
   CloseFile(F);
end;

Sobald ich Daten ans Ende der Datei schreibe wird die komplette Datei von Anfang bis FilePos genullt und erst dann die eigentlichen Daten geschrieben...

Ich habs versucht, die Datei (mit der Größe) zu erstellen, schließen, öffnen und dann ans Ende schreiben, aber das half nix, sie wurde wieder genullt

Dann hab ichs direkt mit der WinAPI versucht, aber auch da war der selbe Effekt


Wie kann ich ans Ende einer Datei schreiben ohne das alles davor genullt wird?


MfG, Sun

[himitsu]

Zitat:

Dann hab ichs direkt mit der WinAPI versucht, aber auch da war der selbe Effekt

Die Delphi-Funktionen greifen fast direkt auf die WinAPI zu und dieses hier ist nunrmal ein Verhalten dieser API.


Truncate entspricht sozusagen SetEndOfFile

Seit WinXP gibt es SetFileValidData, aber selbst hatte ich dieses, aus Sicherheitsgründen und da ich es Schlußendlich doch anders gelößt hab, am Ende doch nicht verwendet

Zitat von MSDN:

Warning Use of this function without proper security considerations may compromise data privacy and security.

Ich glaub bei der ganzen Sache mußt du auch noch mit einberechnen, ob die Datei komprimiert (FILE_ATTRIBUTE_COMPRESSED) ist, da es (glaub ich) die Datengröße auf der Platte setzt (ist schon 'nen Weilchen her, wo ich damit gespielt hatte)

[nahpets]

Hallo,

Zitat von Delphi-Hilfe:

Rewrite (Prozedur)
Die Prozedur erstellt eine neue Datei und öffnet sie anschließend.

Da dürfte das Problem liegen.

[himitsu]

nee, sobald man die Datei vergrößert ... wie auch immer (außer man schreibt über das Dateiende hinaus und vergrößert so), wird "immer" mit 0 gefüllt ... damit kommen "normale" Programme nicht an alte Dateidaten/Datenstrukturen auf der Platte ran, indem sie einfach 'ne Datei erstellen und schauen was drin ist ... Datensicherheit halt

[Sunlight7]

Oha, Danke für den Tipp, mit SetFileValidData klappt das wirklich

Obs ein Problem gibt, wenn die Dtei komprimiert ist guck ich noch.