-
MY PROJECTS
-
Recent Posts
- Algo.Java.BFS in BinaryTree
- Java.Jackson.Serialize object to json
- Algo. Traverse linked list
- Algo. Java. Remove-duplicates-from-sorted-array
- Java.Hibernate.SimpleExample
- Java.Jdbc.SimpleExample
- SQL. Calc the sum with case, example
- Mullvad – free the internet :)
- Junit. Jupiter
- Java. SpringBoot Example how to work with dateTime in Specification
- Java.SpringBoot.PopularAnnotations
- SpringBoot. Exception Management
- Java.Hibernate.JoinTableAnnotation
- SpringBoot.Making our first starter and autoconfiguration
- Spring. Creating main annotation to start business logic
- Spring.Reading from properties file
- Spring.How to define spring version inside springBoot ?
- SpringBoot App inside Docker
- Kafka.FirstExperience
- Docker.MySql and Lost connection to MySQL server at ‘reading initial communication packet’, system error: 0
Categories
- Aptana
- Azure
- C#
- DataSnap
- DBExpress
- Delphi
- Delphi и сети
- Delphi. Язык программирования
- ExtJS
- FastReport
- FireDAC
- FireMonkey
- GIT
- ICS
- IDE
- IIS
- Indy
- InnoSetup
- javascript
- jQuery
- JSON
- LiveBindings
- MSHTML
- MySQL
- PHP
- REST
- Ribbons
- SMS
- SQL инструкции
- SVN
- TRichView
- UniGui
- WebBroker
- WinAPI
- Windows
- Алгоритмы
- Без рубрики
- Деревья
- Ищу ответ
- Компонентостроение
- Мои компоненты
- Начальный уровень
- Обработка исключений
- Парсинг
- Потоки(Threads)
- Регулярные выражения
- Тестирование приложений
Category Archives: FastReport
Delphi. FastReport. VCL. Even and not even table strings
Link
Posted in Delphi, FastReport
Comments Off on Delphi. FastReport. VCL. Even and not even table strings
Delphi. FastReportVCL – merge / concat many reports
I needed report from runtime and disign time to be merged, so below is simpliest way to do this…
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 |
procedure TReportSettingsEventsForm.concatReports(AresultReport: TfrxReport; a: array of TfrxReport); var i: Integer; ms: TMemoryStream; guid: TGUID; filename: string; guid2: TGUID; filename2: string; begin for i := Low(a) to High(a) do begin ms := TMemoryStream.Create(); try Createguid(guid); filename := guid.ToString() + '.fp3'; a[i].SaveToFile(filename); AresultReport.LoadFromFile(filename); AresultReport.PrepareReport(false); finally ms.free(); if TFile.Exists(filename) then TFile.Delete(filename); end; end; end; |
example of use
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
procedure TReportSettingsEventsForm.showReport; var a: array of TfrxReport; begin frxResources.LoadFromFile('Russian.frc'); // setting language PrepareDynamicReport(); MainReport.Clear(); a := [TitlePage_Runtime, Data_DesignTime, frxReport1]; concatReports(MainReport, a); with MainReport do begin PreviewOptions.ThumbnailVisible := true; ShowPreparedReport(); end; end; |
Building a composite report (batch printing) In some cases it is required to organize printing … Continue reading
Posted in Delphi, FastReport
Comments Off on Delphi. FastReportVCL – merge / concat many reports
Delphi. FastReportVCL – change language to Russian, example
for exmaple we will change language of previewer to russian find dir where languages are (for ex.)
1 |
C:\Program Files (x86)\FastReport 5 VCL Enterprise\Res\Russian |
open cmd and type
1 |
cd C:\Program Files (x86)\FastReport 5 VCL Enterprise\Res\Russian |
type
1 |
mk.bat |
you will recieve Russian.frc file In runtime call
1 |
uses frxRes; frxResources.LoadFromFile('russian.frc'); |
Posted in Delphi, FastReport
Comments Off on Delphi. FastReportVCL – change language to Russian, example
Delphi. FastReport. Отправка отчета на почту в HTML формате
Заказчик захотел получать красивые отчеты на почту. Решил использовать FastReport и придерживаться следующего алгоритма Генерировать отчет в HTML файл Загрузить в строку Отправить на почту Код (Очень черновой вариант, но чтобы было)
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 31 32 33 34 35 |
procedure TForm2.Button1Click(Sender: TObject); var Emailer:TUniShopMilkSendEmail; ss:TStringStream; begin // save to html file frxReport1.PrintOptions.ShowDialog := False; frxReport1.ShowProgress := false; frxReport1.EngineOptions.SilentMode := True; frxReport1.EngineOptions.EnableThreadSafe := True; frxReport1.EngineOptions.DestroyForms := False; frxReport1.EngineOptions.UseGlobalDataSetList := False; frxHTMLExport1.FileName:='123.html'; frxReport1.PreviewOptions.AllowEdit := False; frxHTMLExport1.ShowDialog:=false; frxReport1.PrepareReport(); frxReport1. Export(frxHTMLExport1); // load from file Memo1.Lines.LoadFromFile('123.html',TEncoding.UTF8); // send to mail Emailer:=TUniShopMilkSendEmail.Create(Self); Emailer.Execute('someSubject',Memo1.Lines.Text,'panteleevstas@gmail.com'); end; |
Также кусок кода из примера UniGUI … Continue reading
Posted in Delphi, FastReport
Comments Off on Delphi. FastReport. Отправка отчета на почту в HTML формате
FastReport. UniGUI – вывод отчетов в Web
Это удивительно, но FastReport VCL отлично вписался в Web при помощи фрэймворка UniGUI. Разберем пример из демо-версии UniGUI, который находится в
1 |
C:\Program Files (x86)\FMSoft\Framework\uniGUI\Demos\Desktop\FastReport |
Вот результат работы примера Мы рассмотрим только основные моменты по коду. Пример целиком можно получить, скачав UniGUI фрэймворк и … Continue reading
Posted in Delphi, FastReport, UniGui
Comments Off on FastReport. UniGUI – вывод отчетов в Web
FastReport. Динамический вывод PageHeader/PageFooter
Часто бывает, что клиентам нужно давать изменять свои логотипы, писать в колонтитулах, и так далее. Для этого можно задействовать динамический вывод компонентов. В данной статье посмотрим как можно динамически вывести PageHeader и Page Footer с возможностью редактирования клиентом. Получится примерно … Continue reading
Posted in Delphi, FastReport
Comments Off on FastReport. Динамический вывод PageHeader/PageFooter
FastReport. Создание пользовательских отчетов
Под пользовательскими отчетами я понимаю отчеты, в которых у пользователя есть хотя бы минимальный выбор – какие данные будут включены в отчет, как они будут расположены и так далее. То есть, некоторая кастомизация. Часто пользователи любят вставлять свои логотипы в … Continue reading
Posted in FastReport
Comments Off on FastReport. Создание пользовательских отчетов
FastReport. Динамический вывод 200 записей
В данной статье посмотрим как вывести большое число данных. Для этого, с одной стороны воспользуемся техникой ArrayDML из FireDAC, а с другой стороны возможностями FastReport по выводу данных на страницы. И вот какой результат у нас получится.
Posted in Delphi, FastReport, Без рубрики
Comments Off on FastReport. Динамический вывод 200 записей
FastReport. Динамическое создание отчетов. Вывод данных из БД
Продолжаем цикл статей про динамический вывод данных из Fasteport. Посмотрим как можно вывести данные динамически, также моя дизайнерская душа не удержалась, и я немного занялся оформительством, добавил градиенты в отчет. Получилось так… Имя и Фамилия это соответственно поля Name и Family … Continue reading
Posted in Delphi, FastReport
Comments Off on FastReport. Динамическое создание отчетов. Вывод данных из БД
FastReport. Динамический вывод отчетов. Начало
Решил более детально изучить FastReport VCL, так как разрабатываю программу, в которой нужно динамически выводить отчеты. Это будет небольшой цикл статей, в котором мы пройдем от простого к сложному и по шагам разберем основные моменты работы с FastReport. Акцент я … Continue reading
Posted in Delphi, FastReport
Comments Off on FastReport. Динамический вывод отчетов. Начало