Вывод данных из TZQuery

[HowlingDragon]

Здравствуйте. Подскажите пожалуйста как получить результаты запроса из компонента Query. Код:

Код: Выделить всё

SQLEx:=TZQuery.Create;
SQLEx.Connection:=ConnectDB;
SQLEx.SQL.Text:='SELECT * FROM '+TableName+' t WHERE IS_FREE_LOCK(CONCAT(#39lock_#39, t.id))';
SQLEx.ExecSQL;

IS_FREE_LOCK принимает true или false, возможно ли как то получить эти значения?

[Mr.Smart]

Код: Выделить всё

SQLEx:=TZQuery.Create;
SQLEx.Connection:=ConnectDB;
SQLEx.SQL.Text:='SELECT *, IS_FREE_LOCK(CONCAT(#39lock_#39, id)) AS Val1  FROM '+TableName;
SQLEx.Open;

p.s. Учим SQL либо идём на спец форумы по SQL.

[HowlingDragon]

Спасибо. Переменная Val1 будет доступна в коде lazarus?
(Подскажите пожалуйста где почитать про SQL или хорошую книгу, если не трудно.)

[Little_Roo]

(Подскажите пожалуйста где почитать про SQL или хорошую книгу, если не трудно.)

www.ibase.ru
www.sql.ru

Там и ссылки на книги есть, и просто статьи местами правильные...

[HowlingDragon]

Спасибо, за ссылки и извиняюсь за глупый вопрос. Разобрался. =)