Мне надо убить MessageBox....

← →
KA-87 © (2003-05-25 18:03) [0]

Мастера как мне убить MessageBox?
Чего-то типа этого?

procedure NagWindowKill(var Msg: TWMнезнаю_чего); message
WM_незнаю_чего; //Так ведь?
...
procedure TForm.NagWindowKill(var Msg: TWMнезнаю_чего);
var
NagHandle: HWND;
begin
NagHandle:=FindWindow("класс_(у_меня_вроде_#32770)","заголовок_(non_registered)");
SendMessage(NagHandle,WM_CLOSE(???),0,0);
end;

← →
KA-87 © (2003-05-25 18:14) [1]

Использую я один компонент, а он при запуске приложения выдает сообщение, которое мне надо закрыть

← →
Pat © (2003-05-25 18:15) [2]

SoftIce"ом можно "вырезать"

← →
Nick Denry © (2003-05-25 19:51) [3]

KA-87 © И не спрашивай....... ;-)

← →
Ihor Osov'yak © (2003-05-25 20:14) [4]

Ну так и говори, что нужно компонент ломануть..

Зы. А правила почитать то не мешало-бы..

← →
.::D.e.M.o.N.i.X::. © (2003-05-25 20:32) [5]

Кинь компонент на почту. Помогу:)))))

← →
KA-87 © (2003-05-25 20:38) [6]

NagHandle:=FindWindow("#32770","non registered");//ищу это окно
PostMessage(NagHandle,WM_QUIT,0,0);
Почему после этого прога моя вообще отрубается

Попробуй WM_ENTER и тогда, если я не ошибаюсь, произойдет нажатие кнопки Ok. А сообщение WM_QUIT в данном случае означает завершить программу, т.е. сделать Terminate.

>>Почему после этого прога моя вообще отрубается
Потому что окно не находится и возвращает 0.

> Почему после этого прога моя вообще отрубается

Не отрубается, а завершает работу. Ибо ты ее сам об этом попросил..

Мне надо убить MessageBox.... Найти похожие ветки