Имя Пароль
Зарегистрироваться


* При перепечатке материалов ссылка на www.SeoLiga.ru обязательна! RSS



Событие OnNeedData
19 февраля 2009

Объявление
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;
Для дополнительной информации по созданию обработчиков смотрите соответствующие главы в данном документе.


Теги: Borland Delphi

Статьи по теме:

Аудиоконференции
Панель Desktop
Структура и классификация пользовательских интерфейсов
Примеры выражений
OpenMode
BeforeAutoCreate
Соглашения об именах
Базовые технологии обработки запросов в архитектурах файл —сервер и клиент — сервер
Исполнительные информационные системы (Executive Support System)
Свойство PrinterSettings
Version
Exclusive
C – Конвертирование из QuickReport 1
Упрощение интерфейса
Свойство AutoStretch
| Borland Delphi | ext |
 


Пн Вт Ср Чт Пт Сб Вс
1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30


     



Rambler's Top100

Данный сайт или домен продается ICQ: 403-353-727

© 2009 Seoliga.ru | Borland Delphi | Событие OnNeedData . Регион сайта: Москва и Санкт-Петербург