Скачать: CL | DM;

Живая база AutoRefresh   Найти похожие ветки 

← →
Serghei   (2003-02-13 14:49) [0]

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

---

← →
Reindeer Moss Eater   (2003-02-13 14:54) [1]

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

---

← →
Stas ©   (2003-02-13 14:58) [2]

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

---

← →
Reindeer Moss Eater   (2003-02-13 14:59) [3]

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

---

← →
Silver_   (2003-02-13 15:17) [4]

> 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 15:20) [5]

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

---

← →
stone ©   (2003-02-13 15:29) [6]

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

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

---

← →
Reindeer Moss Eater   (2003-02-13 16:02) [7]

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

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;

---

← →
Silver_   (2003-02-13 16:27) [8]

Reindeer Moss Eater

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c