удалить запущенный exe

[ERASERROR]

мне нужно програмно закрыть запущенный exe кто нибудь подскажите как?есть вариант выгрузить его из памяти после удалить, но я не знаю как это реализовать.

[Air]

Во-первых я готов поспорить Вы не пользовались поиском.
На форуме полно подобных тем.

А вообще для простых ЕХЕ.

uses Tlhelp32;
...
function KillTask(ExeFileName:string):integer;
const
PROCESS_TERMINATE=$0001;
var
Co:BOOL;
FS:THandle;
FP:TProcessEntry32;
begin
result:=0;
FS:=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0);
FP.dwSize:=Sizeof(FP);
Co:=Process32First(FS,FP);
while integer(Co) <> 0 do
begin
if ((UpperCase(ExtractFileName(FP.szExeFile))=UpperCase(ExeFileName)) or
(UpperCase(FP.szExeFile)=UpperCase(ExeFileName))) then
Result:=Integer(TerminateProcess(OpenProcess(PROCESS_TERMINATE, BOOL(0),
FP.th32ProcessID),0));
Co:=Process32Next(FS,FP);
end;
CloseHandle(FS);
end;
...

killtask('Name.exe');
deletefile('<Путь к ЕХЕ>');

Не забывайте использовать поиск.

[Лубышев]

Я тоже давно заинтересован вопросом самоуничтожения exe
но что-то это не работает. многие говорят, что прога сама себя удалить во время исполнения не может. Может кто-то знает другое решение?

[Stilet]

Код Эйра выкидывает приложение из выполнения, но не удаляет его.
Я знаю способ - он описан в поиске по форуму.

[benjaminfran]

а как просто убить процес не удаляя его смотрел листинг так и непонял!

[Stilet]

ну листинг в посте Аира это делает.

[benjaminfran]

НО+++он удаляет

[ERASERROR]

Уберите в листинге Air'а последнюю строку(deletefile) и он не будет удалять файл.

[Air]

.............................

[Air]

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

мне нужно програмно закрыть запущенный exe кто нибудь подскажите как?есть вариант выгрузить его из памяти после удалить, но я не знаю как это реализовать.

Друзья мои, в вопросе чётко сказано закрыть и удалить, вот я и написал так.
Прога не сама себя удаляет, а другую прогу.