Новости



Visual FoxPro 9 позволяет создавать ещё более производительные приложения баз данных.
Двадцатиление FoxPro! Microsoft принимает поздравления.
Visual FoxPro Toolkit for .NET - более 225 функций VFP 7.0, для языков .NET (подробнее)

fox00020.gif

* В следующем примере отображается пользовательское диалоговое окно.
* Сообщение "Record not found. Would you like to search again?" [Запись не
* найдена; не желаете ли повторить поиск?] отображается в качестве
* названия этого диалогового окна, а в строке заголовка отображается
* "My Application".

* Пользовательское диалоговое окно содержит кнопки Yes и No, а также
* значок в виде вопросительного знака; вторая кнопка (No) используется по
* умолчанию. Когда вы нажимаете одну из этих кнопок, выбранная опция
* показывается на экране.

cMessageTitle = 'My Application'

cMessageText = 'Record not found. Would you like to search again?'

nDialogType = 4 + 32 + 256

* 4 = Yes and No buttons

* 32 = Question mark icon

* 256 = Second button is default

nAnswer = MESSAGEBOX(cMessageText, nDialogType, cMessageTitle)

DO CASE

CASE nAnswer = 6

WAIT WINDOW 'You chose Yes'

CASE nAnswer = 7

WAIT WINDOW 'You chose No'

ENDCASE



Новое на сайте

  • Обновлен портфель программиста

    Добавлены: Установка HTML Help (Создание справочной системы), Imagedit.zip - Графический редактор ( ico и bmp), Библиотека локализации HTML Help (Русский)
  • Новые примеры программ

    Установка библиотек, Игровая программа "Охота на лис", Установка библиотек "Охота на лис", plastic -"Платежки", Библиотеки (на FPD26), platan -"Платежки" (на Clipper 5.2)
  • Обновленна справка

    Подсказки, технология программирования и использование Visual FoxPro. Команды, функции, операторы, объекты, свойства, события и методы.