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

Вниз

Как отловить событие Close [x] на форме?   Найти похожие ветки 

 
serega78   (2005-07-22 08:53) [0]

Уважаемые Мастера, подскажите плиз, как отловить событие Close [x] на форме? И еще, как сделать чтобы MessageDlg могла отображать русское название окна и кнопки?


 
Gydvin ©   (2005-07-22 09:17) [1]

onclose


 
Anatoly Podgoretsky ©   (2005-07-22 09:22) [2]

Такого события нет!


 
Чапаев ©   (2005-07-22 09:29) [3]

WM_SYSCOMMAND кури до просветления.


 
_sulent   (2005-07-22 09:46) [4]

В OnCloseQuery кажется есть такая лажа, которая называется CanClose булевское, если ставишь соответствующее значение, то принудительно сообщаешь, нужно ли закрывать его или нет, и делаешь соответствующие оп-ции.

А MessageDlg  я уже давно не пользую, я более привык к Application.MessageBox(pChar("..."), pChar("..."), Flags(отображение соответствующих картинок) + Flags(небходимые кнопки)).
Например:

case Application.MessageBox("Тебя зовут Вася?", "Вопросик", mb_iconquestion + mb_yesno) of
id_yes: Application.MessageBox("Его правда зовут Вася!","ага",
id_no : Application.MessageBox("Прикинь, его не Вася зовут", "ух ты", mb_iconwarning + mb_ok);
mb_iconasterisk + mb_ok);
end;


Ну коли тебя так интересует MessageDlg, то тогда тебе просто стоит сменить называние проекта, этого можно добиться в свойствах проекта, или в главном файле проекта написать:
Application.Title := "Проект";



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

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

Наверх





Память: 0.45 MB
Время: 0.012 c
1-1122470768
Juice
2005-07-27 17:26
2005.08.14
Директива-аналог "stop on delphi exceptions"


4-1118744989
SaX
2005-06-14 14:29
2005.08.14
проблемы с выключением машины под NT4


1-1121526080
lilo
2005-07-16 19:01
2005.08.14
TEdtit and ES_PASSWORD


4-1119449608
Максим
2005-06-22 18:13
2005.08.14
Добавить к exe...


14-1121785921
Profi
2005-07-19 19:12
2005.08.14
Могу ли я использовать JVCL в Shareware?





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