|
![]() | TSQL602Servers | ![]() | Přehled CDK komponent | TSQL602Indexes | ![]() |
Zjednodušená deklarace třídy:
type TSQL602Tables = class(TStringList) public property Connection : TComponent; property Application : string; end;
Spojení na SQL server, může se jednat o odkaz na komponentu třídy TSQL602Connection nebo TDBX602Connection.
Jméno databázové aplikace (schématu) seznam jejíchž tabulek má komponenta poskytovat. Bere se v úvahu, pouze pokud se liší od aplikace z Connection.Application.
Naplnit listbox seznamem tabulek:
var i : integer; TableList : TSQL602Tables; begin TableList := TSQL602Tables.Create; TableList.Connection := SQL602Connection1; // včetně aplikace for i := 0 to TableList.Count-1 do begin ListBox1.Items.Add(TableList[i]); end; TableList.Free; end;
![]() | TSQL602Servers | ![]() | Přehled CDK komponent | TSQL602Indexes | ![]() |