Class TForm2 (unit Unit2)

Inherits from

TForm

Constructors



Functions

procedure BBDeleteClick(Sender: TObject);

Get params of the Alias

procedure BitBtn1Click(Sender: TObject);

To update the Path and type of Driver

procedure BitBtn2Click(Sender: TObject);

To update the Alias list

procedure CbTipoTablaChange(Sender: TObject);


procedure Directory1Change(Sender: TObject);

Get params by default of the driver

procedure EditNewAliasExit(Sender: TObject);

Browse the path

procedure FormShow(Sender: TObject);

OleAuto.

procedure ListBoxAliasClick(Sender: TObject);

Select Driver dBase or Paradox when the driver is Standard

procedure RBdBaseClick(Sender: TObject);


Properties

Events

Variables

BBDelete : TBitBtn;


BitBtn1 : TBitBtn;


BitBtn2 : TBitBtn;


CbTipoTabla : TComboBox;


Directory1 : TDirectoryListBox;


DriveComboBox1 : TDriveComboBox;


EditNewAlias : TEdit;


GroupBox1 : TGroupBox;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label6 : TLabel;


ListBoxAlias : TListBox;


Memo1 : TMemo;


RBdBase : TRadioButton;


RBParadox : TRadioButton;


sAlias : String;


sPath : String;

Private declarations

sType : String;



Constructors


Functions


procedure BBDeleteClick(Sender: TObject);

Get params of the Alias


procedure BitBtn1Click(Sender: TObject);

To update the Path and type of Driver


procedure BitBtn2Click(Sender: TObject);

To update the Alias list


procedure CbTipoTablaChange(Sender: TObject);


procedure Directory1Change(Sender: TObject);

Get params by default of the driver


procedure EditNewAliasExit(Sender: TObject);

Browse the path


procedure FormShow(Sender: TObject);

OleAuto.*, Ole2.*, OleCtl.*, in \Delphi\Source\... {$R *.DFM


procedure ListBoxAliasClick(Sender: TObject);

Select Driver dBase or Paradox when the driver is Standard


procedure RBdBaseClick(Sender: TObject);


Properties


Events


Variables


BBDelete : TBitBtn;


BitBtn1 : TBitBtn;


BitBtn2 : TBitBtn;


CbTipoTabla : TComboBox;


Directory1 : TDirectoryListBox;


DriveComboBox1 : TDriveComboBox;


EditNewAlias : TEdit;


GroupBox1 : TGroupBox;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label6 : TLabel;


ListBoxAlias : TListBox;


Memo1 : TMemo;


RBdBase : TRadioButton;


RBParadox : TRadioButton;


sAlias : String;


sPath : String;

Private declarations


sType : String;