Убиваем активное приложение

Комментарии Xianguang Li (22 Октября 2000) В Delphi 5, при компиляции получается следующая ошибка : Incompatible types: 'String' and 'PChar'. После изменения выражения TheWindow := FindWindow(ClassName, WindowTitle) на TheWindow := FindWindow(PChar(ClassName), PChar(WindowTitle)) , Нормально откомпилировалось. И ещё: если мы не знаем ClassName или WindowTitle программы, которую мы хотим убить, то мы не сможем её завершить. Причина в том, что нельзя вызвать функцию в виде: KillProgram(nil, WindowTitle) или KillProgram(ClassName, nil). Компилятор не позволяет передать nil в переменную типа String. Итак, я изменил объявление KillProgram(ClassName: string; WindowTitle: string) на KillProgram(ClassName: PChar; WindowTitle: PChar), вот теперь функция действительно может завершить любое приложение, если вы не знаете ClassName или WindowTitle этого приложения. Взято из http://forum.sources.ru

Отправить комментарий

Проверка
Антиспам проверка
Image CAPTCHA
...