Элементы управления формы ArrayShow

Элемент	Класс	Значение свойства		Иконка
		Name	Caption
Поле списка	ListBox	ListArray	–
Надпись	Label	Label1	Номер сортируемого столбца
"	"	Label2	Направление сортировки	"
Счетчик	Spinner	SpinnerColumnNumber	–
Группа из 2-х переключателей	OptionGroup	OptionGroupSortOrder	–
Переключатель	OptionButton	Incr	Возрастающая	–
"	"	Decr	Убывающая	–
Кнопка	CommandButton	CommandButtonClear	Очистить
"	"	CommandButtonFill	Заполнить	"
"	"	CommandButtonSave	Записать	"
"	"	CommandButtonSort	Сортировать	"
"	"	CommandButtonClose	Закрыть	"

Назначение элементов управления следующее:

• поле списка – отображает двумерный массив;

• счетчик – задает номер сортируемого столбца;

• переключатели – задают направление сортировки выбранного столбца;

• кнопки – управляют состоянием массива.

Замечание. Если пользоваться клавиатурой, то переход с одного элемента управления на другой осуществляется в результате нажатия на клавишу Tab. Порядок обхода элементов управления регулируется их свойством TabIndex, значение которого для каждого элемента можно просмотреть и изменить, например, после выполнения команды меню View – Tab Order.

6.2.3. Свойства и событие Init формы

В окне редактирования свойств формы изменены ее 6 свойств; одно свойство (массив FormArray) добавлено в форму программно (табл. 6.25).

Таблица 6.25

Новое и измененные свойства формы

Свойства	Значение
Caption – заголовок формы	Двумерный массив в форме
FormArray – двумерный массив (добавленное свойство)	См. обработчик события Click кнопки "Заполнить"
Height и Width – соответственно высота и ширина формы	200 и 350
Left и Top – соответственно x- и y-координаты левого верхнего угла формы в физической системе координат	60 и 30
Name – имя формы	ArrayShow

В обработчике события Init, возникающего при создании объекта, в форму добавляется новое свойство – двумерный массив FormArray. Это свойство указывается в качестве источника данных (свойство RowSource) списка ListArray.

&& Обработчик события Init формы ArrayShow

&&

&& Протяженности массива по первому и второму измерениям

m = 5

n = 4

&& Добавляем в форму новое свойство-массив с именем FormArray

This.AddProperty("FormArray(m, n)")

&&

&& Изменяем некоторые свойства элементов управления формы

&& Указываем свойство FormArray в качестве источника данных

&& поля списка ListArray

with This

.ListArray.RowSource = "ThisForm.FormArray"

&& Вид источника данных – массив

.ListArray.RowSourceType = 5

&& Число отображаемых в поле списка ListArray столбцов массива

.ListArray.ColumnCount = n

&& Позиционируемся на первой строке поля списка

.ListArray.Value = 1

&& Минимальное и максимальное значения счетчика SpinnerColumnNumber,

&& задающего номер сортируемого столбца отображаемого массива

.SpinnerColumnNumber.SpinnerLowValue = 1

.SpinnerColumnNumber.SpinnerHighValue = n

&& Доступность кнопки "Заполнить"

&& Кнопка будет доступна после нажатия на кнопку "Очистить",

&& то есть когда поле списка не содержит данных

.CommandFill.Enabled = .F.

&& Вызов обработчика события Click кнопки "Заполнить",

&& выполняющего инициализацию массива ThisForm.FormArray

&& и управляющей доступностью кнопок формы

.CommandFill.Click

endWith

Замечание. Форма текущего проекта может быть открыта для редактирования при помощи метода Modify объекта File коллекции Files проекта:

_VFP.ActiveProject.Files('ArrayShow.scx').Modify

Метод вернет .T., если действие выполнено, или .F. – в противном случае.