Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Database [D7, Paradox]

Pako © (2004-02-03 11:28:00)

Почему м/б DM.Database.DataSetCount = 0
в DM куча всяких датасетов, что не так

for i:=0 to DM.Database.DataSetCount-1 do
begin
if DM.Database.DataSets[i] is TTable then
if DM.Database.DataSets[i].Active then
DM.Database.DataSets[i].Close;

Pako (2004-02-03 15:45:00) [1]

большой сенькс:))

> Sandman25 © (03.02.04 15:42) [9]
> if DM.Database.DataSets[i] is TTable then
> PackTable( TTable(DM.Database.DataSets[i]))

не хватало добавить TTable

Sandman25 (2004-02-03 15:42:00) [2]

if DM.Database.DataSets[i] is TTable then
PackTable(TTable(DM.Database.DataSets[i]))

Pako (2004-02-03 15:39:00) [3]

я понимаю что надо проверить is TTable then

> TTable(...)

в скобках что имеется ввиду

HSolo (2004-02-03 15:34:00) [4]

if DM.Database.DataSets[i] is TTable then ...

Sandman25 (2004-02-03 15:34:00) [5]

... is TTable
TTable(...)

Pako (2004-02-03 15:27:00) [6]

Хотелось бы примерно в таком же цикле сделать упаковку TTable
что-то типа:
....
for i:=0 to DM.Database.DataSetCount-1 do
PackTable(DM.Database.DataSets[i]);
....
но как вы видите DM.Database.DataSets[i]это вообще любой набор данных. Процедура PackTable взята из хелпа и работает только с TTable. Можно ли из DM.Database получить именно TTable?

Pako (2004-02-03 12:56:00) [7]

Спасибо

> Johnmen ©
:))
Извиняюсь за невнимательность

Johnmen (2004-02-03 11:48:00) [8]

И наборы данных активны ?
:)
см. хелп на свойство DataSetCount - там и ответ...

Pako (2004-02-03 11:45:00) [9]

Database открыта

Sandman25 (2004-02-03 11:34:00) [10]

Database открыта? Именно на нее указывают TQuery и прочее? Почему данный код не лежит в методе класса TDM?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »