بـــســـم اللــــه الـــرحمـــــن الـــرحيـــــــــــــــــــم
الصـــــلاة والســـــلام علـــى رســـــول الله
حــــذف مـــجـــلـــد فـــارف بــــدلـــفـــي
procedure TForm1.Button2Click(Sender: TObject);
begin
RemoveDir('Folder1');
// RemoveDirectory(PChar('Folder1'));
end