KolEdb

← →
Kirill © (2006-10-25 14:47) [0]

Не могу получить доступ к результату выборки:
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.

← →
Vladimir Kladov (2006-10-25 16:17) [1]

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

← →
Kirill © (2006-10-25 16:49) [2]

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

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

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

KolEdb Найти похожие ветки