mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD: Some code for Feature Request [ 1951507 ] Wipe file

Browse source
This commit is contained in:
Alexander Koblov 2008-05-16 11:10:41 +00:00
commit e024b0f928
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
uwipethread.pas
View file

@ -177,6 +177,7 @@ begin
end;
FileFlush(fs.Handle);
end;
FileTruncate(fs.Handle, 0);
fs.Free;
except
on E: Exception do