
21.03.2011, 19:03
|
 |
Активный
|
|
Регистрация: 31.03.2009
Адрес: Украина, г.Днепропетровск
Сообщения: 324
Версия Delphi: Delphi7
Репутация: 3877
|
|
Так попробуй:
Код:
Var
H: THandle;
begin
H:= FindWindow(Nil, 'Имя Окна');
if H <> 0 Then PostMessage(H, WM_CLOSE, 0, 0);
end;
__________________
If end Then begin;
|