Глюк в 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.
Возможно, есть другое решение....

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

Глюк в DCom приложении или глюк Дельфи? Найти похожие ветки