01.05.2009, 21:06
|
|
Познающий
Регистрация: 21.11.2008
Сообщений: 36
С нами:
9194467
Репутация:
6
|
|
[DELPHI] процесс
как переделать этот код
PHP код:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if FindWindow(nil, 'ICQ') <> 0 then
begin
ShowMessage('Окно найдено');
PostMessage(FindWindow(Nil, 'ICQ'), WM_QUIT, 0, 0); end
else
begin
ShowMessage('Окно Ненайдено');
Form1.Close; end;
end;
под процесс
то есть какие команды на поиск и на убивание процесса идут? |
|
|