- •Практикум Visual FoxPro Основные понятия.
- •Проектирование баз данных.
- •Команды и функции управления записями.
- •Управляющие конструкции языка FoxPro
- •1. Конструкция if …endif
- •3. Конструкция do case … endcase
- •4. Цикл for … next
- •Цикл do while … enddo
- •Цикл scan … endscan
- •Процедуры.
- •Объектно-ориентированное программирование
- •Свойства объектов
- •Допустимые типы полей
- •Примеры использования классов vfp
- •Как сделать, чтобы из формы интерактивно менялось количество страниц в объекте PageFrame?
- •2. Как сделать, чтобы на форме была видна только она страница PageFrame?
Допустимые типы полей
Тип данных |
Описание |
Размер |
Диапазон |
Character |
Произвольный текст |
1-256 символов |
Любые символы |
Currency |
Денежная сумма |
8 байтов |
от -922337203685477.5807 до 922337203685477.5807 |
Date |
Хронологическая дата |
8 байтов |
от 01.01.0001 до31.12.9999г |
Logical |
Логическое значение |
1 байт |
Истина (.Т.) или Ложь (.F.) |
Numeric |
Целое или с дробной частью число |
от 1 до 20 бт в таблице |
от - .9999999999Е+19 до .9999999999Е+20 |
Double |
Число с плавающей запятой двойной точности |
8 байтов |
-4.940656458412Е-324 до 8.98846567431Е+307 |
General |
Ссылка на OLE-объект |
4 байта в таблице |
Ограничен только доступной памятью |
Integer |
Целочисленные значения |
4 байта |
от –2147483647 до 2147483647 |
Memo |
Ссылка на блок данных |
4 байта в таблице |
Ограничен только доступной памятью |
Примеры использования классов vfp
-
Как сделать, чтобы из формы интерактивно менялось количество страниц в объекте PageFrame?
Пусть на форме имеются Page Frame1 и Spinner1. В методе Interactive Change счетчика напишем код:
THISFORM.PageFrame1.PageCount = THIS.Value && кол. страниц
For i=1 to This.value
THISFORM.PageFrame1.Pages(i).caption="Стр."+allt(str(i)) &&название и № каждой стр.
Next
2. Как сделать, чтобы на форме была видна только она страница PageFrame?
В свойстве Tabs указать False.
Активизация какой-либо страницы (например, Page1) через команду (можно записать ее в метод Click какой-либо кнопки): ThisForm.PageFrame1.Page1.zorder.
-
Как использовать OptionGroup? Для вставки Option Group необходимо нажать и разместить объект на форме. Используют объект для выбора только 1 значения атрибута. Число кнопок указывается в свойстве Button Count. Свойства каждой кнопки (например, Caption), указываются при выборе данного объекта в меню Properties (рис.) Значение переменной (This.value) равно номеру нажатой кнопки.
Рис. 5. Объект OptionGroup1
Для определения действий обычно используют структуру Do Case …. EndCase, например
N= ThisForm.OptionGroup1.value
Do Case N
Case n=1
<програмный код>
EndCase
-
Как использовать Check Box. Для вставки Check Box необходимо нажать
Данный объект используют, когда, нужно одновременно выбрать несколько значений атрибутов или не одного. Значение This.value=.f. (нет галочки) и .t. (галочка).
Рис.6. Выбор значения в CheckBox1 (мониторы) и CheckBox2 (принтеры).
Значение свойства value каждого объекта Check Box анализируется отдельно.
-
Как использовать Combo Box. Для вставки Combo Box необходимо нажать .
-
список фиксированных значений. Для этого в свойстве RowSourceType указать Value, а в RowSource перечислить через запятую значения. Например: Москва, Архангельск, и т.д.
-
Использовать значение поля RowSourceType – Fields, в RowSource выбрать поле.
-
Использовать запрос RowSourceType – SQL
-
-