FoxPro8


Использование диалоговых окон - часть 2


Значение

Кнопка

1

ОК

2 Cancel
3 Abort
4 Retry
5 Ignore
6 Yes
7 No

Рассмотрим использование диалогового окна для вывода сообщения об ошибке ввода значения кредита клиента. Для этого выполните следующие действия:

  1. Откройте форму для ввода информации о клиентах.
  2. Рис. 12.2. Определение процедуры для события Valid


  3. Выберите поле ввода значения кредита и для события Valid определите процедуру (рис. 12.2), которая проверяет введенное значение и при необходимости открывает диалоговое окно с сообщением об ошибке:
  4. if THIS.Value > 5000

    = MESSAGEBOX("Максимальный кредит для клиента составляет ;

    5000 рублей." + ;

    CHR(13) + ;

    "В особых случаях согласуйте величину кредита ;

    с Генеральным директором.",; 0+4 8+ 0, "Предупреждение")

    endif

  5. Запустите форму на выполнение, введите значение кредита более 5 000, перейдите на следующее поле. Откроется диалоговое окно с сообщением об ошибке (рис. 12.3).

Рис. 12.3. Диалоговое окно с сообщением об ошибке




Начало  Назад  Вперед



Книжный магазин