[Dodakaedr]

Только выдает сообщение, картинка чуть выше. »

Если хвостов действительно нет, то можно вот так сделать:

Скрытый текст

Код:

[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application

[Messages]
UninstalledMost=Программа My Application была полностью удалена с вашего компьютера.

[UninstallDelete]
Type: FilesAndOrDirs; Name: {app};

[code]
procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
  if CurUninstallStep = usPostUninstall then // или usUninstall
    begin
    UnloadDLL(ExpandConstant('{app}\msimg32.dll'));
    DeleteFile(ExpandConstant('{app}\msimg32.dll'));
    end;
  //if CurUninstallStep = usDone then DelTree(ExpandConstant('{app}'), True, True, True);
end;