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

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

Вывод данных таблицы в QRmemo [D7, XP]


Kley ©   (2008-01-05 10:50:00) 

Здравствуйте
подскажите плиз как правильно вывести данные из adoQuery в
QRMemo (Qreport).


Johnmen   (2008-01-05 18:13:00) [1]


> на событие BeforePrint:

Когда наступило это событие, поздняк метаться, отчет уже генерится.
Рекомендую ознакомиться с общими принципами функционирования генераторов отчетов в идеологии QR.
На сайте Anatoly Podgoretsky © есть материалы.


Kley   (2008-01-05 13:52:00) [2]

>Зачем в QRMemо, когда есть QRDbText
пробовал.
Запрос динамический ничего не получается
на событие BeforePrint:
datamodule1.SQLQuery.Close;
   datamodule1.SQLQuery.SQL.Clear;
   datamodule1.SQLQuery.SQL.Text:='SELECT DISTINCT prihod.key, poziz.number1, edizm.fullname AS nam, sum(poziz.kolvo) AS kol FROM ((Prihod INNER JOIN Poziz ON Prihod.NUMBER=Poziz.NUMBER1) INNER JOIN Tov ON Poziz.Tovar=Tov.NUMBER) INNER JOIN edizm ON tov.ed=edizm.number WHERE prihod.key='+datamodule1.PrihodTablekey.AsString+' GROUP BY prihod.key, poziz.number1, edizm.fullname';
   datamodule1.SQLQuery.Open;

      form11.QRDBText6.DataSet:=datamodule1.SQLQuery;
     form11.QRDBText6.DataField:=datamodule1.SQLQuery.fieldbyname ('nam').AsString  ;


Anatoly Podgoretsky   (2008-01-05 12:08:00) [3]

> Kley  (05.01.2008 10:50:00)  [0]

Зачем в QRMemо, когда есть QRDbText


Наверх

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