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

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

Живая база AutoRefresh


Serghei ©   (2003-02-13 14:49:00) 

Кто-нить знает как сделать "живую БД" так называемый AutoRefresh
без Close / Open (получаютс длительные задержки (пустой Grid));
Refresh не катит выдает ошобку)
например:
- много юзеров постоянно делают изминения и каждый из них видит уже обновленную ( с последними изменениями) базу


Silver_   (2003-02-13 16:27:00) [1]

Reindeer Moss Eater

думал есть нечто что делает ето автоматом но
вопще ето тоже выход


Reindeer Moss Eater   (2003-02-13 16:02:00) [2]

Чтобы не екране не было пусто

var DataSet1,DataSet2 : TDataSet;

procedure MyRefresh;
begin
if DBGrid1.DataSource.DataSet = DataSet1 then
begin
DataSet2.Open;
DBGrid1.DataSource.DataSet:=DataSet2;
DataSet1.Close;
end
else
begin
DataSet1.Open;
DBGrid1.DataSource.DataSet:=DataSet1;
DataSet2.Close;
end;
end;


stone   (2003-02-13 15:29:00) [3]


> а каждые 10 сек. вопще хана :(((

Запрос длится 10 сек? Вот где настоящая ж.


Reindeer Moss Eater   (2003-02-13 15:20:00) [4]

после Close до Open на екране пусто
А что там должно быть?


Silver_   (2003-02-13 15:17:00) [5]


> Reindeer Moss Eater (13.02.03 14:54)
> procedure MyRefresh(ADataSet:TDataSet);
> begin
> ADataSet.Close;
> ADataSet.Open;
> end;


после Close до Open на екране пустоа каждые 10 сек. вопще хана :(((


Reindeer Moss Eater   (2003-02-13 14:59:00) [6]

Разницы никакой


Stas   (2003-02-13 14:58:00) [7]

А какие компоненты ты используешь для подключения к базе ? и какую базу ?


Reindeer Moss Eater   (2003-02-13 14:54:00) [8]

procedure MyRefresh(ADataSet:TDataSet);
begin
ADataSet.Close;
ADataSet.Open;
end;


Наверх

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