Class T_dlgSql (unit SQLExec)

Inherits from

TForm

Constructors



Functions

procedure cbAliasChange(Sender: TObject);


procedure ClearCaption(Sender: TObject);


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


procedure FormCreate(Sender: TObject);


procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure SQLRun(Sender: TObject);

======== TformSql ==========

Properties

property IsActive : Boolean

Public declarations

Events

Variables

cbAlias : TComboBox;


DBGrid : TDBGrid;


dsQuery : TDataSource;


FormStorage : TFormStorage;


Label1 : TLabel;


memSql : TMemo;


Panel1 : TPanel;


pnlRun : TPanel;


pnlTop : TPanel;


Query : TQuery;


RxSplitter1 : TRxSplitter;


SpeedButton1 : TSpeedButton;


StatusBar : TPanel;


FIsActive : boolean;

Private declarations


Constructors


Functions


procedure cbAliasChange(Sender: TObject);


procedure ClearCaption(Sender: TObject);


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


procedure FormCreate(Sender: TObject);


procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);


procedure SQLRun(Sender: TObject);

======== TformSql ==========


Properties


property IsActive : Boolean

Public declarations


Events


Variables


cbAlias : TComboBox;


DBGrid : TDBGrid;


dsQuery : TDataSource;


FormStorage : TFormStorage;


Label1 : TLabel;


memSql : TMemo;


Panel1 : TPanel;


pnlRun : TPanel;


pnlTop : TPanel;


Query : TQuery;


RxSplitter1 : TRxSplitter;


SpeedButton1 : TSpeedButton;


StatusBar : TPanel;


FIsActive : boolean;

Private declarations