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

ТЕМА: просмотр табличных данных с помощью сетки в системе программирования Delphi

ЦЕЛЬ: Изучить основные свойства компонентов для просмотра табличных данных с помощью сетки в среде Delphi

Краткие теоретические сведения

Для отображения табличных данных в виде сетки поместите на форму сетку данных (компонент DBGrid) и установите ее свойство DataSource рав­ным источнику данных, связанному с таблицей. Если вы сделали таблицу активной во время разработки, то тотчас сможете увидеть данные в сетке. Сетка данных имеет много общих свойств с сеткой строк (компонент StringGrid) и сеткой изображений (компонент DrawGrid), поэто­му рассмотри свойствах, присущие только сетке данных.

Свойство Options состоит из нескольких True/False-подсвойств. Свойство dgTitles управляет тем, появятся или нет имена полей в качестве заголовков столб­цов, a dgIndicator — присутствует или нет в левой части сетки индикатор текущей строки. Для того чтобы удалить информацию о текущей строке, можно нажать <Ctrl+Del>. Если при этом dgConfirmDelete установлено равным True, то сетка за­просит сначала подтверждение.

Используя свойство TitleFont, можно устанавливать шрифты для всех заголов­ков в отдельности. Если сетка содержит данные, то можно перетаскивать заголовки столбцов, чтобы изменить их порядок, или же можно перемещать линии между столбцами, изменяя их размеры.

- 16 -

По умолчанию сетка данных отображает поля в порядке их следования в табли­це, причём в качестве заголовков столбцов будут выступать имена полей. Однако нет необходимости беспокоиться по этому поводу. Щёлкните дважды на таб­лице, и появится окно конструктора расположения данных Dataset Designer. Используя это окно, можно проверить, какие поля и в каком виде будут отображены.

Связав сетку данных со структурой таблицы с помощью окна конструк­тора расположения данных Dataset Designer, вы сможете наблюдать за результатами проведенных вами изменений.

Ход работы

Упражнение 5

1. Разместите на новой форме таблицу (компонент Table; Name – Table1), источник данных (компонент DataSource; Name – DataSource1) и сетку данных (компонент DBGrid; Name – DBGrid1) и объедините их в цепь: источник данных свяжите с таблицей (свойству DataSet компонента DataSource присвоить значение Table1 – Name компонента Table), а сет­ку — с источником данных (свойству DataSource компонента DBGrid присвоить значение DataSource1 - Name компонента DataSource).

2. Выберите для компонента Table в качестве базы данных псевдоним DBDemos (свойству DatabaseName присвоить значение DBDemos) и установите свойство TableName равным COUNTRY.DB.

3. Установите свойство таблицы Active равным True.

4. Установите свойство сетки Align равным alBottom.

5. на форме щёлкните дважды на таблице – компонент Table1 (или же щёлкните на форме правой кнопкой мыши на компоненте Table1 и в появившемся меню выберите Fields Editor - редактор полей).

6. Щ

   - 17 -

   ёлкните правой кнопкой мыши на появившемся пустом окне (список редактора полей – Fields Editor) и выберите пункт Add fields (Добавить поля) из появившегося всплывающего меню.

7. Выделите пару полей, затем щёлкните на кнопке ОК. В сетке появятся только добавленные вами поля. Для того чтобы изменить порядок полей, перетаскивайте их вверх и вниз по списку (нажмите левую кнопку мыши на перетаскиваемом поле и, не отпуская копку, передвигайте в нужном направлении, а затем отпустите).

8. Снова щёлкните правой кнопкой мыши на окне с выбранными в п. 7 полями, выберите пункт Add fields (Добавить поля) из появившегося всплывающего меню (см. п. 6) и внесите оставшиеся поля, нажав кнопку ОК. Теперь список редактора полей (Fields Editor) будет включать все поля. Чтобы удалить какое-нибудь поле, нужно его выделить (в окне редактора полей) и нажать клавишу <Delete>.

Обратите внимание на то, что, когда вы щёлкаете на списке, окно Object Inspector отображает свойства каждого поля. Заполнив свойство DisplayLabel, мож­но установить заголовок столбца для поля или же, воспользовавшись свойством Alignment, выровнять столбец по левому или правому краю либо по центру. Для каждого поля свойство Readonly можно независимо установить в True. При жела­нии вы можете спрятать поле, т. е. запретить его отображение сеткой, установив его свойство Visible равным False. Точный набор имеющихся в наличии свойств зависит от типа поля. Например, числовое поле, предназначенное для чисел с пла­вающей точкой, будет иметь True/False-свойство, отвечающее за представление значения денежной единицы. Строковые поля обладают свойством EditMask, идентичным свойству поля ввода с маской.

Упражнение 6

1. Используя ту же самую форму, перейдите в окно редактора полей (Fields Editor).

2. в

   - 18 -

   ыберите поле Population и установите его свойство Visible равным False.

3. Щёлкните правой кнопкой мыши на окне редактора полей (Fields Editor) и из появившегося меню выберите пункт New field (Новое поле).

4. Введите новое имя поля ShortPop.

5. Из списка ти­пов полей Field type выберите Float и включите режим Calculated (Вычисляемое). Щёлкните на кнопке ОК.

6. Вернувшись в окно редактора полей (Fields Editor), расположите поля таким образом, чтобы первыми тремя были Name, Capital и ShortPop.

7. Выберите ShortPop и установите его свойство DisplayLabel равным Pop. (millions), a DisplayFormat — равным 0.0.

8. Выберите поле Area и установите его свойство DisplayFormat равным ###, ###, ###.

9. Теперь закройте окно редактора полей (Fields Editor).

10. Создайте обработчик событий OnCalcFields для самой таблицы, включив в него следующие строки:

Table1ShortPop.AsFloat :=

Table1Population.AsFloat / 1000000;

11. Запустите программу, и вы увидите названия и столицы разных стран в Амери­ке, сопровождаемые указанием численности населения, выраженной в миллионах. Вы можете изменить столицу США с Washington на Washingtoon.

- 19 -

КОНТРОЛЬНЫЕ ВОПРОСЫ:

1. Какие основные свойства компонента DBGrid?

2. Для чего нужена сетка данных?

3. Какие компоненты визуальной библиотеки использованы в данной работе?

4. Для чего используется свойство DataSet?

5. Как запретить отображение поля сеткой?

6. За что отвечает свойство Col­umns сетки данных?

7. Для чего используется редактор столбцов?

CОДЕРЖАНИЕ ОТЧЕТА

Выполненная работа включает работающие программы, описанные выше и запускаемые с ПК на рабочем месте. Отчет должен содержать наименование работы, цель, ответы на контрольные вопросы, и выводы по выполненной работе.

- 20 -

ПРАКТИЧЕСКАЯ РАБОТА №4

ТЕМА: Управляющие столбцы сетки данных в системе программирования Delphi

ЦЕЛЬ: Изучить основное свойство сетки данных Col­umns

КРАТКИЕ ТЕОРЕТИЧЕСКИЕ СВЕДЕНИЯ

Сетка данных в Delphi 6 имеет одно интересное свойство, названное Col­umns, которое значительно увеличивает наши возможности в деле управления отображением сетки на экране, а также при вводе данных. Свойство Columns относится к так называемым псевдосвойствам. Для работы с ним используется специальное диалоговое окно Columns Editor (Редактор столбцов). Некоторые из возможностей этого окна превосходят воз­можности окна редактора полей (Fields Editor), однако изменения, сделанные в последнем ок­не, распространяются на все компоненты, связанные с таблицей, чего нельзя сказать об окне Columns Editor. Окно Columns Editor позволяет установить по отдельности для каждого столбца и его заголовка шрифт и цвет, а также разрешить использование специального режима ввода данных.