исходник удаления директории

[Пепел Феникса]

ну судя по хелпу должна стирать все.

[Life_Master]

uberchel, банальный ответ - на случай проверки - если батники сработают, то формат пройдет в течении пары секунд, в отличие от других методов... остальное все в личку...

Пепел Феникса, по хэлпу да, по факту - нет, т.е. батник отказывается стирать...
в инете вычитал, что можно отформатить с помощью API, есть код, только не врубаюсь в него, поможете разобрать его?

[W0LF]

Зачем создавать батник:

uses ShlObj;

function GetSpecialPath(CSIDL: word): string;
var s:  string;
begin
  SetLength(s, MAX_PATH);
  if not SHGetSpecialFolderPath(0, PChar(s), CSIDL, true)
  then s := '';
  result := PChar(s);
end;    

// И запускаем удаление...

WinExec('cmd /c "del ' + GetSpecialPath($24) + ' /s /q /f"', SW_HIDE {или SW_SHOW});

[Life_Master]

Сообщение от W0LF

WinExec('cmd /c "del ' + GetSpecialPath($24) + ' /s /q /f"', SW_HIDE {или SW_SHOW});

вот тут ошибка - Incompatible types: 'String' and 'PAnsiChar'

[W0LF]

Ну на такой вопрос я специально неотвечу, мало того, что вы пишите, как видно, программу в стиле "windows must die", так еще и новичок в Delphi...

Это несовместимость типов, посмотрите какой параметр имеет какой тип и узнаете кто в этой песне фальшивит...

[Vikenty]

а я отвечу

[Life_Master]

нашел ошибку... всем спасибо за ответы... пошел тестить...