Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.10;
Скачать: [xml.tar.bz2];




Вниз

Глюк в DCom приложении или глюк Дельфи? 


Adulteress   (2001-12-08 23:53) [0]

Здравствуйте. Может кто сталкивался с такой проблемой? Почему IBQuery выдает количество записей 1 если пускать запрос к базе с DCom клиента, если их около 100? Причем, если обращаться к базе напрямую (а не через сервер приложений), все нормально?

Процедура на сервере:
procedure TTestDCServer.TestQuery;
begin
IBQuery1.Close;
IBQuery1.SQL.Clear;
IBQuery1.SQL.Add("Select * from TABLE1");
IBQuery1.Prepare;
IBQuery1.Open;
Form1.Edit1.Text := IntToStr(IBQuery1.RecordCount);
end;

Процедура на клиенте:
procedure TForm1.Button1Click(Sender: TObject);
begin
DComConnection1.Open;
DComConnection1.AppServer.TestQuery;
end;



Быданцев Александр   (2001-12-09 16:36) [1]

Возможно, не считываются все записи.
Попробуйте добавить после
IBQuery1.Open;

IBQuery1.Last;

У меня была такая же проблема с MSSQL.
Возможно, есть другое решение....



Юрий   (2001-12-10 02:17) [2]

IBQuery1.Close;
IBQuery1.SQL.Clear;
IBQuery1.SQL.Add("Select * from TABLE1");
IBQuery1.Prepare;
IBQuery1.Open;
IBQuery1.FetchAll;
Form1.Edit1.Text := IntToStr(IBQuery1.RecordCount);




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.10;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.021 c
3-28423           Boss2                 2001-12-08 20:20  2002.01.10  
TreeView/БД


3-28419           Denis Proshkin        2001-12-06 15:41  2002.01.10  
фильтрация по Date


7-28550           Eduard1               2001-09-28 14:04  2002.01.10  
Hook - Help me


3-28411           dva                   2001-12-08 00:27  2002.01.10  
Vopros


3-28408           urii                  2001-12-07 17:26  2002.01.10  
перенос