یه سوالdel dir

با سلام
چطور میتونم تو برنامم یه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');