LazReport

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Ответить
xcod
постоялец
Сообщения: 108
Зарегистрирован: 07.08.2009 12:37:23

Сообщение xcod »

мастер заголовок сделайте перед мастер дата
mkazakov
новенький
Сообщения: 52
Зарегистрирован: 24.02.2012 14:04:14
Откуда: Балаково

Сообщение mkazakov »

xcod писал(а):мастер заголовок сделайте перед мастер дата

спасибо :)

Добавлено спустя 2 часа 39 минут 9 секунд:
А как избавится от повторяющихся страниц?
xcod
постоялец
Сообщения: 108
Зарегистрирован: 07.08.2009 12:37:23

Сообщение xcod »

как понять повторяющихся7
одни и те же страницы дублируются7
можете тестовый проект сделать
mkazakov
новенький
Сообщения: 52
Зарегистрирован: 24.02.2012 14:04:14
Откуда: Балаково

Сообщение mkazakov »

одни и те же страницы дублируются.

Причем их уже 13
xcod
постоялец
Сообщения: 108
Зарегистрирован: 07.08.2009 12:37:23

Сообщение xcod »

сделайте тест проект
у себя такое не наблюдал
mkazakov
новенький
Сообщения: 52
Зарегистрирован: 24.02.2012 14:04:14
Откуда: Балаково

Сообщение mkazakov »

alaken
постоялец
Сообщения: 221
Зарегистрирован: 18.02.2010 08:02:13

Сообщение alaken »

В одном из своих проектов изменял стандартное окно предпросмотра, сделал с тулбаром и кнопочками
prewiew.png

Вдруг кому пригодится, исходники во вложении.
Может умные люди допилят =)
У вас нет необходимых прав для просмотра вложений в этом сообщении.
xcod
постоялец
Сообщения: 108
Зарегистрирован: 07.08.2009 12:37:23

Сообщение xcod »

Код: Выделить всё

TfrReport.ReportType := rtSimple;
mkazakov
новенький
Сообщения: 52
Зарегистрирован: 24.02.2012 14:04:14
Откуда: Балаково

Сообщение mkazakov »

Спасибо получилось.

у меня тут задача вывести поток отчетов

Код: Выделить всё

/// вывод потока отчетов одним файлом ///////////////
frReport1.LoadFromFile('1.frf');
frReport1.PrepareReport;
frReport1.LoadFromFile('2.frf');
frReport1.PrepareReport(False);


Но вот ругается на

Код: Выделить всё

frReport1.PrepareReport(False);


Код: Выделить всё

unit1.pas(104,33) Error: Wrong number of parameters specified for call to "PrepareReport"



Короче сейчас задача такая, нужно сделать множество отчетов, меняя запрос в квери но используя один шаблон.
Аватара пользователя
AnacRon
новенький
Сообщения: 47
Зарегистрирован: 16.12.2009 10:09:09
Откуда: Караганда

Сообщение AnacRon »

LazReport базируется на FasReport 2.3 в котором PrepareReport реализован иначе.
Единственным для себя вариантом вижу примерно такое:

Код: Выделить всё

var
  r1,r2: TfrReport;
  vfrc : TfrCompositeReport;
begin
  r1.LoadFromFile('1.frf');
  vfrc.Reports.Add(r1); 
  r2.LoadFromFile('2.frf');
  vfrc.Reports.Add(r2); 

  vfrc.PrepareReport;
  vfrc.ShowPreparedReport;
end;
mkazakov
новенький
Сообщения: 52
Зарегистрирован: 24.02.2012 14:04:14
Откуда: Балаково

Сообщение mkazakov »

Ксажилению такой вариант не подходит,

как я уже писал задача немного другая, нужно использовать один шаблон например bill.lrf и менять запросы в квери и добавлять листы.
xcod
постоялец
Сообщения: 108
Зарегистрирован: 07.08.2009 12:37:23

Сообщение xcod »

mkazakov писал(а):Короче сейчас задача такая, нужно сделать множество отчетов, меняя запрос в квери но используя один шаблон.


в одном шаблоне сделайте несколько страниц
и на каждой странице свои запросы
если я вас правильно понял, то это должно помочь
mkazakov
новенький
Сообщения: 52
Зарегистрирован: 24.02.2012 14:04:14
Откуда: Балаково

Сообщение mkazakov »

xcod писал(а):
mkazakov писал(а):Короче сейчас задача такая, нужно сделать множество отчетов, меняя запрос в квери но используя один шаблон.


в одном шаблоне сделайте несколько страниц
и на каждой странице свои запросы
если я вас правильно понял, то это должно помочь


Дело в том что страниц может быть разное количества от 5 до 100 это зависит от количества записей в таблице
xcod
постоялец
Сообщения: 108
Зарегистрирован: 07.08.2009 12:37:23

Сообщение xcod »

ну и что
страницы будут сдвигаться
Вы попробуйте :)
mkazakov
новенький
Сообщения: 52
Зарегистрирован: 24.02.2012 14:04:14
Откуда: Балаково

Сообщение mkazakov »

xcod писал(а):ну и что
страницы будут сдвигаться
Вы попробуйте :)


страницы остаются
Ответить