генератор через IBquery

← →
erika © (2005-09-15 18:10) [0]

Не могу оперировать данными, они точно там есть.
1. запрос:
select gen_id (NOMBER_ZAJPOST,1) from RDB$DATABASE,
2. нужно
при нажатии кнопочки он должен выполниться и значение присвоиться к переменой типа integer, пишу следующим образом: m := PostTK.IBQuery1GEN_ID.Value;
3. результат отсутсвует: он ошибку выдает ...

← →
manulo (2005-09-15 18:16) [1]

Попробуй
m := IBQuery1.FieldByName("gen_id").AsInteger;

← →
erika © (2005-09-15 18:22) [2]

> manulo (15.09.05 18:16) [1]

пробовала не вышло ошибка use Open for statement...

← →
Tonich © (2005-09-15 18:27) [3]

хм а у меня все работаем,
а ты попробу не в приложении а в самой базе (ну всмысле в IBExpert или еще хдето)
выполняется ли сам запрос ?

← →
erika © (2005-09-15 18:29) [4]

> Tonich © (15.09.05 18:27) [3]

Сейчас проверим..

← →
erika © (2005-09-15 18:31) [5]

IBE работает даже очень замечательно, не могу понять в чем дело!

← →
Tonich © (2005-09-15 18:32) [6]

ну тохда смотри что ты там уже накодила )

← →
Tonich © (2005-09-15 18:33) [7]

напиши код, как ты там это Query пользуешь.

← →
erika © (2005-09-15 18:35) [8]

Самое интересное, что при ExecSQL все нормально, а вот пытають переменной присквоить не кочет

Open for statement...

← →
Tonich © (2005-09-15 18:38) [9]

> Open for statement...

ну это несколько не то , что я имел ввиду по словом "код" ))

← →
Tonich © (2005-09-15 18:52) [10]

очень секретный код видимо )))

Упс у меня просто не обновлялось извините, ничего секретного нет:
PostTK.IBQuery1.Close;
PostTK.IBQuery1.ExecSQL;
m := PostTK.IBQuery1GENER.AsInteger;
PostTK.Edit1.Text := inttostr(m)+"/"+ IntToStr(YearOF(now));

> m := PostTK.IBQuery1GENER.AsInteger;

)))) очень интересная строка )))
ты сильно хитро хочешь забрать полученное поле, тебе же написали как надо
> manulo (15.09.05 18:16) [1]

короче ))

Query.Active := False; Query.Sql.Add("select gen_id("твой генератор",1) from rdb$database"); Query.Active := True; i := Query.FieldByName("gen_id").asinteger;

попробуй так

Спасибо всем.

> Tonich © (15.09.05 19:01) [12]

а почему PostTK.IBQuery1.ExecSQL;
так не работает

> i := Query.FieldByName("gen_id").asinteger;

а когда через Query.Active , то работает как сам захочешь

тебе ж пишут: use open
по-русски: используй метод Open, а не ExecSQL
ты ж хочешь, чтоб тебе данные вернулись, а не просто сервер подергать за усы?

генератор через IBquery Найти похожие ветки