Дипломная работа: Автоматизированная система учета по подключению Интернет-сети в РУП "Белтелеком"

unit Unit11;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, ExtCtrls, DB, DBTables, Grids, DBGrids, Menus, DBCtrls;

type

TForm11 = class(TForm)

DataSource1: TDataSource;

DBGrid1: TDBGrid;

Table1: TTable;

RadioGroup1: TRadioGroup;

Button1: TButton;

Edit1: TEdit;

Edit2: TEdit;

Edit3: TEdit;

MainMenu1: TMainMenu;

N1: TMenuItem;

Button2: TButton;

Label1: TLabel;

DBNavigator1: TDBNavigator;

procedure Button1Click(Sender: TObject);

procedure N1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

private

{ Private declarations }

Public

{ Public declarations }

end;

var