| Class TCreateIndexForm (unit CreateIndexFrm) |
TForm
| Constructors |
| Functions |
procedure CreateButClick(Sender: TObject);
procedure ExcAllBtnClick(Sender: TObject);
procedure ExcludeBtnClick(Sender: TObject);
procedure FormShow(Sender: TObject);
function GetFirstSelection(List: TCustomListBox): Integer;
procedure IncAllBtnClick(Sender: TObject);
procedure IncludeBtnClick(Sender: TObject);
procedure MoveSelected(List: TCustomListBox; Items: TStrings);
procedure SetButtons;
procedure SetItem(List: TListBox; Index: Integer);
procedure UpdateIdxName;| Properties |
| Events |
| Variables |
CancelBtn : TButton;
CaseBox : TCheckBox;
CreateBut : TButton;
DescendBox : TCheckBox;
DstLabel : TLabel;
DstList : TListBox;
ExAllBtn : TSpeedButton;
ExcludeBtn : TSpeedButton;
GroupBox1 : TGroupBox;
IncAllBtn : TSpeedButton;
IncludeBtn : TSpeedButton;
Label1 : TLabel;
Label2 : TLabel;
NameEdit : TEdit;
SrcLabel : TLabel;
SrcList : TListBox;
UniqueBox : TCheckBox;
Table : TTable;| Constructors |
| Functions |
procedure CreateButClick(Sender: TObject);
procedure ExcAllBtnClick(Sender: TObject);
procedure ExcludeBtnClick(Sender: TObject);
procedure FormShow(Sender: TObject);
function GetFirstSelection(List: TCustomListBox): Integer;
procedure IncAllBtnClick(Sender: TObject);
procedure IncludeBtnClick(Sender: TObject);
procedure MoveSelected(List: TCustomListBox; Items: TStrings);
procedure SetButtons;
procedure SetItem(List: TListBox; Index: Integer);
procedure UpdateIdxName;| Properties |
| Events |
| Variables |
CancelBtn : TButton;
CaseBox : TCheckBox;
CreateBut : TButton;
DescendBox : TCheckBox;
DstLabel : TLabel;
DstList : TListBox;
ExAllBtn : TSpeedButton;
ExcludeBtn : TSpeedButton;
GroupBox1 : TGroupBox;
IncAllBtn : TSpeedButton;
IncludeBtn : TSpeedButton;
Label1 : TLabel;
Label2 : TLabel;
NameEdit : TEdit;
SrcLabel : TLabel;
SrcList : TListBox;
UniqueBox : TCheckBox;
Table : TTable;Public declarations