Разработка главной формы
Начните новый проект и измените следующие свойства пустой формы, заданные по умолчанию:
Caption = 'Накладные на книги1 Name = 'fmNakls'
После изменения свойств сразу сохраните модуль в специально отведенной для этого папке под именем fmNaklsU, а проект — под именем Nakls.
Поместите на форму две панели TPanel, поместите в их свойства Align значения alBottom: самая нижняя из них предназначена для размещения кнопок навигатора и кнопки закрытия программы, а расположенная над ней — для размещения сетки DBGrid, в которой будет отображаться список книг. Чтобы пользователь программы мог менять высоту этой панели, поместите на пустую часть формы вешку разбивки TSplitter (вкладка Additional палитры компонентов), в ее свойство Align поместите значение alBottom, в свойство Beveled — True и в свойство Height — 5. Поместите на форму еще одну панель и установите в ее свойство Align значение alClient — на этой панели будет расположена сетка DBGrid с данными о накладных.
Поместите на верхнюю и среднюю панели по компоненту TDBGrid (вкладка Data Controls) и в их свойство Align установите значение alClint.
Рис. 1.12. Главное окно программы на этапе разработки
Очистите свойство Caption у самой нижней панели и поместите на нее кнопки навигатора БД TDBNavigator (вкладка Data Controls) и кнопку TBitBtn (вкладка Additional). Навигатор расположите у левого края панели, а кнопку — у правого. Раскройте список свойства Anchors кнопки и выровняйте навигатор по правому краю: поместите False в свойство akLef t и True в свойство akRight. В свойство Kind кнопки поместите значение bkClose. Вид окна к этому моменту показан на рис. 1.12.
Сохраните все сделанные вами изменения модуля главной формы на диске.
Дата добавления: 2015-04-15; просмотров: 587;