Читайте данную работу прямо на сайте или скачайте

Работ с Базами данных в Delphi

unit Unit2;

interface

uses

а Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

а StdCtrls;

type

а TForm2 = class(TForm)

Label1: TLabel;

Edit1: TEdit;

Edit2: TEdit;

Edit3: TEdit;

Edit4: TEdit;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

Label5: TLabel;

Label6: TLabel;

Edit5: TEdit;

Button1: TButton;

а private

{ Private declarations }

а public

{ Public declarations }

а end;

var

а Form2: TForm2;

implementation

{$R *.DFM}

end.