Текущий архив: 2002.05.09;
Скачать: CL | DM;
Вниз
Количество файлов в DataBase Найти похожие ветки
← →
Voldemar © (2002-04-14 23:24) [0]Доброе время суток!
Подскажите, плз, можно ли узнать именно через свойства DataBase, сколько таблиц (файлов .db) содержится в данный момент в алиасе?
← →
DPashin (2002-04-15 08:57) [1]
//uses bde
procedure fDbiOpenTableList(DB:TDataBase; TableList: TStrings);
var
hCursor : hDBICur;
ListDesc : TBLBaseDesc;
begin
Check(DbiOpenTableList(DB.Handle, False, False, "*", hCursor));
TableList.Clear;
while (DbiGetNextRecord(hCursor, dbiNOLOCK, @ListDesc, nil) = dbiErr_None) do
TableList.Add(ListDesc.szName);
end;
← →
Kuusiniemi © (2002-04-15 10:21) [2]А Session.GetTableNames не проще вызвать?
← →
AlexLi (2002-04-15 11:43) [3]Session.DataBases[i].DataSetCount
← →
Kuusiniemi © (2002-04-15 14:56) [4]2 AlexLi.
Из хелпа: DataSetCount - "Indicates the number of active datasets associated with the connection component."
то есть это количество TDataset, которые в данный момент работают. А если использую ДВА TDataset, а БД у меня сотня таблиц???
← →
Севостьянов Игорь © (2002-04-16 12:06) [5]Согласен с Kuusiniemi © (15.04.02 10:21)
Ребята иногда полезно читать HELP
GetTableNames Example
MyStringList := TStringList.Create;
try
Session.GetTableNames("DBDEMOS", "*.db",False, False, MyStringList);
{ Add the table names to a list box }
ListBox1.Items = MyStringList;
finally
MyStringList.Free;
end;
Страницы: 1 вся ветка
Текущий архив: 2002.05.09;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.01 c
