Показать сообщение отдельно
  #1  
Старый 26.01.2012, 02:09
vertraut vertraut вне форума
Прохожий
 
Регистрация: 23.01.2012
Сообщения: 1
Репутация: 10
Вопрос Помогите с базой пожалуйта

Есть база с таблицами. Подключения настроил, через Grid выводит таблицу нормально. Хотел бы чтобы текст SQL запросов брался из переменной, а результат запроса записывался в другую переменную.
Помогите пожалуйста с задачей, а то сижу неделю и не получается.

Код:
procedure TForm1.btn1Click(Sender: TObject);
var i: array of string;
    q: string;
begin
  
  q := 'SELECT AA FROM TABLE WHERE BB = 123';
  DataModule1.qry1.SQL.Text := q;
  DataModule1.qry1.Open;
  i := DataModule1.qry1.Fields[0].AsInteger;
  DataModule1.qry1.Close;

end;
Ответить с цитированием