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

Вниз

Обработка клавиш YESNOCANCEL в MessageBox   Найти похожие ветки 

 
V l a d i m i r   (2004-12-17 14:40) [0]

Здравствуйте! Ниже приведен пример кода, когда появляется сообщение и пользователь выбирает ответ между тремя кнопками: Да, Нет, Отмена.. Кнопку Да я обработать могу, а как обработать остальные кнопки?

if MessageBox(Handle, PChar("текст сообщения","заголовок сообщения", MB_YESNOCANCEL or MB_DEFBUTTON1 or MB_ICONWarning) = IDYES
then begin
//Выполняется код для выбранной операции Да
end
else ??? begin
//Как обработать две остальные кнопки?
end;



 
TUser ©   (2004-12-17 14:43) [1]

var MR: longint {???} ;
...
MR:=MessageBox();
case MR of
...
end;


 
TUser ©   (2004-12-17 14:44) [2]

case MessageBox() of
...
end;


 
Digitman ©   (2004-12-17 14:45) [3]


> а как обработать остальные кнопки?


Паскаль выучить. Тогда и вопрос отпадет сам собой.

case MessageBox(..) of
IDABORT: ..;
IDCANCEL:..;
IDIGNORE:..;
IDNO:..;
IDOK:..;
IDRETRY:..;
IDYES:..;
end;


 
V l a d i m i r   (2004-12-17 14:57) [4]


> TUser ©  

Ок, получилось... пасиб!



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

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

Наверх





Память: 0.45 MB
Время: 0.033 c
1-1103189974
dima
2004-12-16 12:39
2005.01.02
Вызвать стандартный редактор


4-1100559619
BURN
2004-11-16 02:00
2005.01.02
Motorola


14-1103112294
Dmitriy O.
2004-12-15 15:04
2005.01.02
Compact using !


1-1103523038
Mishenka
2004-12-20 09:10
2005.01.02
Как в DBGridEh (из EhLib) сделать структуру как в TreeView?


3-1102261157
sunvit
2004-12-05 18:39
2005.01.02
Как сохранить изменения на сервере Oracle





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