Class TForm1 (unit Scaltest)

Inherits from

TForm

Constructors



Functions

procedure BitBtn1Click(Sender: TObject);


procedure Scaler1GridScale(Grid: TComponent; var HasHScrollBar, HasVScrollBar, HasIndicator, HasTitles, RowLines, ColLines: Boolean; var Rows, Columns: Integer; var HCorrect: THcorrection; var VCorrect: TVcorrection);


Properties

Events

Variables

Bevel4 : TBevel;


BitBtn1 : TBitBtn;


DataSource1 : TDataSource;


DBGrid1 : TDBGrid;


DBGrid2 : TDBGrid;


Edit2 : TEdit;


Label2 : TLabel;


Scaler1 : TScaler;


TabbedNotebook1 : TTabbedNotebook;


Table1 : TTable;


Table1NAME : TStringField;


Table1SIZE : TSmallintField;


Table1WEIGHT : TSmallintField;



Constructors


Functions


procedure BitBtn1Click(Sender: TObject);


procedure Scaler1GridScale(Grid: TComponent; var HasHScrollBar, HasVScrollBar, HasIndicator, HasTitles, RowLines, ColLines: Boolean; var Rows, Columns: Integer; var HCorrect: THcorrection; var VCorrect: TVcorrection);


Properties


Events


Variables


Bevel4 : TBevel;


BitBtn1 : TBitBtn;


DataSource1 : TDataSource;


DBGrid1 : TDBGrid;


DBGrid2 : TDBGrid;


Edit2 : TEdit;


Label2 : TLabel;


Scaler1 : TScaler;


TabbedNotebook1 : TTabbedNotebook;


Table1 : TTable;


Table1NAME : TStringField;


Table1SIZE : TSmallintField;


Table1WEIGHT : TSmallintField;