|
حذف یا انتقال فایلهای در حال استفاده در ویندوزهای نوع NT
function MoveDelFileReboot (Fileanme,New:String;fMove:Boolean=true):Boolean;
begin
If fMove then
result:=movefileEx(Pchar(Fileanme),Pchar(new), MoveFile_Replace_Existing or MoveFile_Delay_Until_Reboot)
else
Result:=movefileEx(Pchar(Fileanme),nil, MoveFile_Replace_Existing or MoveFile_Delay_Until_Reboot);
end;
| |
|