Topic: Подскажите как работать с MessageBox

как его заставить обрабвтывать противоположное действие, т.е.

if IDNO = MessageBox

работает на отрицание при нажатии на "Нет", а вот "Да" как правильно прописать... Почему-то стандартное описание условие с else не работает.

Re: Подскажите как работать с MessageBox

http://myvisualdatabase.com/forum/viewt … 553#p35553

Re: Подскажите как работать с MessageBox

Не-е, там только параметры и свойства настройки... это все понятно... Мне надо понять, как правильно условие if прописать, чтоб обе кнопки выполняли действие... Уже как-то создавал тему, где непонятно было с тремя кнопками... Или идти по пути создании формы с кнопками...

Re: Подскажите как работать с MessageBox

vit007 wrote:

Не-е, там только параметры и свойства настройки... это все понятно... Мне надо понять, как правильно условие if прописать, чтоб обе кнопки выполняли действие... Уже как-то создавал тему, где непонятно было с тремя кнопками... Или идти по пути создании формы с кнопками...

попробуйте так

if IDYES = MessageBox('Сообщение', 'Заголовок', MB_YESNO+MB_ICONINFORMATION) then ShowMessage('Вы нажали ДА') else if IDNO then showmessage('NO');

Re: Подскажите как работать с MessageBox

сп., вроде, заработало...

Re: Подскажите как работать с MessageBox

ID := MessageBox('Сообщение', 'Заголовок', MB_YESNO+MB_ICONINFORMATION);
if ID = IDYES then
ShowMessage('Вы нажали ДА') 
else if 
ID = IDNO then 
showmessage('NO');