Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Диалоговое окно

Автор: ziga 27.5.2008, 19:17

как мне при на жатии кнопки вывести диалоговое окноо с надписью "вы уверены?" и 2 вориантами ДА и НЕТ и проверить если да то выполнять одно условие если нет то другое ? Понимаю что глупый вопрос можно было погуглить или в хелпе глянуть но времени нет пока жду ответ пишу в торопях прогу, спасибо за помощь. smile

Автор: SneG0K 27.5.2008, 19:20

MessageBox(0, 'Вопрос','Заголовок',MB_YESNO), и посмотри что возвращает. А то чет мне память уже совсем изменяет

Автор: THandle 27.5.2008, 19:24

Код


  if MessageBox(Handle, 'Вы уверены???', 'Внимание!!!', MB_YESNO) = IDYES then
    ShowMessage('Выбрано "Да"')
  else
    ShowMessage('Выбрано "Нет"');

Автор: ziga 27.5.2008, 19:29

Всем спасибо

Автор: Akella 27.5.2008, 19:50

можно ещё подумать немного и придумать что-то вроде:

Код


case messagebox(....) of
  IDYES: begin ....... end;
  IDNO: begin ....... end;
else
  begin ....... end;
end;