Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.21;
Скачать: CL | DM;

Вниз

Hellp   Найти похожие ветки 

 
Blarior   (2002-11-10 02:00) [0]

Я недавно начал программировать, так что не бейте сильно.
Значет так, при создании кнопки "выход" хотел создать диологовое окно, так что бы при её нажатии появлялась две кноки: Выход и OK. Так вот, как сделать так что бы при на жатии выход на диологовом окне закрывалась вся программа, а не только диологовое окно?


 
wssg   (2002-11-10 02:17) [1]

1. Application.Terminate;
2. Application.MainForm.Close;



 
Билл Гейтс   (2002-11-10 02:35) [2]

Если ты делаешь это диалоговое окно так
New-->Dialogs-->Standart dialog, то написано выше.
А можно сделать и по-другому:

...........................
if MessageDlg("Do you realy want to quit?",mtConfirmation,[mbYes,mbNo],0)=mrYes then
close;
...........................

То вылезет стандартный cofirmation диалог (например как в Word и других программах) и если ты нажмешь там кнопку Yes, то программа закроется.
вместо mtCobfirmation ("подтверждение")можно поставить и другие значения:
mtError - сообшение об ошибке (имеет значок в виде красного стоп сигнала)
mtInformation - просто сообщение (имеет голубой значок с буквой i)
mtWarning - предупреждение (имеет желтый значок)


также в местe [mbYes, mbNo] можно было написать в любом сочетании через запятую mbYes, mbNo, mbOK, mbCancel, mbAbort, mbRetry, mbIgnore, mbAll, mbNoToAll, mbYesToAll, mbHelp - это отвечает за то какие кнопки будут находиться на диалоге.
Проверку того, на какую кнопку нажал пользователь можно мделать так: описать в блоке var какую-нибудь переменную типа integer (var x:integer;), и когда хочешь вызвать этот дилог, то пиши x:=MessageDlg(я чуть выше рассказал что тут написать);
if x=(вот там кнопки назывались mtYes mtNo и т.д. а здесь напиши m rYes mrNo b и т.д.)then делай что хочешь;
( можно все одновременно :-)


 
Внук ©   (2002-11-10 09:15) [3]

PostQuitMessage()



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

Текущий архив: 2002.11.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.016 c
14-69507
paren'
2002-11-01 23:23
2002.11.21
Есть шансы, как вы думаете?


1-69394
Oleg_K
2002-11-10 17:57
2002.11.21
Цвет BackGround а в окнах help а


3-69169
Leonon
2002-10-31 15:59
2002.11.21
Знатокам SQL посвящается...


7-69610
savva
2002-09-19 15:31
2002.11.21
Sleep и разная частота процессоров.


3-69140
БОБ
2002-10-31 09:29
2002.11.21
SELECT...