Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как отключить все активные DataSet? [D6, dBase, FoxPro]


Zn ©   (2004-01-21 13:16:00) 

Нужно отключить все активные ADODataSet текущей формы.
Я придумал такое:
for i:=0 to Form1.ControlCount-1 do
if Form1.Control(i) is TADODataSet then
а чего тут, не знаю.
Подскажите, please...


sniknik   (2004-01-21 17:14:00) [1]

ADOConnection.Close проще.


Stas   (2004-01-21 13:44:00) [2]

:-)


stas   (2004-01-21 13:43:00) [3]

Academic © (21.01.04 13:32) [2]

> TAdoDataSet(Form1.Component[i]).enabled:=false

TAdoDataSet(Form1.Component[i]).Active:=false

Извеняюсь. Academic прав


Danilka   (2004-01-21 13:43:00) [4]

Stas © вот-ты и раскололась, Жена Билла Гейтса. :))


имя   (2004-01-21 13:41:00) [5]

Удалено модератором


Zn   (2004-01-21 13:37:00) [6]

Класс! Спасибо!


Academic   (2004-01-21 13:32:00) [7]


> TAdoDataSet(Form1.Component[i]).enabled:=false

TAdoDataSet(Form1.Component[i]).Active:=false


Stas   (2004-01-21 13:27:00) [8]

for i:=0 to Form1.ComponentCount-1 do
if Form1.component[i] is TADODataSet then TAdoDataSet(Form1.Component[i]).enabled:=false


Наверх

Титульная страница Поиск, карта сайта Написать письмо