Da ich kein Experte bin sondern nur anwendenter Laie,
lese / lade ich Dateien immer mit BlockRead();
Wenn ich den FileMode richtig setze, kann ich die geladene
Datei in einem Drittprogramm loeschen.
Delphi-Quellcode:
function _readfile: boolean;
var F : File Of Byte;
ior : integer;
begin
ior:=0;
AssignFile(F, 'X:\Dir\Filename.ext');
FileMode:=fmOpenRead; //alternate: fmOpenReadWrite
{$I-} Reset(F);
{$I+} inc(ior, IORESULT);
...
{$I-} BlockRead();
{$I+} inc(ior, IORESULT);
...
{$I-} CloseFile(F);
{$I+} inc(ior, IORESULT);
...
result:=(ior = 0);
end;
Alles ohne Gewehr.
MfG,
Terence