Пример создания простой формы
? Код — используется в качестве первичного ключа и имеет тип Integer;
? Фамилия, Имя, Отчество, Телефон, Индекс, Страна, Город, Адрес — текстовые поля;
? Дата рождения — поле типа TDateField;
? Пол — поле типа Boolean.
Для отображения текстовых полей и поля Дата рождения будем использовать компоненты TDBEdit. Логические поля удобнее отображать с помощью флажков — компонентов TDBCheckBox. Кроме того, на форму необходимо поместить компонент TDBNavigator для навигации по набору данных, а также несколько компонентов TLabel, с помощью которых мы будем пояснять назначение полей ввода. Последовательность действий при создании простых форм будет примерно следующей.
1. Для создания нового приложения выполните команду File ► New ► VCL Forms Application. Так как мы работаем только с одной таблицей, то использовать модуль не имеет смысла, и компоненты доступа к данным можно поместить прямо на форму.
2. Разместите на форме компонент ТТаЫе. Затем перейдите в палитре компонентов на вкладку Data Access и установите на форму KOMnoHeHTTDataSource. Последний необходим для связи набора данных с компонентами визуализации данных.
3. Теперь подключите к компоненту ТТаЫе таблицу Физические лица базы данных Sales. Как это сделать, описано в главе 9.
4. Выделите на форме компонент ТТаЫе и в поле ввода свойства TableName в инспекторе объектов укажите имя используемой таблицы — Физические лица.
Следующий этап — настройка источника данных TDataSource. Чтобы связать источник данных с набором данных, используется свойство DataSet.
5. С помощью инспектора объектов укажите в свойстве DataSet имя объекта ТТаЫе (по умолчанию — Table!).
6. Разместите на форме необходимые элементы управления и выполните их настройку. Примерный вариант размещения компонентов показан на рис. 10,5.
Рис. 10.5. Пример размещения элементов управления на простой форме |
7. Для настройки элементов визуализации полей базы данных (девять полей DBEdit и флажок TDBCheckBox) и элемента навигации по набору данных (TDBNa- vigator) отредактируйте в инспекторе объектов их свойство DataSource. Затем укажите имя источника данных (по умолчанию — DataSourcel) и имя поля набора данных, с которым связывается элемент отображения и редактирования данных.
Осталось написать процедуры открытия и закрытия набора данных. Набор данных должен открываться при запуске приложения и закрываться при его завершении. Для открытия набора данных используется метод Open класса ТТаЫе, для закрытия — метод Close того же класса.
8. Вызовите метод Open в обработчике события OnShow главной формы, а метод Close — в обработчике OnClose. Текст модуля разработанной формы приведен в листинге 10.1.
9. Откомпилируйте и запустите программу. Внешний вид окна программы приведен на рис. 10.6.
Листинг 10.1. Главный модуль приложения с простой формой для ввода данных
unit Unitl:
interface
uses
Windows. Messages. SysUtils. Classes. Graphics, Controls. Forms, Dialogs, ExtCtrls, DBCtrls. StdCtrls, Mask, Db;
type
TfrmSimple = class(TForm)
Label 1: TLabel:
DBEditl: TDBEdit:
DBEdit2: TDBEdit:
DBEdit3: TDBEdit;
Label2: TLabel:
Label3: TLabel:
DBEdit4: TDBEdit:
DBCheckBoxl: TDBCheckBox;
Label4: TLabel:
DBEdit5: TDBEdit:
DBEdit6: TDBEdit:
DBEdit7: TDBEdit:
DBEdit8: TDBEdit:
. DBEdit9: TDBEdit;
Tablet: TTable;
DataSourcel: TDataSource:
DBNavigatorl: TDBNavigator; procedure FormShowCSender: TObject); procedure FormCloseCSender: TObject; var Action:TCloseAction); private
{ Private declarations } public
{ Public declarations } end;
var
frmSimple: TfrmSimple: implementation {$R *.DFM}
procedure TfrmSimple.FormShowCSender: TObject): begin
Tablet.Open; end:
procedure TfrmSimple.FormCloseCSender: TObject;
var Action: TCloseAction): begin
Tablet.Close end:
end.
Еще по теме Пример создания простой формы:
- Простой пример.
- III. 1. 1. Простейшие формы вербальных описаний.
- Простой пример из обычной жизни. Авторское отступление.
- Простой пример из обычной жизни. Авторское отступление.
- Простой пример графической ректификации, используя карту страны
- § 7 Совершение брака. – Необходимость определительной формы брака. – Римская форма. – Христианское венчание. – Германские народные формы брака. – Неопределительность формы брака и брачного суда на Западе. – Новый взгляд на брак в лютеранской церкви. – Постановление Тридентского собора о форме брака. – Церковный обряд брака у лютеран. – Начало гражданской формы брака в Англии. – Шотландские браки. – Гражданский брак во Франции. – Принятие этой формы в других государствах. – Гражданская форма брач
- Примеры жестокости по отношению к другим (эти примеры более всего относятся к семейной жизни):
- 3. Формы, порядок совершения завещания Формы завещания:
- § 37 История вотчинной записки в России. – Явка актов в приказах. – Справка. – Юридическое и финансовое ее значение. – Аналогия нашей формы с западными. – Изменение старой формы при Петре I. – Новый крепостной порядок и новое значение справки и отказа. – Форма нового отказа и ввода во владение
- § 68 Личная и вещественная ответственность по взысканию. – Сущность закладного права. – Первые его формы у римлян. – Меновая форма залога в новых законодательствах. – Ипотека. – Форма ее в римском и в новых законодательствах. – Ручной заклад. – Английские формы залога. – Одностороннее удержание движимого имущества в обеспечение
- § 60 Сущность договора о сообществе. – Формы римского права и новых законодательств. – Полное и неполное общение. – Участие и соотношение членов. – Ответственность. – Действие смерти и несостоятельности. – Выход членов. – Расторжение. – Главные формы нового права. – Полное товарищество. – Отношение членов. – Раздел прибылей. – Товарищество на вере. – Закрытое товарищество.
- § 8 Значение формы в договоре. – Римская стипуляция и правила иностранных законодательств. – Историческое значение формы в русском законодательстве. – Правила о совершении актов. – Отсутствие руководящего начала. – Колебания судебной прак- тики и наклонность ее к формализму. – Значение явки в актах договора. – Домашние акты. – Словесные соглашения. – Можно ли доказывать их свидетелями? – Гербовый сбор.
- 1. Виды простых товариществ
- 14.8.2. Традиция создания инструментов
- §10. СОЗДАНИЕ ЮРИДИЧЕСКОГО ЛИЦА
- 1. Условия договора простого товарищества
- 2. Создание и управление учреждением
- 5.4. НЕ СДЕРЖИВАЙТЕСЬ, А ПРОСТО ОТКЛЮЧАЙТЕ!
- ПОЛЬЗУЙТЕСЬ ПРОСТЫМ ЯЗЫКОМ
- 2. Простое торговое (коммерческое) товарищество