6.1.6. Разработка основной формы и ее компонентов для работы с бд
6.1.6.1. Размещение и настройка основных компонентов
Сохранить проект в созданном каталоге.
Разместить на основной форме компоненты: TTable, TQuery (3 штуки), TDataSource, TDBGrid, TDBNavigator, TMainMenu. Установить свойство формы:
Caption = Работа с локальной базой данных со сведениями о студентах
Установить выбором из списков свойства компонентов:
1) Table1: DataBaseName = STUD; TableName = Stud1.db; IndexFieldNames = имя поля для индекса - для сортировки по нему записей при их выводе в DBGrid1; например, IndexFieldNames = NZ; Active = True;
2) Query1, Query2, Query3: DataBaseName = STUD; их свойство DataSource оставить в виде пустой строки;
3) DataSource1:Data Set = Table1;
4) DBGrid1, DBNavigator1: Data Source = DataSource1.
Разместить на форме:
- В свойстве Hints компонента DBNavigator1 установить тексты подсказок на русском языке.
- компонент типа TTimer для показа текущего значения времени,
- компонент типа TStatusBar.
Сформировать на компоненте StatusBar1 3 панели. Для этого вызвать EditingStatusBar1.Panels - редактор панелей. Установить их свойств; Text в соответствии с текстами, приведенными на рис. 6.3.
Для вывода подсказок в нулевую панель компонента StatusBar1 установить для компонента StatusBar1 свойство AutoHint = True.
Рис. 6.3. Вид редактора панелей компонента StatusBar1
6.1.6.2. Размещение и настройка панелей
Для управления процессом отбора и поиска данных разместить на форме3 панели:
Panel1 - для размещения на ней компонентов для ввода фамилии для поиска:
- метки с текстом: ‘Введите ФИО и нажмите кнопку Искать’;
- окна Edit1 - для ввода требуемой фамилии; установить его свойство Text = ‘Иванов И. И.’;
- кнопки типа TButton; установить ее свойство Caption = Искать;
- Panel2 - для размещения на ней компонентов для ввода номера зачетки или размера стипендии для поиска:
- метки с текстом ‘Введите номер зачетки и дважды щелкните в окне’;
- MaskEdit1 - окно для ввода требуемого значения номера зачетки или размера стипендии; установить свойства: EditMask = 999;0;и свойство Text =170;
- Panel3 - для размещения на ней компонентов для ввода фамилии для постепенного поиска;
- метки с текстом ‘Вводите фамилию: по завершении - двойной щелчок в окне:’;
- окна Edit2 - для ввода фамилии для постепенного поиска.
Установить свойства всех трех панелей Visible = False. Таким образом, при запуске приложения все панели скрыты. Они становятся видимыми только при выборе соответствующих пунктов меню.
Вид формы после размещения и настройки всех ее компонентов дан на рис. 6.4. Текст модуля основной формы представлен в листинге 6.1.
Рис. 6.4. Вид формы после установки и настройки всех ее компонентов.
6.1.6.3. Настройка компонента dbGrid1
Установить состав столбцов каждой строки таблицы компонента DBGrid1 можно с помощью ее дизайнера. Для вызова дизайнера EditingDBGrid1.Columns надо на компоненте DBGrid1 щелкнуть дважды левой кнопкой или правой кнопкой вызвать всплывающее меню, а в нем - пункт FieldsEditor. Вызвать всплывающее меню дизайнера и выбрать команду AddAllFields. В окне редактора появятся все поля записи БД. Подсветить и удалить графическое поле FOTO. В окне DBGrid1 появятся все неудаленные поля таблицы.
Сформировать дизайн компонента DBGrid1: шрифт и цвет фона заголовков и данных его столбцов. Для этого надо в дизайнере EditingDBGrid1.Columns выбрать имя одного из полей записи. В окне инспектора объектов появится список свойств столбца этого поля. Можно редактировать, например, цвет (Color) фона и шрифт (Font) данных его столбца, а в его свойстве ‘+Title’ - текст (Caption), цвет (Color) фона и шрифт (Font) заголовка столбца.
Запустить приложение на выполнение и проверить возможность создания и корректировки текстовых элементов записей базы данных. Создать несколько записей БД.