spinner2 – сессия.eczam2.




Практическая работа №3

Часть 2

"Создание форм"

1. Создайте форму с помощью конструктора форм:

Ø откройте ранее созданный проект с помощью меню File;

Ø на вкладке Documents выберите группу Form, нажмите кнопку New окна проекта, затем кнопку NewForm. Откроется окно конструктора форм и окно свойств таблицы "Анкета".

Ø задайте среду окружения формы. Для этого из меню View выберите команду Data Environment. Откроется окно окружения формы Data Environment и диалоговое окне Add Table or View.

Ø в открывшемся диалоговом окне Add Table or View выберите из списка таблиц открытой базы данных таблицу "Анкета" и нажмите кнопку Add. Затем нажмите кнопку Close окна Add Table or View для его закрытия;

Ø выделите свойство Order. В поле коррекции свойства нажмите кнопку открытия списка и выберите из него индекс nom для упорядочения данных;

Ø закройте окно определения среды окружения.

2. Разместите объекты в форме, используя построитель форм:

Ø запустите построитель форм, выбрав команду Builder контекстного меню формы. Откроется диалоговое окно Form Builder;

Ø на вкладке Field Selection из нижнего списка области Databases and tables выберите таблицу "Анкета". Из списка Available fields перенесите в Selected fields все поля таблицы, используя кнопку с двойной стрелкой;

Ø на вкладке Style задайте стиль оформления объектов формы, выбрав из списка значение Embossed. Нажмите кнопку Ok. В форме будут размещены поля и надписи к ним;

3. Настройте параметры формы:

Ø в окне Properties скорректируйте свойство Caption, введя в текстовое поле заголовок формы «Анкета»;

Ø задайте цвет фона формы, используя свойство BackColor;

Ø для свойства AutоCenter установите значение True;

Ø измените свойство Caption для всех надписей в форме:

fio – Фамилия И.О.;

group – Группа;

g_rogd – Год рождения;

Address – Адрес.

Растяните рамку вокруг названий полей и:

Ø измените шрифт надписей, используя свойство FontName;

Ø измените размер букв с помощью свойства FontSize;

Ø измените цвет надписей с помощью свойства ForeColor;

Ø если надписи не умещаются в отведенное для них поле, растяните его границы. Для этого, удерживая клавишу Shift, нажимайте клавиши управления курсором "вниз" и "вправо";

Ø в нижней части окна формы создайте пять кнопок. Для этого нажмите кнопку Command Button на панели инструментов Form Controls (если данная панель отсутствует на экране, выберите в меню View команду Form Controls Toolbar) и щелкните мышью в месте предполагаемого размещения кнопки. В форме появится объект, в названии которого содержится слово Command1. Растяните этот объект до нужных размеров (щелкнуть мышью на маркере и, не отпуская ее, растянуть). Аналогично создайте все остальные кнопки.

Ø для каждой кнопки скорректируйте свойство Caption, разместив в поле ввода следующие значения:

Command1 – Первая;

Command2 – Следующая;

Command3 – Предыдущая;

Command4 – Последняя;

Command5 – Выход

Ø измените шрифт, размер, цвет, начертание текста на кнопках, используя соответственно свойства FontName, FontSize, ForeColor, FontBold;

Ø определите действия, выполняемые при нажатии на каждую из этих кнопок. Для этого щелкните дважды по кнопке "Первая". Откроется окно процедур, куда необходимо ввести соответствующие команды. Для открытия окна процедур остальных кнопок нужно из первого раскрывающегося списка, расположенного в верхней части окна, выбрать соответственно значения Command2, Command3, Command4, Command5, (также можно закрыть окно процедур первой кнопки и в форме дважды щелкнуть по другой кнопке). В окне процедур введите команды, приведенные на листе «Процедуры обработки событий нажатия кнопок».

4. Сохраните форму, присвоив ей имя "Анкета2 ".

5. Запустите форму "Анкета2" на выполнение, проверьте что происходит при нажатии на кнопки. Сделайте вывод, для чего может быть использована данная форма.

6. Откройте форму для таблицы "Сессия".

7. Измените объекты формы:

Ø выделите поле ввода nom, расположенное напротив надписи Номер, и удалите его, нажав клавишу Delete;

Ø на его месте создайте раскрывающийся список с помощью кнопки Combo Box панели инструментов Form Controls;

Ø задайте свойства этого объекта при помощи построителя: вызовите на нем контекстно-зависимое меню и выберите пункт Builder.

Ø в окне построителя на вкладке ListItems укажите источник данных, т.е. поле таблицы, откуда берутся исходные значения поля nom для таблицы «Сессия ». Для этого в первом окне выберите «Анкета », из окна Available fields при помощи кнопки со стрелкой перенесите поле nom в окно Selected fields.

Ø перейдите на вкладку Value. В верхнем окне будет указано имя поля откуда берутся значения (nom), в нижнем окне укажите поле куда помещаются значения (в раскрывающемся списке выберите сессия.nom).

Ø аналогично удалите поле fio и на его месте создайте раскрывающийся список с помощью кнопки ComboBox и построителя.

Ø удалите поля eczam1, eczam2 и на их месте создайте счетчик с помощью кнопки Spinner панели инструментов Form Controls;

Ø в окне свойств в поле ввода свойства ControlSourse из списка выберите поле таблицы, для которой создаете счетчик:

spinner1 – сессия.eczam1;

spinner2 – сессия.eczam2.

Ø используя свойство SpinnerHighValue, задайте наибольшее значение счетчиков (5), а с помощью свойства SpinnerLowValue – наименьшее значение (2). Аналогичные значения задайте для свойств KeyboardHighValue (5) и KeyboardLowValue (2);

Ø для кнопок управления задайте русские названия при помощи свойства Caption.

8. Запустите на выполнение форму «Сессия».

9. Пролистайте имеющиеся записи в таблице. Измените значения полей Экзамен1 и Экзамен2 для некоторых студентов, которые были добавлены только в таблицу «Анкета ».

10. Выйдите из формы с сохранением всех данных.

11. Откройте таблицу «Сессия» и обратите внимание на произошедшие изменения.

12. В структуру таблицы «Анкета » добавьте поле Договор логического типа.

13. Откройте форму «Анкета», созданную с помощью мастера.

14. Добавьте в нееобъект CheckBox панели инструментов Form Controls. В окне свойств для свойства Caption укажите значение Договор, а для свойства ControlSource при помощи выпадающего списка в поле ввода укажите поле анкета.dogovor.

15. Запустите на выполнение форму «Анкета» и установите флажки у некоторых студентов, которые учатся по договору. (для того, чтобы установить флажок нужно: нажать кнопку Edit(изменить), установить флажок, а затем нажать кнопку Save(сохранить))

16. Закройте форму, откройте таблицу «Анкета» и посмотрите на результаты своих действий.

17. Закройте проект.

18. Закройте приложение.

 

Процедуры обработки событий нажатия кнопок

 

Для кнопки Первая:

 

*Переходим на первую запись и обновляем информацию в форме

IF!BOF()

GO TOP

ENDIF

_screen.ActiveForm.Refresh()

 

Для кнопки Следующая:

 

*Переходим на следующую запись и обновляем информацию в форме

IF!EOF()

SKIP

ENDIF

_screen.ActiveForm.Refresh()

 

Для кнопки Предыдущая:

 

*Переходим на предыдущую запись и обновляем информацию в форме

IF!BOF()

SKIP -1

ENDIF

_screen.ActiveForm.Refresh()

 

Для кнопки Последняя:

 

*Переходим на последнюю запись и обновляем информацию в форме

IF!EOF()

GO BOTTOM

ENDIF

_screen.ActiveForm.Refresh()

 

Для кнопки Выход:

 

*Запрашиваем и выходим, если Да

IF MESSAGEBOX(«Выходить из формы?», 4+32+256, «Выход»)=6

_screen.ActiveForm.Release()

ELSE

_screen.ActiveForm.Refresh()

ENDIF

 



Поделиться:




Поиск по сайту

©2015-2024 poisk-ru.ru
Все права принадлежать их авторам. Данный сайт не претендует на авторства, а предоставляет бесплатное использование.
Дата создания страницы: 2018-01-08 Нарушение авторских прав и Нарушение персональных данных


Поиск по сайту: