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

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

Глюк в DCom приложении или глюк Дельфи? [D6, IB6.x, ]


Adulteress ©   (2001-12-08 23:53:00) 

Здравствуйте. Может кто сталкивался с такой проблемой? Почему 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-10 02:17:00) [1]

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


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

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

IBQuery1.Last;

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


Наверх

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