Реферат: База данных Бюро знакомств

Dialogs, StdCtrls, DBCtrls, Grids, DBGrids, Buttons, ExtCtrls, DB,

DBTables;

type

TForm3 = class(TForm)

DataSource1: TDataSource;

Table1: TTable;

Panel1: TPanel;

DBGrid1: TDBGrid;

DBMemo1: TDBMemo;

DBMemo2: TDBMemo;

Button1: TButton;

Button2: TButton;

Label1: TLabel;

Label2: TLabel;

Edit1: TEdit;

Label3: TLabel;

procedure FormCreate(Sender: TObject);

procedure BitBtn1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Edit1Change(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form3: TForm3;

implementation

{$R *.dfm}