| Class TODBCTables (unit oddscb) |
TTreeView
| Constructors |
constructor Create(Owner: TComponent);| Functions |
destructor Destroy;
function isODBCColumn(const Node: TTreeNode): Boolean;
procedure Populate;
function GetColumn: String;
function GetTable: String;
function GetText: String;
procedure PutColumns(Const ParentNode: TTreeNode; Const TableName: String);
procedure PutIndexes(Const ParentNode: TTreeNode; Const TableName: String);
procedure SetDataSource(DataSrc: String);| Properties |
property Column : String
property DataSource : String
property FullConnectString : String
property Henv : THenv
property ShowColumns : Boolean
property ShowIndexes : Boolean
property Table : String
property Text : String| Events |
| Variables |
FDataSource : String;
FFullString : String;
FHenv : THenv;
FImageList : TImageList;
FItemHstmt : THstmt;
FShowColumns : Boolean;
FShowIndexes : Boolean;| Constructors |
constructor Create(Owner: TComponent);TODBCTables
| Functions |
destructor Destroy;Note if you change the bitmaps used you will probably need to change the CreateSize parameters
function isODBCColumn(const Node: TTreeNode): Boolean;
procedure Populate;setup various image indexes
function GetColumn: String;check for nil?
function GetTable: String;
function GetText: String;
procedure PutColumns(Const ParentNode: TTreeNode; Const TableName: String);
procedure PutIndexes(Const ParentNode: TTreeNode; Const TableName: String);setup various image indexes
procedure SetDataSource(DataSrc: String);| Properties |
property Column : String
property DataSource : String
property FullConnectString : String
property Henv : THenv
property ShowColumns : Boolean
property ShowIndexes : Boolean
property Table : String
property Text : String| Events |
| Variables |
FDataSource : String;
FFullString : String;
FHenv : THenv;
FImageList : TImageList;
FItemHstmt : THstmt;
FShowColumns : Boolean;
FShowIndexes : Boolean;