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

Вниз

Помогите пожайлуста!   Найти похожие ветки 

 
Mister   (2003-10-25 15:52) [0]

Как запретить закрывать форму нажатием на крестик?
Как перехватывать событие?


 
крот   (2003-10-25 15:58) [1]

WM_SYSCOMMAND


 
mOOx_   (2003-10-25 16:13) [2]

Запрет:

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if MessageDlg("Exit?",mtInformation,[mbYes,mbNo],0)<>mrYes then
Action:=caNone;
end;

А что под перехватом сообщения подразумевается? По этому поводу, наверное, в другой конфе :)


 
Anatoly Podgoretsky   (2003-10-25 16:13) [3]

Когда нажимаешь на этот крестик, про происходит событие OnCloseQuery


 
mOOx_   (2003-10-25 16:15) [4]

Ну да, или так :)


 
Mister   (2003-10-25 16:44) [5]

Спасибо



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

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

Наверх




Память: 0.44 MB
Время: 0.037 c
14-41918
SFASS
2003-10-21 12:02
2003.11.13
Бесплатный Хостинг С PHP


14-41974
Ёжик
2003-10-17 22:26
2003.11.13
Кто сколько может выпить пива?


6-41819
Alex21
2003-09-12 12:40
2003.11.13
Как отследить вход в мой компьютер друго пользователя


6-41827
01001010
2003-09-15 01:15
2003.11.13
резервное копирование


14-41897
Думкин
2003-10-17 04:59
2003.11.13
С днем рождения! 17 октября.





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский