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

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

KolEdb [Delphi]

Kirill ©   (2006-10-25 14:47:00) 

Не могу получить доступ к результату выборки:
   if DS = nil then
   begin
     DS := NewDataSource(sConnection);
     SS := NewSession( DS );
     QR := NewQuery( SS );
     QR.Mode := rmReadOnly; //-- worked, but not interesting
     QR.Text := ls.Text;
     QR.Open;
     MsgOK(Double2Str(QR.RField[3]));

Выдает Exception. Поковырялся, нашел, что "вылет" происходит в модуле Kol
function TList.Get( Idx: Integer ): Pointer;
begin
  Result := nil;
  if Idx < 0 then Exit;
  if Idx >= fCount then Exit;
  Result := fItems[ Idx ];
end;

Здесь fCount неопределен :(
Не могу откатиться на старую версию Kol'а, т.к. нет ретроотката с 2.10 на 2.00.

---

Kirill   (2006-10-25 16:50:00) [1]

Владимир, простите тормоза. В Когда запрос переносил из одного проекта в другой пропустил кавычки для выделения даты. В итоге действительно данных и не было. Спасибо, что открыли глаза... ;)

---

Kirill   (2006-10-25 16:49:00) [2]

> Надо проверять, что не Eof сначала

Владимир, Вы оказались правы. Странно, точно такой же запрос в VCL проекте выдает результат.

---

Vladimir Kladov   (2006-10-25 16:17:00) [3]

Чему @ Self равен? Есть подозрение, что ничего не возвращено. Надо проверять, что не Eof сначала, а потом уже пытаться читать результаты.

---

Наверх