Class TSrcTableDlg (unit SrcTab)

Inherits from

TForm

Constructors



Functions

procedure AllRecsBtnClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure MapBtnClick(Sender: TObject);


procedure MappingsTabDST_NAMEGetText(Sender: TField; var Text: string; DisplayText: Boolean);


procedure MappingsTabDST_NAMESetText(Sender: TField; const Text: string);


procedure OkBtnClick(Sender: TObject);


procedure SrcNameEditChange(Sender: TObject);


procedure CreateParams(var Params: TCreateParams);


procedure MapTabBeforeDeleteInsert(DataSet: TDataSet);


procedure UpdateFormView;


procedure UpdateMapGrid;


Properties

Events

Variables

AllRecsBtn : TRadioButton;


BottomPanel : TPanel;


CancelBtn : TButton;


dsMappings : TDataSource;


Expanded : TBevel;


FirstRecsBtn : TRadioButton;


FormStorage : TFormStorage;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


MapBtn : TButton;


MapGrid : TRxDBGrid;


MappingsTab : TMemoryTable;


MappingsTabDST_NAME : TStringField;


MappingsTabSRC_NAME : TStringField;


ModeCombo : TComboBox;


OkBtn : TButton;


RecordCntEdit : TCurrencyEdit;


RecordCountBox : TGroupBox;


SrcNameEdit : TFilenameEdit;


TableFields : TTableItems;


TopPanel : TPanel;


FDstTable : TTable;


FExpanded : Boolean;

Private declarations

FMappingsHeight : Integer;


FSrcName : string;



Constructors


Functions


procedure AllRecsBtnClick(Sender: TObject);


procedure FormCreate(Sender: TObject);


procedure MapBtnClick(Sender: TObject);


procedure MappingsTabDST_NAMEGetText(Sender: TField; var Text: string; DisplayText: Boolean);


procedure MappingsTabDST_NAMESetText(Sender: TField; const Text: string);


procedure OkBtnClick(Sender: TObject);


procedure SrcNameEditChange(Sender: TObject);


procedure CreateParams(var Params: TCreateParams);


procedure MapTabBeforeDeleteInsert(DataSet: TDataSet);


procedure UpdateFormView;


procedure UpdateMapGrid;


Properties


Events


Variables


AllRecsBtn : TRadioButton;


BottomPanel : TPanel;


CancelBtn : TButton;


dsMappings : TDataSource;


Expanded : TBevel;


FirstRecsBtn : TRadioButton;


FormStorage : TFormStorage;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


Label4 : TLabel;


MapBtn : TButton;


MapGrid : TRxDBGrid;


MappingsTab : TMemoryTable;


MappingsTabDST_NAME : TStringField;


MappingsTabSRC_NAME : TStringField;


ModeCombo : TComboBox;


OkBtn : TButton;


RecordCntEdit : TCurrencyEdit;


RecordCountBox : TGroupBox;


SrcNameEdit : TFilenameEdit;


TableFields : TTableItems;


TopPanel : TPanel;


FDstTable : TTable;


FExpanded : Boolean;

Private declarations


FMappingsHeight : Integer;


FSrcName : string;