Conversion to .fr3 from QuickReport and ReportBuilder

2019-08-15

logo
Perform the following list of actions:

   1. Create a new application (File -> New -> VCL Forms Application).

   2. Enter in the Uses clause module ConverterQR2FR (for convert QuickReport) or ConverterRB2FR (for convert ReportBuilder).

   3. Depending on the installed components, you may need to remove the following blocks from the Uses clause in ConverterQR2FR.pas or ConverterRB2FR.pas:

   VCLTee.TeeProcs, VCLTee.TeEngine, VCLTee.Chart, VCLTee.Series, VCLTee.TeCanvas

   frxChart, frxBDEComponents, frxIBXComponents

   4. Add the following components to the form:

  • frxReport
  • OpenDialog
  • Button1, Button2, Button3
  • ListBox1, ListBox2
  • Label1, Label2

 screenshot 1

Enter this code to the Button1Click() event of the “Select File” button.

Code Button1Click:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
procedure TForm1.Button1Click(Sender: TObject);
var
 i: integer;
 FirstLine: string;
begin
 OpenDialog1.Options := [ofAllowMultiSelect, ofFileMustExist];
 OpenDialog1.Filter := 'Delphi Form (*.dfm)|*.dfm|' + 'QuickReport (*.qr2)|*.qr2|'+
 'ReportBuilder (*.rtm)|*.rtm' + '|All files (*.*)|*.*';
 OpenDialog1.FilterIndex := 1;
 if OpenDialog1.Execute then
 with OpenDialog1.Files do
 for i := 0 to Count - 1 do
 ListBox1.Items.Add(Strings[I]);
end;

 

Enter this code to the Button2Click() event of the “Convert” button.

Code Button2Click:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm1.Button2Click(Sender: TObject);
 var
 i: integer;
 s : string;
begin
 ListBox2.Clear();
 with ListBox1.Items do
 for i := 0 to Count - 1 do
 if frxReport1.LoadFromFile(ListBox1.Items[i]) then
 begin
 s := ListBox1.Items[i].Substring(0,ListBox1.Items[i].Length-4)+'.fr3';
 frxReport1.SaveToFile(s);
 ListBox2.Items.Add(s);
 end;
end;

Enter this code to the Button3Click() event of the “Clear list of files” button.

Code Button3Click:

1
2
3
4
procedure TForm1.Button3Click(Sender: TObject);
begin
 ListBox1.Clear();
end;

Enter this code to the ListBox2Click() event that performs when you click the ListBox2 element to open the selected template in the designer.

Code ListBox2Click:

1
2
3
4
5
procedure TForm1.ListBox2Click(Sender: TObject);
begin
 frxReport1.LoadFromFile(ListBox2.Items[ListBox2.ItemIndex]);
 frxReport1.DesignReport();
end

Run the application

screenshot 2 

Select files to convert

screenshot 3 

The selected files appear in the “Selected file” list

screenshot 4 

Click the Convert button, the files from the “Selected file” list will be converted, and the address of the saved templates will be displayed in the format *.fr3

screenshot 5 

 

Click on any template address in the “Saved templates in FR” list and it will be opened in the FR designer, check if the conversion is correct.

screenshot 6

 

VCL FastReport Converter QuickReport ReportBuilder Delphi VCL FastReport Converter QuickReport ReportBuilder Delphi
July 10, 2025

How to Build and Connect the Firebird Plugin in FastReport .NET

In this article, we will go through the process of building and connecting the Firebird plugin in FastReport .NET through the report designer and via code.
July 04, 2025

How to Transition from FastReport Publisher to the Corporate Server

In this material, we will discuss the reasons for replacing Publisher with the Corporate Server along with a migration plan.
June 27, 2025

Publisher — the Ideal Solution for Small and Medium-Sized Businesses

In this article, we will take a detailed look at how these services help address different user needs so that you can choose the solution that best fits your requirements.
Fast Reports
  • 800-985-8986 (English, US)
  • +31 97 01025-8466 (English, EU)
  • +49 30 56837-3928 (German, DE)
  • +55 19 98147-8148 (Portuguese, BR)
  • info@fast-report.com
  • 66 Canal Center Plaza, Ste 505, Alexandria, VA 22314

© 1998-2025 Fast Reports Inc.