Class TAddArchive (unit Aarc)

Inherits from

TForm

Constructors



Functions

procedure BitBtn1Click(Sender: TObject);


procedure BitBtn2Click(Sender: TObject);


procedure Button1Click(Sender: TObject);


procedure ELevelChange(Sender: TObject);


procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure FormCreate(Sender: TObject);


Properties

Events

Variables

ArchCatagoryID : TDBEdit;


ArchDate : TDBEdit;


ArchDescription : TDBMemo;


ArchImportance : TDBEdit;


ArchName : TDBEdit;


ArchSize : TDBEdit;


ArchStorage : TDBEdit;


Bevel1 : TBevel;


BitBtn1 : TBitBtn;


BitBtn2 : TBitBtn;


Button1 : TButton;


CatagoryID : TDBEdit;


CatagoryName : TDBEdit;


DataSource1 : TDataSource;


DataSource2 : TDataSource;


DataSource3 : TDataSource;


DBText1 : TDBText;


DBText2 : TDBText;


EDate : TMaskEdit;


EDescription : TMemo;


ELevel : TSpinEdit;


EName : TEdit;


ESize : TEdit;


EStorage : TEdit;


Label1 : TLabel;


Label10 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


Label6 : TLabel;


Label7 : TLabel;


Label8 : TLabel;


Label9 : TLabel;


OpenDialog1 : TOpenDialog;


RxDBGrid1 : TRxDBGrid;


RxDBGrid2 : TRxDBGrid;


Table1 : TTable;


Table1TopicID : TIntegerField;


Table1TopicName : TStringField;


Table2 : TTable;


Table2CatagoryID : TIntegerField;


Table2CatagoryName : TStringField;


Table2TopicID : TIntegerField;


Table3 : TTable;


Table3ArchiveName : TStringField;


Table3ArchiveStorage : TStringField;


Table3CatagoryID : TIntegerField;


Table3Date : TDateField;


Table3Description : TMemoField;


Table3FileID : TIntegerField;


Table3Importance : TSmallintField;


Table3Size : TIntegerField;


TopicName : TDBEdit;



Constructors


Functions


procedure BitBtn1Click(Sender: TObject);


procedure BitBtn2Click(Sender: TObject);


procedure Button1Click(Sender: TObject);


procedure ELevelChange(Sender: TObject);


procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure FormCreate(Sender: TObject);


Properties


Events


Variables


ArchCatagoryID : TDBEdit;


ArchDate : TDBEdit;


ArchDescription : TDBMemo;


ArchImportance : TDBEdit;


ArchName : TDBEdit;


ArchSize : TDBEdit;


ArchStorage : TDBEdit;


Bevel1 : TBevel;


BitBtn1 : TBitBtn;


BitBtn2 : TBitBtn;


Button1 : TButton;


CatagoryID : TDBEdit;


CatagoryName : TDBEdit;


DataSource1 : TDataSource;


DataSource2 : TDataSource;


DataSource3 : TDataSource;


DBText1 : TDBText;


DBText2 : TDBText;


EDate : TMaskEdit;


EDescription : TMemo;


ELevel : TSpinEdit;


EName : TEdit;


ESize : TEdit;


EStorage : TEdit;


Label1 : TLabel;


Label10 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


Label5 : TLabel;


Label6 : TLabel;


Label7 : TLabel;


Label8 : TLabel;


Label9 : TLabel;


OpenDialog1 : TOpenDialog;


RxDBGrid1 : TRxDBGrid;


RxDBGrid2 : TRxDBGrid;


Table1 : TTable;


Table1TopicID : TIntegerField;


Table1TopicName : TStringField;


Table2 : TTable;


Table2CatagoryID : TIntegerField;


Table2CatagoryName : TStringField;


Table2TopicID : TIntegerField;


Table3 : TTable;


Table3ArchiveName : TStringField;


Table3ArchiveStorage : TStringField;


Table3CatagoryID : TIntegerField;


Table3Date : TDateField;


Table3Description : TMemoField;


Table3FileID : TIntegerField;


Table3Importance : TSmallintField;


Table3Size : TIntegerField;


TopicName : TDBEdit;