Использую компоненты ADO для связи с БД Access.
Что может быть проще:
Свойство DataSet компонента QRDBText в инспекторе объекта устанавливаю - DataSet=ADOQuery
Код:
//прописываю в коде:
QRDBText1.DataField:='N';
Результат нулевой! В QRDBText ничего не появляется (
Пробовал вместо ADOQuery использовать ADODataSet:
1) добавил на форму ADODataSet
2) ADODataSet.Connection в инспекторе объекта устанавливаю ADOConnection (общее для всей программы)
3) Свойство DataSet компонента QRDBText установил теперь - DataSet=ADODataSet
4)
Код:
procedure TFormU.ButtonPrintClick(Sender: TObject);
begin
ADODataSet.CommandText:='SELECT... ' //тот-же, что и в ADOQuery
ADODataSet.Active:=true;
FormPrint:=TFormPrint.Create(Self);
FormPrint.QuickRepPrn.Preview;
FormPrint.Show; //-если нет этой строки, то форма с QuickRep вообще не появляется
//FormPrint.Free;
end;
5)
Код:
procedure TFormPrint.QuickRepPrnPreview(Sender: TObject);
begin
QRDBText1.DataField:='Num';
end;
6) Запускаю программу, жму кнопку.
Появляется на экране QuickRep и в QRDBText написано "
[Num]".
Где же ошибка?
Как добиться отображения поля таблицы БД в QRDBText?