یه سوالdel dir

[lord_viper]

با سلام
چطور میتونم تو برنامم یهfolderرو باsub folderهاش پاک کنم؟
با چه فرمانی؟
با تشکر

[BOB]

سلام
از این فانکشن استفاده کنید.


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');