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

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

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


erika ©   (2005-09-15 18:10:00) 

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


Tonich   (2005-09-16 09:18:00) [1]


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


вот почему
> Desdechado ©   (15.09.05 20:39) [14]

)))))


Desdechado   (2005-09-15 20:39:00) [2]

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


erika   (2005-09-15 19:11:00) [3]

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

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

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

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

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


Tonich   (2005-09-15 19:01:00) [4]


> 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;


попробуй так


erika   (2005-09-15 18:53:00) [5]

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


Tonich   (2005-09-15 18:52:00) [6]

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


Tonich   (2005-09-15 18:38:00) [7]


> Open for statement...

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


erika   (2005-09-15 18:35:00) [8]

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

Open for statement...


Tonich   (2005-09-15 18:33:00) [9]

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


Tonich   (2005-09-15 18:32:00) [10]

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


erika   (2005-09-15 18:31:00) [11]

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


erika   (2005-09-15 18:29:00) [12]


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

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


Tonich   (2005-09-15 18:27:00) [13]

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


erika   (2005-09-15 18:22:00) [14]


> manulo   (15.09.05 18:16) [1]

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


manulo   (2005-09-15 18:16:00) [15]

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


Наверх

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