uses
Windows, Messages, SysQtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ExtCtrls, DBCtrls, Grids, DBGrids;
type
TFormUsers = class {ТForm)
DBNavigator: TDBNavigator;
DBGrid: TDBGrid;
ButtonClose: TButton;
procedure ButtonCloseClick(Sender: TObject);
end;
var
FormUsers: TFormUsers;
Implementation
uses
Data;
{$R *.DFM}
procedure TFormUsers.ButtonCloseClick(Sender: TObject);
begin // Закрыть форму
Close;
end;
end.
Вопросы и задания для самостоятельной работы
1. Как скрыть поле таблицы от пользователя?
2. Какие бывают типы полей в таблицах? Что означает автоинкрементный тип? Как создаются справочные поля?
3. Как отобразить содержимое таблицы в форме? Какие компоненты нужны для этого?
4. Что такое «курсор» таблицы? Для чего используются в нашей задаче два компонента TTable, связанных с одной физической таблицей? Как устанавливается связь «главный-подчинённый»?
5. Для чего компоненты для работы с базами данными вынесены в отдельный модуль? Можно ли их разместить на главной форме?
6. Как назначить свойство (например DataSource у TDBGrid) указывающим на компонент, находящийся в другой форме?
7. Для чего используются индексы (ключи) в таблицах?
8. Как создать таблицу в Database Desktop?