Вниз
Скачать: CL | DM;

QuickRep   Найти похожие ветки 

 
OlgaGril   (2004-04-02 09:42) [0]

Подскажите , пожалуйста, как можно вставить данные из динамических массивов в отчет , и как создать таблицу в отчете из этих данных?


 
Anatoly Podgoretsky ©   (2004-04-02 09:51) [1]

Смотри пример в QuickReport по OnNeedData


 
MetalFan ©   (2004-04-02 10:22) [2]

Выдержка из мануала по QR

5.56. Событие OnNeedData
Объявление
Property OnNeedData: procedure (Sender: TObject; MoreData: Boolean)
Применимо к
TQuickRep,
TQRSubDetail
Использование
Событие OnNeedData используется для создания отчетов из других источников данных, чем источники данных Delphi (datasources), таких как списки строки (string lists), массивы (arrays), текстовые файлы (text files) и другие подобные. Событие OnNeedData возникает, когда QuickReport использует команду DataSet.Next для перехода на следующую запись. Установка параметра MoreData в значение False является признаком прекращения отчета (или sub-Detail группы).
Пример
Данный код печатает список всех строк из StringList в отчете:
var
CurrentItem : Integer;
SomeStringList : TStringList;

procedure TForm1.QuickRep1BeforePrint(Sender: TQuickRep;
           var PrintReport: Boolean);
begin
CurrentItem := 0;
PrintReport := SomeStringList.Count > 0;
end;

procedure TForm1.QuickRep1NeedData(Sender:TObject;
             var MoreData:Boolean);
begin
if CurrentItem < SomeStringList.Count then
QRLabel1.Caption := SomeStringList[CurrentItem];
Inc(CurrentItem);
MoreData := CurrentItem <= SomeStringList.Count;
end;
Для дополнительной информации по созданию обработчиков смотрите соответствующие главы в данном документе.


 
Johnmen ©   (2004-04-02 11:35) [3]

>MetalFan ©   (02.04.04 10:22) [2]
>Выдержка из мануала по QR

Странный мануал... В смысле грамотности примера.
Откуда он ?

>OlgaGril  

Наиболее правильный пример использования - в демо для QR, входящим в D6 (needdata.pas)


 
MetalFan ©   (2004-04-02 11:36) [4]

если интересует - могу выслать...
не помню, откуда скачал (по QR2&QR3)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.021 c
3-1079449077
neVIP
2004-03-16 17:57
2004.04.18
Добавление в базу записи, возникла проблема


1-1080434014
Dimedroll
2004-03-28 04:33
2004.04.18
-= Можно ли все Error ловить своей проги посредством WinAPI =-


8-1071569422
Ivolg
2003-12-16 13:10
2004.04.18
Перемотка


6-1076660282
Layner
2004-02-13 11:18
2004.04.18
Можно ли создать TIdSMTP в безформеном приложении? (=сервис NT)


14-1080424671
kdd
2004-03-28 00:57
2004.04.18
Delphi 8




   Наверх