При определённых событиях exeшник должен самоуничтожаться, реализовал с помощью bat файлов, вот код
Код:
procedure DestroyExe;
var
F : TextFile;
Temp, AppName : string;
begin
Temp:= 'delete.bat';
AppName:= ExtractFileName(ParamSTR(0));
AssignFile(F, Temp);
Rewrite(F);
Writeln(F, 'del ' + AppName);
Writeln(F, 'del ' + Temp);
CloseFile(F);
ShellExecute(Application.Handle,'open','Delete.bat',nil,nil,SW_ShowNormal);
Halt;
end;
Если делать на "пустой" программе то всё отлично делается, когда делаю это на большом проекте после нажатия кнопки "самоуничтожение" вылазит вот это:
![](http://my.jetscreenshot.com/16961/20131219-mmhn-16kb.jpg)
Подскажите с чем может быть связано, пожалуйста)