Скачать: CL | DM;

Завершение внешнего приложения в случае ошибки   Найти похожие ветки 

← →
YDS   (2005-12-06 22:46) [0]

Подскажите, как при запуске внешнего приложения в Delphi в случае его некорректного завершения тихо прибить его (подавить появление окна с ошибкой и звукового сигнала).
Если подробнее, то задача в следующем. Из моего приложения запускается утилита конвертации графических файлов. При этом если графический файл имеет неправильную структуру, то эта утилита «падает» с ошибкой. Утилиту из своего приложения запускаю стандартно:

cmdl :="util.exe cmdline’ // командная строка
Createprocess(nil,pchar(cmdl),nil,nil,false,Create_default_error_mode,nil,nil,si,p);
Waitforsingleobject(p.hProcess,infinite);

---

← →
Alexander Panov ©   (2005-12-06 23:10) [1]

Createprocess(nil,pchar(cmdl),nil,nil,false,Create_default_error_mode,nil,nil,si,p);
Waitforsingleobject(p.hProcess,5000);

TerminateProcess(p.hProcess,0);

---

← →
Kerk ©   (2005-12-07 02:34) [2]

А параметр, который 5000 мы будем подгонять, да?

---

← →
YDS   (2005-12-07 09:48) [3]

Да, предложенный вариант, увы, не выход.

Тему перенес в конфу "для начинающих"

---

← →
Alexander Panov ©   (2005-12-07 10:34) [4]

> Kerk ©   (07.12.05 02:34) [2]
>
> А параметр, который 5000 мы будем подгонять, да?


А остальное - для самостоятельной работы.

---

← →
Карелин Артем ©   (2005-12-07 12:09) [5]

> Alexander Panov ©   (06.12.05 23:10) [1]

Замечательный код! Особенно для Мастера!

Я бы посоветовал FindWindow и связанные с этим функции использовать. И прибивать процесс при появлении окна. Полагаться на время обработки файла означает создать мирно спящие до определенного момента проблемы.

---

← →
Alexander Panov ©   (2005-12-07 12:12) [6]

> Замечательный код! Особенно для Мастера!


Вопрос был - "как прибить процесс?".
Ответ полностью удовлетворяет вопросу.

---

← →
Карелин Артем ©   (2005-12-07 12:19) [7]

> подавить появление окна с ошибкой

---

← →
Alexander Panov ©   (2005-12-07 12:20) [8]

> Карелин Артем ©   (07.12.05 12:19) [7]
>
>
> > подавить появление окна с ошибкой


см. Alexander Panov ©   (07.12.05 10:34) [4]

---

← →
Карелин Артем ©   (2005-12-07 12:27) [9]

:))))

---

← →
Винт   (2005-12-07 12:28) [10]

Карелин Артем ©   (07.12.05 12:27) [9]
http://delphimaster.net/view/2-1133938066/

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.022 c