Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.06.05;
Скачать: [xml.tar.bz2];

Вниз

Мне надо убить 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);
Почему после этого прога моя вообще отрубается


 
.::D.e.M.o.N.i.X::.   (2003-05-25 21:08) [7]

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


 
Song   (2003-05-25 22:27) [8]

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


 
Ihor Osov'yak   (2003-05-25 23:39) [9]

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

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



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

Форум: "Основная";
Текущий архив: 2003.06.05;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.008 c
1-13147
Opera
2003-05-26 10:58
2003.06.05
Сравнение


14-13392
Till
2003-05-16 07:39
2003.06.05
Oracle Data Access Components Net 4.05.1.8 for Delphi 6


14-13373
Mike Kouzmine
2003-05-19 17:15
2003.06.05
Новые виды вооружений. Готова ли Россия к современной войне?


3-13070
ILY
2003-05-18 00:28
2003.06.05
Не могу установить длину TQRShape


3-12997
k-sergey
2003-05-19 13:16
2003.06.05
Top





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский