با سلام
چطور میتونم تو برنامم یهfolderرو باsub folderهاش پاک کنم؟
با چه فرمانی؟
با تشکر
با سلام
چطور میتونم تو برنامم یهfolderرو باsub folderهاش پاک کنم؟
با چه فرمانی؟
با تشکر
سلام
از این فانکشن استفاده کنید.
uses
ShellApi;
//----------------------------
function DelDir(dir: string): Boolean;
var
fos: TSHFileOpStruct;
begin
ZeroMemory(@fos, SizeOf(fos));
with fos do
begin
wFunc := FO_DELETE;
fFlags := FOF_SILENT or FOF_NOCONFIRMATION;
pFrom := PChar(dir + #0);
end;
Result := (0 = ShFileOperation(fos));
end;
Example :
DelDir('c:\nc');