Importación inicial

git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.FastReport@22 475b051d-3a53-6940-addd-820bf0cfe0d7
This commit is contained in:
David Arranz 2009-02-27 12:41:18 +00:00
parent f6d7f44fcc
commit 3b72eb27ca
1660 changed files with 238435 additions and 0 deletions

View File

@ -0,0 +1,211 @@
# ---------------------------------------------------------------------------
!if !$d(BCB)
BCB = $(MAKEDIR)\..
!endif
# ---------------------------------------------------------------------------
# IDE SECTION
# ---------------------------------------------------------------------------
# The following section of the project makefile is managed by the BCB IDE.
# It is recommended to use the IDE to change any of the values in this
# section.
# ---------------------------------------------------------------------------
VERSION = BCB.04.04
# ---------------------------------------------------------------------------
PROJECT = Project1.exe
OBJFILES = Project1.obj Unit1.obj
RESFILES = Project1.res
RESDEPEN = $(RESFILES) Unit1.dfm
LIBFILES =
IDLGENFILES =
IDLFILES =
LIBRARIES =
SPARELIBS = Vcl40.lib Vcldb40.lib frx4.lib VCLX40.lib VCLJPG40.lib FS4.lib frxDB4.lib \
FSDB4.lib
PACKAGES = Vcl40.bpi Vclx40.bpi vcljpg40.bpi Vclmid40.bpi Vcldb40.bpi bcbsmp40.bpi \
ibsmp40.bpi vcldbx40.bpi Qrpt40.bpi TeeUI40.bpi teedb40.bpi tee40.bpi Dss40.bpi \
NMFast40.bpi Inetdb40.bpi Inet40.bpi dclocx40.bpi frx4.bpi fs4.bpi frxe4.bpi \
frxDB4.bpi fsDB4.bpi
DEFFILE =
# ---------------------------------------------------------------------------
PATHCPP = .;
PATHASM = .;
PATHPAS = .;
PATHRC = .;
DEBUGLIBPATH = $(BCB)\lib\debug
RELEASELIBPATH = $(BCB)\lib\release
USERDEFINES =
SYSDEFINES = _RTLDLL;NO_STRICT;USEPACKAGES
# ---------------------------------------------------------------------------
CFLAG1 = -I$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-Od -Hc -H=$(BCB)\lib\vcl40.csm -w -Ve -r- -a8 -k -y -v -vi- -c -b- -w-par \
-w-inl -Vx -tW -tWM -D$(SYSDEFINES);$(USERDEFINES)
IDLCFLAGS = -I$(BCB)\include -I$(BCB)\include\vcl -I..\..\..\Source -I..\..\..\LibBCB4 \
-I..\..\..\LibBCB5 -I..\..\..\LibBCB6 -src_suffixcpp
PFLAGS = -U$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-I$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-$YD -$W -$O- -v -JPHNE -M
RFLAGS = -i$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
AFLAGS = /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\..\Source /i..\..\..\LibBCB4 \
/i..\..\..\LibBCB5 /i..\..\..\LibBCB6 /mx /w2 /zd
LFLAGS = -L$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-aa -Tpe -x -Gn -v
# ---------------------------------------------------------------------------
ALLOBJ = c0w32.obj Memmgr.Lib $(PACKAGES) sysinit.obj $(OBJFILES)
ALLRES = $(RESFILES)
ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mti.lib
# ---------------------------------------------------------------------------
!ifdef IDEOPTIONS
[Version Info]
IncludeVerInfo=0
AutoIncBuild=0
MajorVer=1
MinorVer=0
Release=0
Build=0
Debug=0
PreRelease=0
Special=0
Private=0
DLL=0
Locale=1049
CodePage=1251
[Version Info Keys]
CompanyName=
FileDescription=
FileVersion=1.0.0.0
InternalName=
LegalCopyright=
LegalTrademarks=
OriginalFilename=
ProductName=
ProductVersion=1.0.0.0
Comments=
[HistoryLists\hlIncludePath]
Count=2
Item0=$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\InteractiveReport;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\include;$(BCB)\include\vcl;C:\Work\Fast Report\fs\Source;C:\Work\Fast Report\fr4\Source
[HistoryLists\hlLibraryPath]
Count=2
Item0=$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\InteractiveReport;$(BCB)\Projects\Lib;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\lib\obj;$(BCB)\lib;C:\Work\Fast Report\fs\Source;C:\Work\Fast Report\fr4\Source
[HistoryLists\hlDebugSourcePath]
Count=1
Item0=$(BCB)\source\vcl
[Debugging]
DebugSourceDirs=$(BCB)\source\vcl
[Parameters]
RunParams=
HostApplication=
RemoteHost=
RemotePath=
RemoteDebug=0
[Compiler]
InMemoryExe=0
ShowInfoMsgs=0
[CORBA]
AddServerUnit=1
AddClientUnit=1
PrecompiledHeaders=1
!endif
# ---------------------------------------------------------------------------
# MAKE SECTION
# ---------------------------------------------------------------------------
# This section of the project file is not used by the BCB IDE. It is for
# the benefit of building from the command-line using the MAKE utility.
# ---------------------------------------------------------------------------
.autodepend
# ---------------------------------------------------------------------------
!if !$d(BCC32)
BCC32 = bcc32
!endif
!if !$d(CPP32)
CPP32 = cpp32
!endif
!if !$d(DCC32)
DCC32 = dcc32
!endif
!if !$d(TASM32)
TASM32 = tasm32
!endif
!if !$d(LINKER)
LINKER = ilink32
!endif
!if !$d(BRCC32)
BRCC32 = brcc32
!endif
!if !$d(IDL2CPP)
IDL2CPP = idl2cpp
!endif
# ---------------------------------------------------------------------------
!if $d(PATHCPP)
.PATH.CPP = $(PATHCPP)
.PATH.C = $(PATHCPP)
!endif
!if $d(PATHPAS)
.PATH.PAS = $(PATHPAS)
!endif
!if $d(PATHASM)
.PATH.ASM = $(PATHASM)
!endif
!if $d(PATHRC)
.PATH.RC = $(PATHRC)
!endif
# ---------------------------------------------------------------------------
$(PROJECT): $(IDLGENFILES) $(OBJFILES) $(RESDEPEN) $(DEFFILE)
$(BCB)\BIN\$(LINKER) @&&!
$(LFLAGS) +
$(ALLOBJ), +
$(PROJECT),, +
$(ALLLIB), +
$(DEFFILE), +
$(ALLRES)
!
# ---------------------------------------------------------------------------
.pas.hpp:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.pas.obj:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.cpp.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.cpp.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.asm.obj:
$(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
.rc.res:
$(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
# ---------------------------------------------------------------------------

View File

@ -0,0 +1,21 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("Project1.res");
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,33 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "frxClass"
#pragma link "frxDBSet"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
MainReport->ShowReport(true);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::MainReportClickObject(TfrxView *Sender,
TMouseButton Button, TShiftState Shift, bool &Modified)
{
if(strcmp(Sender->Name.c_str(),"Memo8\0") == 0)
{
DetailQuery->Close();
DetailQuery->ParamByName("custno")->Value = StrToInt(Sender->TagStr);
DetailReport->ShowReport(true);
}
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,80 @@
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "frxClass.hpp"
#include "frxDBSet.hpp"
#include <Db.hpp>
#include <DBTables.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TButton *Button1;
TTable *Customers;
TQuery *DetailQuery;
TfrxReport *MainReport;
TfrxDBDataset *CustomersDS;
TfrxDBDataset *DetailQueryDS;
TfrxReport *DetailReport;
TFloatField *DetailQueryCustNo2;
TStringField *DetailQueryCompany2;
TStringField *DetailQueryAddr12;
TStringField *DetailQueryAddr22;
TStringField *DetailQueryCity2;
TStringField *DetailQueryState2;
TStringField *DetailQueryZip2;
TStringField *DetailQueryCountry2;
TStringField *DetailQueryPhone2;
TStringField *DetailQueryFAX2;
TFloatField *DetailQueryTaxRate2;
TStringField *DetailQueryContact2;
TDateTimeField *DetailQueryLastInvoiceDate2;
TFloatField *DetailQueryOrderNo2;
TFloatField *DetailQueryCustNo_12;
TDateTimeField *DetailQuerySaleDate2;
TDateTimeField *DetailQueryShipDate2;
TIntegerField *DetailQueryEmpNo2;
TStringField *DetailQueryShipToContact2;
TStringField *DetailQueryShipToAddr12;
TStringField *DetailQueryShipToAddr22;
TStringField *DetailQueryShipToCity2;
TStringField *DetailQueryShipToState2;
TStringField *DetailQueryShipToZip2;
TStringField *DetailQueryShipToCountry2;
TStringField *DetailQueryShipToPhone2;
TStringField *DetailQueryShipVIA2;
TStringField *DetailQueryPO2;
TStringField *DetailQueryTerms2;
TStringField *DetailQueryPaymentMethod2;
TCurrencyField *DetailQueryItemsTotal2;
TFloatField *DetailQueryTaxRate_12;
TCurrencyField *DetailQueryFreight2;
TCurrencyField *DetailQueryAmountPaid2;
TFloatField *DetailQueryOrderNo_12;
TFloatField *DetailQueryItemNo2;
TFloatField *DetailQueryPartNo2;
TIntegerField *DetailQueryQty2;
TFloatField *DetailQueryDiscount2;
TFloatField *DetailQueryPartNo_12;
TFloatField *DetailQueryVendorNo2;
TStringField *DetailQueryDescription2;
TFloatField *DetailQueryOnHand2;
TFloatField *DetailQueryOnOrder2;
TCurrencyField *DetailQueryCost2;
TCurrencyField *DetailQueryListPrice2;
void __fastcall Button1Click(TObject *Sender);
void __fastcall MainReportClickObject(TfrxView *Sender,
TMouseButton Button, TShiftState Shift, bool &Modified);
private: // User declarations
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

View File

@ -0,0 +1,210 @@
# ---------------------------------------------------------------------------
!if !$d(BCB)
BCB = $(MAKEDIR)\..
!endif
# ---------------------------------------------------------------------------
# IDE SECTION
# ---------------------------------------------------------------------------
# The following section of the project makefile is managed by the BCB IDE.
# It is recommended to use the IDE to change any of the values in this
# section.
# ---------------------------------------------------------------------------
VERSION = BCB.04.04
# ---------------------------------------------------------------------------
PROJECT = Project1.exe
OBJFILES = Project1.obj Unit1.obj
RESFILES = Project1.res
RESDEPEN = $(RESFILES) Unit1.dfm
LIBFILES =
IDLGENFILES =
IDLFILES =
LIBRARIES =
SPARELIBS = Vcl40.lib frx4.lib VCLX40.lib VCLJPG40.lib FS4.lib
PACKAGES = Vcl40.bpi Vclx40.bpi vcljpg40.bpi Vclmid40.bpi Vcldb40.bpi bcbsmp40.bpi \
ibsmp40.bpi vcldbx40.bpi Qrpt40.bpi TeeUI40.bpi teedb40.bpi tee40.bpi Dss40.bpi \
NMFast40.bpi Inetdb40.bpi Inet40.bpi dclocx40.bpi frx4.bpi fs4.bpi frxe4.bpi \
frxDB4.bpi fsDB4.bpi
DEFFILE =
# ---------------------------------------------------------------------------
PATHCPP = .;
PATHASM = .;
PATHPAS = .;
PATHRC = .;
DEBUGLIBPATH = $(BCB)\lib\debug
RELEASELIBPATH = $(BCB)\lib\release
USERDEFINES =
SYSDEFINES = _RTLDLL;NO_STRICT;USEPACKAGES
# ---------------------------------------------------------------------------
CFLAG1 = -I$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-Od -Hc -H=$(BCB)\lib\vcl40.csm -w -Ve -r- -a8 -k -y -v -vi- -c -b- -w-par \
-w-inl -Vx -tW -tWM -D$(SYSDEFINES);$(USERDEFINES)
IDLCFLAGS = -I$(BCB)\include -I$(BCB)\include\vcl -I..\..\..\Source -I..\..\..\LibBCB4 \
-I..\..\..\LibBCB5 -I..\..\..\LibBCB6 -src_suffixcpp
PFLAGS = -U$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-I$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-$YD -$W -$O- -v -JPHNE -M
RFLAGS = -i$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
AFLAGS = /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\..\Source /i..\..\..\LibBCB4 \
/i..\..\..\LibBCB5 /i..\..\..\LibBCB6 /mx /w2 /zd
LFLAGS = -L$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-aa -Tpe -x -Gn -v
# ---------------------------------------------------------------------------
ALLOBJ = c0w32.obj Memmgr.Lib $(PACKAGES) sysinit.obj $(OBJFILES)
ALLRES = $(RESFILES)
ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mti.lib
# ---------------------------------------------------------------------------
!ifdef IDEOPTIONS
[Version Info]
IncludeVerInfo=0
AutoIncBuild=0
MajorVer=1
MinorVer=0
Release=0
Build=0
Debug=0
PreRelease=0
Special=0
Private=0
DLL=0
Locale=1049
CodePage=1251
[Version Info Keys]
CompanyName=
FileDescription=
FileVersion=1.0.0.0
InternalName=
LegalCopyright=
LegalTrademarks=
OriginalFilename=
ProductName=
ProductVersion=1.0.0.0
Comments=
[HistoryLists\hlIncludePath]
Count=2
Item0=$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\MasterDetailUDS;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\include;$(BCB)\include\vcl;C:\Work\Fast Report\fs\Source;C:\Work\Fast Report\fr4\Source
[HistoryLists\hlLibraryPath]
Count=2
Item0=$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\MasterDetailUDS;$(BCB)\Projects\Lib;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\lib\obj;$(BCB)\lib;C:\Work\Fast Report\fs\Source;C:\Work\Fast Report\fr4\Source
[HistoryLists\hlDebugSourcePath]
Count=1
Item0=$(BCB)\source\vcl
[Debugging]
DebugSourceDirs=$(BCB)\source\vcl
[Parameters]
RunParams=
HostApplication=
RemoteHost=
RemotePath=
RemoteDebug=0
[Compiler]
InMemoryExe=0
ShowInfoMsgs=0
[CORBA]
AddServerUnit=1
AddClientUnit=1
PrecompiledHeaders=1
!endif
# ---------------------------------------------------------------------------
# MAKE SECTION
# ---------------------------------------------------------------------------
# This section of the project file is not used by the BCB IDE. It is for
# the benefit of building from the command-line using the MAKE utility.
# ---------------------------------------------------------------------------
.autodepend
# ---------------------------------------------------------------------------
!if !$d(BCC32)
BCC32 = bcc32
!endif
!if !$d(CPP32)
CPP32 = cpp32
!endif
!if !$d(DCC32)
DCC32 = dcc32
!endif
!if !$d(TASM32)
TASM32 = tasm32
!endif
!if !$d(LINKER)
LINKER = ilink32
!endif
!if !$d(BRCC32)
BRCC32 = brcc32
!endif
!if !$d(IDL2CPP)
IDL2CPP = idl2cpp
!endif
# ---------------------------------------------------------------------------
!if $d(PATHCPP)
.PATH.CPP = $(PATHCPP)
.PATH.C = $(PATHCPP)
!endif
!if $d(PATHPAS)
.PATH.PAS = $(PATHPAS)
!endif
!if $d(PATHASM)
.PATH.ASM = $(PATHASM)
!endif
!if $d(PATHRC)
.PATH.RC = $(PATHRC)
!endif
# ---------------------------------------------------------------------------
$(PROJECT): $(IDLGENFILES) $(OBJFILES) $(RESDEPEN) $(DEFFILE)
$(BCB)\BIN\$(LINKER) @&&!
$(LFLAGS) +
$(ALLOBJ), +
$(PROJECT),, +
$(ALLLIB), +
$(DEFFILE), +
$(ALLRES)
!
# ---------------------------------------------------------------------------
.pas.hpp:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.pas.obj:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.cpp.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.cpp.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.asm.obj:
$(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
.rc.res:
$(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
# ---------------------------------------------------------------------------

View File

@ -0,0 +1,21 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("Project1.res");
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,94 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "frxClass"
#pragma resource "*.dfm"
#define MAX_MASTER 3
#define MAX_DETAIL 15
TForm1 *Form1;
String Master[MAX_MASTER][2] = { // master Id, master name
{"1", "master 1"},
{"2", "master 2"},
{"3", "master 3"}};
String Detail[MAX_DETAIL][2] = { // master Id, detail name
{"1", "detail 1.1"}, {"1", "detail 1.2"}, {"1", "detail 1.3"},
{"1", "detail 1.4"}, {"1", "detail 1.5"}, {"2", "detail 2.1"},
{"2", "detail 2.2"}, {"2", "detail 2.3"}, {"2", "detail 2.4"},
{"2", "detail 2.5"}, {"3", "detail 3.1"}, {"3", "detail 3.2"},
{"3", "detail 3.3"}, {"3", "detail 3.4"}, {"3", "detail 3.5"}};
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::PrintClick(TObject *Sender)
{
frxReport1->ShowReport(true);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::MasterDSFirst(TObject *Sender)
{
MasterNo = 0;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::MasterDSNext(TObject *Sender)
{
MasterNo++;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::MasterDSCheckEOF(TObject *Sender, bool &Eof)
{
Eof = MasterNo > MAX_MASTER - 1;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::MasterDSGetValue(const AnsiString VarName,
Variant &Value)
{
Value = Master[MasterNo][1];
}
//---------------------------------------------------------------------------
void __fastcall TForm1::MasterDSPrior(TObject *Sender)
{
if(MasterNo > 0) MasterNo--;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::DetailDSCheckEOF(TObject *Sender, bool &Eof)
{
Eof = DetailNo > MAX_DETAIL - 1;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::DetailDSFirst(TObject *Sender)
{
DetailNo = 0;
while((!DetailDS->Eof()) && (Detail[DetailNo][0] != Master[MasterNo][0]))
DetailNo++;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::DetailDSGetValue(const AnsiString VarName,
Variant &Value)
{
Value = Detail[DetailNo][1];
}
//---------------------------------------------------------------------------
void __fastcall TForm1::DetailDSNext(TObject *Sender)
{
DetailNo++;
while ((!DetailDS->Eof()) && (Detail[DetailNo][0] != Master[MasterNo][0]))
DetailNo++;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::DetailDSPrior(TObject *Sender)
{
DetailNo--;
while ((DetailNo > 0) && (Detail[DetailNo][0] != Master[MasterNo][0]))
DetailNo--;
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,40 @@
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "frxClass.hpp"
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TfrxReport *frxReport1;
TfrxUserDataSet *MasterDS;
TfrxUserDataSet *DetailDS;
TButton *Print;
void __fastcall PrintClick(TObject *Sender);
void __fastcall MasterDSFirst(TObject *Sender);
void __fastcall MasterDSNext(TObject *Sender);
void __fastcall MasterDSCheckEOF(TObject *Sender, bool &Eof);
void __fastcall MasterDSGetValue(const AnsiString VarName,
Variant &Value);
void __fastcall MasterDSPrior(TObject *Sender);
void __fastcall DetailDSCheckEOF(TObject *Sender, bool &Eof);
void __fastcall DetailDSFirst(TObject *Sender);
void __fastcall DetailDSGetValue(const AnsiString VarName,
Variant &Value);
void __fastcall DetailDSNext(TObject *Sender);
void __fastcall DetailDSPrior(TObject *Sender);
private: // User declarations
int MasterNo;
int DetailNo;
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

View File

@ -0,0 +1,210 @@
# ---------------------------------------------------------------------------
!if !$d(BCB)
BCB = $(MAKEDIR)\..
!endif
# ---------------------------------------------------------------------------
# IDE SECTION
# ---------------------------------------------------------------------------
# The following section of the project makefile is managed by the BCB IDE.
# It is recommended to use the IDE to change any of the values in this
# section.
# ---------------------------------------------------------------------------
VERSION = BCB.04.04
# ---------------------------------------------------------------------------
PROJECT = Project1.exe
OBJFILES = Project1.obj Unit1.obj
RESFILES = Project1.res
RESDEPEN = $(RESFILES) Unit1.dfm
LIBFILES =
IDLGENFILES =
IDLFILES =
LIBRARIES =
SPARELIBS = Vcl40.lib frx4.lib VCLX40.lib VCLJPG40.lib FS4.lib
PACKAGES = Vcl40.bpi Vclx40.bpi vcljpg40.bpi Vclmid40.bpi Vcldb40.bpi bcbsmp40.bpi \
ibsmp40.bpi vcldbx40.bpi Qrpt40.bpi TeeUI40.bpi teedb40.bpi tee40.bpi Dss40.bpi \
NMFast40.bpi Inetdb40.bpi Inet40.bpi dclocx40.bpi frx4.bpi fs4.bpi frxe4.bpi \
frxDB4.bpi fsDB4.bpi
DEFFILE =
# ---------------------------------------------------------------------------
PATHCPP = .;
PATHASM = .;
PATHPAS = .;
PATHRC = .;
DEBUGLIBPATH = $(BCB)\lib\debug
RELEASELIBPATH = $(BCB)\lib\release
USERDEFINES =
SYSDEFINES = _RTLDLL;NO_STRICT;USEPACKAGES
# ---------------------------------------------------------------------------
CFLAG1 = -I$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-Od -Hc -H=$(BCB)\lib\vcl40.csm -w -Ve -r- -a8 -k -y -v -vi- -c -b- -w-par \
-w-inl -Vx -tW -tWM -D$(SYSDEFINES);$(USERDEFINES)
IDLCFLAGS = -I$(BCB)\include -I$(BCB)\include\vcl -I..\..\..\Source -I..\..\..\LibBCB4 \
-I..\..\..\LibBCB5 -I..\..\..\LibBCB6 -src_suffixcpp
PFLAGS = -U$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-I$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-$YD -$W -$O- -v -JPHNE -M
RFLAGS = -i$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
AFLAGS = /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\..\Source /i..\..\..\LibBCB4 \
/i..\..\..\LibBCB5 /i..\..\..\LibBCB6 /mx /w2 /zd
LFLAGS = -L$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-aa -Tpe -x -Gn -v
# ---------------------------------------------------------------------------
ALLOBJ = c0w32.obj Memmgr.Lib $(PACKAGES) sysinit.obj $(OBJFILES)
ALLRES = $(RESFILES)
ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mti.lib
# ---------------------------------------------------------------------------
!ifdef IDEOPTIONS
[Version Info]
IncludeVerInfo=0
AutoIncBuild=0
MajorVer=1
MinorVer=0
Release=0
Build=0
Debug=0
PreRelease=0
Special=0
Private=0
DLL=0
Locale=1049
CodePage=1251
[Version Info Keys]
CompanyName=
FileDescription=
FileVersion=1.0.0.0
InternalName=
LegalCopyright=
LegalTrademarks=
OriginalFilename=
ProductName=
ProductVersion=1.0.0.0
Comments=
[HistoryLists\hlIncludePath]
Count=2
Item0=$(BCB)\include;$(BCB)\include\vcl;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintArray;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\include;$(BCB)\include\vcl;C:\Work\Fast Report\fs\Source;C:\Work\Fast Report\fr4\Source
[HistoryLists\hlLibraryPath]
Count=2
Item0=$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintArray;$(BCB)\Projects\Lib;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\lib\obj;$(BCB)\lib;C:\Work\Fast Report\fs\Source;C:\Work\Fast Report\fr4\Source
[HistoryLists\hlDebugSourcePath]
Count=1
Item0=$(BCB)\source\vcl
[Debugging]
DebugSourceDirs=$(BCB)\source\vcl
[Parameters]
RunParams=
HostApplication=
RemoteHost=
RemotePath=
RemoteDebug=0
[Compiler]
InMemoryExe=0
ShowInfoMsgs=0
[CORBA]
AddServerUnit=1
AddClientUnit=1
PrecompiledHeaders=1
!endif
# ---------------------------------------------------------------------------
# MAKE SECTION
# ---------------------------------------------------------------------------
# This section of the project file is not used by the BCB IDE. It is for
# the benefit of building from the command-line using the MAKE utility.
# ---------------------------------------------------------------------------
.autodepend
# ---------------------------------------------------------------------------
!if !$d(BCC32)
BCC32 = bcc32
!endif
!if !$d(CPP32)
CPP32 = cpp32
!endif
!if !$d(DCC32)
DCC32 = dcc32
!endif
!if !$d(TASM32)
TASM32 = tasm32
!endif
!if !$d(LINKER)
LINKER = ilink32
!endif
!if !$d(BRCC32)
BRCC32 = brcc32
!endif
!if !$d(IDL2CPP)
IDL2CPP = idl2cpp
!endif
# ---------------------------------------------------------------------------
!if $d(PATHCPP)
.PATH.CPP = $(PATHCPP)
.PATH.C = $(PATHCPP)
!endif
!if $d(PATHPAS)
.PATH.PAS = $(PATHPAS)
!endif
!if $d(PATHASM)
.PATH.ASM = $(PATHASM)
!endif
!if $d(PATHRC)
.PATH.RC = $(PATHRC)
!endif
# ---------------------------------------------------------------------------
$(PROJECT): $(IDLGENFILES) $(OBJFILES) $(RESDEPEN) $(DEFFILE)
$(BCB)\BIN\$(LINKER) @&&!
$(LFLAGS) +
$(ALLOBJ), +
$(PROJECT),, +
$(ALLLIB), +
$(DEFFILE), +
$(ALLRES)
!
# ---------------------------------------------------------------------------
.pas.hpp:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.pas.obj:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.cpp.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.cpp.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.asm.obj:
$(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
.rc.res:
$(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
# ---------------------------------------------------------------------------

View File

@ -0,0 +1,21 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("Project1.res");
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,33 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "frxClass"
#pragma resource "*.dfm"
TForm1 *Form1;
int ar[10] = {0,1,2,3,4,5,6,7,8,9};
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ArrayDS->RangeEnd = reCount;
ArrayDS->RangeEndCount = 10;
frxReport1->ShowReport(true);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::frxReport1GetValue(const AnsiString VarName,
Variant &Value)
{
if(CompareText(VarName, "element") == 0)
Value = ar[ArrayDS->RecNo];
}
//---------------------------------------------------------------------------

Binary file not shown.

View File

@ -0,0 +1,27 @@
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "frxClass.hpp"
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TButton *Button1;
TfrxReport *frxReport1;
TfrxUserDataSet *ArrayDS;
void __fastcall Button1Click(TObject *Sender);
void __fastcall frxReport1GetValue(const AnsiString VarName,
Variant &Value);
private: // User declarations
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

View File

@ -0,0 +1,210 @@
# ---------------------------------------------------------------------------
!if !$d(BCB)
BCB = $(MAKEDIR)\..
!endif
# ---------------------------------------------------------------------------
# IDE SECTION
# ---------------------------------------------------------------------------
# The following section of the project makefile is managed by the BCB IDE.
# It is recommended to use the IDE to change any of the values in this
# section.
# ---------------------------------------------------------------------------
VERSION = BCB.04.04
# ---------------------------------------------------------------------------
PROJECT = Project1.exe
OBJFILES = Project1.obj Unit1.obj
RESFILES = Project1.res
RESDEPEN = $(RESFILES) Unit1.dfm
LIBFILES =
IDLGENFILES =
IDLFILES =
LIBRARIES =
SPARELIBS = Vcl40.lib frx4.lib VCLX40.lib VCLJPG40.lib FS4.lib
PACKAGES = Vcl40.bpi Vclx40.bpi vcljpg40.bpi Vclmid40.bpi Vcldb40.bpi bcbsmp40.bpi \
ibsmp40.bpi vcldbx40.bpi Qrpt40.bpi TeeUI40.bpi teedb40.bpi tee40.bpi Dss40.bpi \
NMFast40.bpi Inetdb40.bpi Inet40.bpi dclocx40.bpi frx4.bpi fs4.bpi frxe4.bpi \
frxDB4.bpi fsDB4.bpi
DEFFILE =
# ---------------------------------------------------------------------------
PATHCPP = .;
PATHASM = .;
PATHPAS = .;
PATHRC = .;
DEBUGLIBPATH = $(BCB)\lib\debug
RELEASELIBPATH = $(BCB)\lib\release
USERDEFINES =
SYSDEFINES = _RTLDLL;NO_STRICT;USEPACKAGES
# ---------------------------------------------------------------------------
CFLAG1 = -I..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-Od -Hc -H=$(BCB)\lib\vcl40.csm -w -Ve -r- -a8 -k -y -v -vi- -c -b- -w-par \
-w-inl -Vx -tW -tWM -D$(SYSDEFINES);$(USERDEFINES)
IDLCFLAGS = -I..\..\..\Source -I$(BCB)\include -I$(BCB)\include\vcl -I..\..\..\LibBCB4 \
-I..\..\..\LibBCB5 -I..\..\..\LibBCB6 -src_suffixcpp
PFLAGS = -U$(BCB)\Projects\Lib;..\..\..\Source;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-I..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-$YD -$W -$O- -v -JPHNE -M
RFLAGS = -i..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
AFLAGS = /i..\..\..\Source /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\..\LibBCB4 \
/i..\..\..\LibBCB5 /i..\..\..\LibBCB6 /mx /w2 /zd
LFLAGS = -L$(BCB)\Projects\Lib;..\..\..\Source;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-aa -Tpe -x -Gn -v
# ---------------------------------------------------------------------------
ALLOBJ = c0w32.obj Memmgr.Lib $(PACKAGES) sysinit.obj $(OBJFILES)
ALLRES = $(RESFILES)
ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mti.lib
# ---------------------------------------------------------------------------
!ifdef IDEOPTIONS
[Version Info]
IncludeVerInfo=0
AutoIncBuild=0
MajorVer=1
MinorVer=0
Release=0
Build=0
Debug=0
PreRelease=0
Special=0
Private=0
DLL=0
Locale=1049
CodePage=1251
[Version Info Keys]
CompanyName=
FileDescription=
FileVersion=1.0.0.0
InternalName=
LegalCopyright=
LegalTrademarks=
OriginalFilename=
ProductName=
ProductVersion=1.0.0.0
Comments=
[HistoryLists\hlIncludePath]
Count=2
Item0=..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintFile;C:\Work\Fast Report\fr4\Source;$(BCB)\include;$(BCB)\include\vcl;C:\Work\Fast Report\fs\Source
[HistoryLists\hlLibraryPath]
Count=2
Item0=$(BCB)\Projects\Lib;..\..\..\Source;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintFile;$(BCB)\Projects\Lib;C:\Work\Fast Report\fr4\Source;$(BCB)\lib\obj;$(BCB)\lib;C:\Work\Fast Report\fs\Source
[HistoryLists\hlDebugSourcePath]
Count=1
Item0=$(BCB)\source\vcl
[Debugging]
DebugSourceDirs=$(BCB)\source\vcl
[Parameters]
RunParams=
HostApplication=
RemoteHost=
RemotePath=
RemoteDebug=0
[Compiler]
InMemoryExe=0
ShowInfoMsgs=0
[CORBA]
AddServerUnit=1
AddClientUnit=1
PrecompiledHeaders=1
!endif
# ---------------------------------------------------------------------------
# MAKE SECTION
# ---------------------------------------------------------------------------
# This section of the project file is not used by the BCB IDE. It is for
# the benefit of building from the command-line using the MAKE utility.
# ---------------------------------------------------------------------------
.autodepend
# ---------------------------------------------------------------------------
!if !$d(BCC32)
BCC32 = bcc32
!endif
!if !$d(CPP32)
CPP32 = cpp32
!endif
!if !$d(DCC32)
DCC32 = dcc32
!endif
!if !$d(TASM32)
TASM32 = tasm32
!endif
!if !$d(LINKER)
LINKER = ilink32
!endif
!if !$d(BRCC32)
BRCC32 = brcc32
!endif
!if !$d(IDL2CPP)
IDL2CPP = idl2cpp
!endif
# ---------------------------------------------------------------------------
!if $d(PATHCPP)
.PATH.CPP = $(PATHCPP)
.PATH.C = $(PATHCPP)
!endif
!if $d(PATHPAS)
.PATH.PAS = $(PATHPAS)
!endif
!if $d(PATHASM)
.PATH.ASM = $(PATHASM)
!endif
!if $d(PATHRC)
.PATH.RC = $(PATHRC)
!endif
# ---------------------------------------------------------------------------
$(PROJECT): $(IDLGENFILES) $(OBJFILES) $(RESDEPEN) $(DEFFILE)
$(BCB)\BIN\$(LINKER) @&&!
$(LFLAGS) +
$(ALLOBJ), +
$(PROJECT),, +
$(ALLLIB), +
$(DEFFILE), +
$(ALLRES)
!
# ---------------------------------------------------------------------------
.pas.hpp:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.pas.obj:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.cpp.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.cpp.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.asm.obj:
$(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
.rc.res:
$(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
# ---------------------------------------------------------------------------

View File

@ -0,0 +1,21 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("Project1.res");
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------

Binary file not shown.

View File

@ -0,0 +1,35 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "frxClass"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::frxReport1GetValue(const AnsiString VarName,
Variant &Value)
{
if(CompareText(VarName, "file") == 0)
{
TStringList * sl = new TStringList;
sl->LoadFromFile("Unit1.cpp");
Value = sl->Text;
delete sl;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
frxReport1->ShowReport(true);
}
//---------------------------------------------------------------------------

Binary file not shown.

View File

@ -0,0 +1,26 @@
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "frxClass.hpp"
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TButton *Button1;
TfrxReport *frxReport1;
void __fastcall frxReport1GetValue(const AnsiString VarName,
Variant &Value);
void __fastcall Button1Click(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

View File

@ -0,0 +1,210 @@
# ---------------------------------------------------------------------------
!if !$d(BCB)
BCB = $(MAKEDIR)\..
!endif
# ---------------------------------------------------------------------------
# IDE SECTION
# ---------------------------------------------------------------------------
# The following section of the project makefile is managed by the BCB IDE.
# It is recommended to use the IDE to change any of the values in this
# section.
# ---------------------------------------------------------------------------
VERSION = BCB.04.04
# ---------------------------------------------------------------------------
PROJECT = Project1.exe
OBJFILES = Project1.obj Unit1.obj
RESFILES = Project1.res
RESDEPEN = $(RESFILES) Unit1.dfm
LIBFILES =
IDLGENFILES =
IDLFILES =
LIBRARIES =
SPARELIBS = Vcl40.lib frx4.lib VCLX40.lib VCLJPG40.lib FS4.lib
PACKAGES = Vcl40.bpi Vclx40.bpi vcljpg40.bpi Vclmid40.bpi Vcldb40.bpi bcbsmp40.bpi \
ibsmp40.bpi vcldbx40.bpi Qrpt40.bpi TeeUI40.bpi teedb40.bpi tee40.bpi Dss40.bpi \
NMFast40.bpi Inetdb40.bpi Inet40.bpi dclocx40.bpi frx4.bpi fs4.bpi frxe4.bpi \
frxDB4.bpi fsDB4.bpi
DEFFILE =
# ---------------------------------------------------------------------------
PATHCPP = .;
PATHASM = .;
PATHPAS = .;
PATHRC = .;
DEBUGLIBPATH = $(BCB)\lib\debug
RELEASELIBPATH = $(BCB)\lib\release
USERDEFINES =
SYSDEFINES = _RTLDLL;NO_STRICT;USEPACKAGES
# ---------------------------------------------------------------------------
CFLAG1 = -I..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-Od -Hc -H=$(BCB)\lib\vcl40.csm -w -Ve -r- -a8 -k -y -v -vi- -c -b- -w-par \
-w-inl -Vx -tW -tWM -D$(SYSDEFINES);$(USERDEFINES)
IDLCFLAGS = -I..\..\..\Source -I$(BCB)\include -I$(BCB)\include\vcl -I..\..\..\LibBCB4 \
-I..\..\..\LibBCB5 -I..\..\..\LibBCB6 -src_suffixcpp
PFLAGS = -U..\..\..\Source;$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-I..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-$YD -$W -$O- -v -JPHNE -M
RFLAGS = -i..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
AFLAGS = /i..\..\..\Source /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\..\LibBCB4 \
/i..\..\..\LibBCB5 /i..\..\..\LibBCB6 /mx /w2 /zd
LFLAGS = -L..\..\..\Source;$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-aa -Tpe -x -Gn -v
# ---------------------------------------------------------------------------
ALLOBJ = c0w32.obj Memmgr.Lib $(PACKAGES) sysinit.obj $(OBJFILES)
ALLRES = $(RESFILES)
ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mti.lib
# ---------------------------------------------------------------------------
!ifdef IDEOPTIONS
[Version Info]
IncludeVerInfo=0
AutoIncBuild=0
MajorVer=1
MinorVer=0
Release=0
Build=0
Debug=0
PreRelease=0
Special=0
Private=0
DLL=0
Locale=1049
CodePage=1251
[Version Info Keys]
CompanyName=
FileDescription=
FileVersion=1.0.0.0
InternalName=
LegalCopyright=
LegalTrademarks=
OriginalFilename=
ProductName=
ProductVersion=1.0.0.0
Comments=
[HistoryLists\hlIncludePath]
Count=2
Item0=..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\Source;..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintStringGrid;$(BCB)\include;$(BCB)\include\vcl;C:\Work\Fast Report\fr4\Source;C:\Work\Fast Report\fs\Source
[HistoryLists\hlLibraryPath]
Count=2
Item0=..\..\..\Source;$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\Source;..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintStringGrid;$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;C:\Work\Fast Report\fr4\Source;C:\Work\Fast Report\fs\Source
[HistoryLists\hlDebugSourcePath]
Count=1
Item0=$(BCB)\source\vcl
[Debugging]
DebugSourceDirs=$(BCB)\source\vcl
[Parameters]
RunParams=
HostApplication=
RemoteHost=
RemotePath=
RemoteDebug=0
[Compiler]
InMemoryExe=0
ShowInfoMsgs=0
[CORBA]
AddServerUnit=1
AddClientUnit=1
PrecompiledHeaders=1
!endif
# ---------------------------------------------------------------------------
# MAKE SECTION
# ---------------------------------------------------------------------------
# This section of the project file is not used by the BCB IDE. It is for
# the benefit of building from the command-line using the MAKE utility.
# ---------------------------------------------------------------------------
.autodepend
# ---------------------------------------------------------------------------
!if !$d(BCC32)
BCC32 = bcc32
!endif
!if !$d(CPP32)
CPP32 = cpp32
!endif
!if !$d(DCC32)
DCC32 = dcc32
!endif
!if !$d(TASM32)
TASM32 = tasm32
!endif
!if !$d(LINKER)
LINKER = ilink32
!endif
!if !$d(BRCC32)
BRCC32 = brcc32
!endif
!if !$d(IDL2CPP)
IDL2CPP = idl2cpp
!endif
# ---------------------------------------------------------------------------
!if $d(PATHCPP)
.PATH.CPP = $(PATHCPP)
.PATH.C = $(PATHCPP)
!endif
!if $d(PATHPAS)
.PATH.PAS = $(PATHPAS)
!endif
!if $d(PATHASM)
.PATH.ASM = $(PATHASM)
!endif
!if $d(PATHRC)
.PATH.RC = $(PATHRC)
!endif
# ---------------------------------------------------------------------------
$(PROJECT): $(IDLGENFILES) $(OBJFILES) $(RESDEPEN) $(DEFFILE)
$(BCB)\BIN\$(LINKER) @&&!
$(LFLAGS) +
$(ALLOBJ), +
$(PROJECT),, +
$(ALLLIB), +
$(DEFFILE), +
$(ALLRES)
!
# ---------------------------------------------------------------------------
.pas.hpp:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.pas.obj:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.cpp.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.cpp.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.asm.obj:
$(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
.rc.res:
$(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
# ---------------------------------------------------------------------------

View File

@ -0,0 +1,21 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("Project1.res");
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,53 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "frxClass"
#pragma link "frxCross"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
int idx1,idx2;
for(idx1 = 1; idx1 < 17; idx1++)
for(idx2 = 1; idx2 < 17; idx2++)
StringGrid1->Cells[idx1 - 1][idx2 - 1] = IntToStr(idx1 * idx2);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::frxReport1BeforePrint(TfrxReportComponent *Sender)
{
TfrxCrossView * Cross = NULL;
int idx1,idx2;
Variant Row,Col,Text;
if(strcmp(Sender->Name.c_str(),"Cross1\0") == 0)
if(Cross = dynamic_cast <TfrxCrossView *> (Sender))
{
for(idx1 = 0; idx1 < StringGrid1->RowCount; idx1++)
for(idx2 = 0; idx2 < StringGrid1->ColCount; idx2++)
{
Row = idx1;
Col = idx2;
Text = StringGrid1->Cells[idx1][idx2];
Cross->AddValue(&Row,1,&Col,1,&Text,1);
}
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
frxReport1->ShowReport(true);
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,30 @@
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Grids.hpp>
#include "frxClass.hpp"
#include "frxCross.hpp"
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TButton *Button1;
TStringGrid *StringGrid1;
TfrxReport *frxReport1;
TfrxCrossObject *frxCrossObject1;
void __fastcall FormCreate(TObject *Sender);
void __fastcall frxReport1BeforePrint(TfrxReportComponent *Sender);
void __fastcall Button1Click(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

View File

@ -0,0 +1,214 @@
# ---------------------------------------------------------------------------
!if !$d(BCB)
BCB = $(MAKEDIR)\..
!endif
# ---------------------------------------------------------------------------
# IDE SECTION
# ---------------------------------------------------------------------------
# The following section of the project makefile is managed by the BCB IDE.
# It is recommended to use the IDE to change any of the values in this
# section.
# ---------------------------------------------------------------------------
VERSION = BCB.04.04
# ---------------------------------------------------------------------------
PROJECT = Project1.exe
OBJFILES = Project1.obj Unit1.obj
RESFILES = Project1.res
RESDEPEN = $(RESFILES) Unit1.dfm
LIBFILES =
IDLGENFILES =
IDLFILES =
LIBRARIES =
SPARELIBS = Vcl40.lib frx4.lib VCLX40.lib VCLJPG40.lib FS4.lib
PACKAGES = Vcl40.bpi Vclx40.bpi vcljpg40.bpi Vclmid40.bpi Vcldb40.bpi bcbsmp40.bpi \
ibsmp40.bpi vcldbx40.bpi Qrpt40.bpi TeeUI40.bpi teedb40.bpi tee40.bpi Dss40.bpi \
NMFast40.bpi Inetdb40.bpi Inet40.bpi dclocx40.bpi frx4.bpi fs4.bpi frxe4.bpi \
frxDB4.bpi fsDB4.bpi
DEFFILE =
# ---------------------------------------------------------------------------
PATHCPP = .;
PATHASM = .;
PATHPAS = .;
PATHRC = .;
DEBUGLIBPATH = $(BCB)\lib\debug
RELEASELIBPATH = $(BCB)\lib\release
USERDEFINES =
SYSDEFINES = _RTLDLL;NO_STRICT;USEPACKAGES
# ---------------------------------------------------------------------------
CFLAG1 = -I..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-Od -Hc -H=$(BCB)\lib\vcl40.csm -w -Ve -r- -a8 -k -y -v -vi- -c -b- -w-par \
-w-inl -Vx -tW -tWM -D$(SYSDEFINES);$(USERDEFINES)
IDLCFLAGS = -I..\..\..\Source -I$(BCB)\include -I$(BCB)\include\vcl -I..\..\..\LibBCB4 \
-I..\..\..\LibBCB5 -I..\..\..\LibBCB6 -src_suffixcpp
PFLAGS = -U$(BCB)\Projects\Lib;..\..\..\Source;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-I..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-$YD -$W -$O- -v -JPHNE -M
RFLAGS = -i..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
AFLAGS = /i..\..\..\Source /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\..\LibBCB4 \
/i..\..\..\LibBCB5 /i..\..\..\LibBCB6 /mx /w2 /zd
LFLAGS = -L$(BCB)\Projects\Lib;..\..\..\Source;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-aa -Tpe -x -Gn -v
# ---------------------------------------------------------------------------
ALLOBJ = c0w32.obj Memmgr.Lib $(PACKAGES) sysinit.obj $(OBJFILES)
ALLRES = $(RESFILES)
ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mti.lib
# ---------------------------------------------------------------------------
!ifdef IDEOPTIONS
[Version Info]
IncludeVerInfo=0
AutoIncBuild=0
MajorVer=1
MinorVer=0
Release=0
Build=0
Debug=0
PreRelease=0
Special=0
Private=0
DLL=0
Locale=1049
CodePage=1251
[Version Info Keys]
CompanyName=
FileDescription=
FileVersion=1.0.0.0
InternalName=
LegalCopyright=
LegalTrademarks=
OriginalFilename=
ProductName=
ProductVersion=1.0.0.0
Comments=
[HistoryLists\hlIncludePath]
Count=4
Item0=..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintStringList;C:\Work\Fast Report\fr4\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\..\Work\Fast Report\fs\Source;..\..\..\Source;C:\Work\Fast Report\fs\Source
Item2=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintStringList;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\..\Work\Fast Report\fs\Source;C:\Work\Fast Report\fr4\Source
Item3=..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\include;$(BCB)\include\vcl;C:\Work\Fast Report\fs\Source
[HistoryLists\hlLibraryPath]
Count=4
Item0=$(BCB)\Projects\Lib;..\..\..\Source;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintStringList;$(BCB)\Projects\Lib;C:\Work\Fast Report\fr4\Source;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\..\Work\Fast Report\fs\Source;C:\Work\Fast Report\fs\Source
Item2=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintStringList;$(BCB)\Projects\Lib;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\..\Work\Fast Report\fs\Source
Item3=$(BCB)\Projects\Lib;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\lib\obj;$(BCB)\lib;C:\Work\Fast Report\fs\Source
[HistoryLists\hlDebugSourcePath]
Count=1
Item0=$(BCB)\source\vcl
[Debugging]
DebugSourceDirs=$(BCB)\source\vcl
[Parameters]
RunParams=
HostApplication=
RemoteHost=
RemotePath=
RemoteDebug=0
[Compiler]
InMemoryExe=0
ShowInfoMsgs=0
[CORBA]
AddServerUnit=1
AddClientUnit=1
PrecompiledHeaders=1
!endif
# ---------------------------------------------------------------------------
# MAKE SECTION
# ---------------------------------------------------------------------------
# This section of the project file is not used by the BCB IDE. It is for
# the benefit of building from the command-line using the MAKE utility.
# ---------------------------------------------------------------------------
.autodepend
# ---------------------------------------------------------------------------
!if !$d(BCC32)
BCC32 = bcc32
!endif
!if !$d(CPP32)
CPP32 = cpp32
!endif
!if !$d(DCC32)
DCC32 = dcc32
!endif
!if !$d(TASM32)
TASM32 = tasm32
!endif
!if !$d(LINKER)
LINKER = ilink32
!endif
!if !$d(BRCC32)
BRCC32 = brcc32
!endif
!if !$d(IDL2CPP)
IDL2CPP = idl2cpp
!endif
# ---------------------------------------------------------------------------
!if $d(PATHCPP)
.PATH.CPP = $(PATHCPP)
.PATH.C = $(PATHCPP)
!endif
!if $d(PATHPAS)
.PATH.PAS = $(PATHPAS)
!endif
!if $d(PATHASM)
.PATH.ASM = $(PATHASM)
!endif
!if $d(PATHRC)
.PATH.RC = $(PATHRC)
!endif
# ---------------------------------------------------------------------------
$(PROJECT): $(IDLGENFILES) $(OBJFILES) $(RESDEPEN) $(DEFFILE)
$(BCB)\BIN\$(LINKER) @&&!
$(LFLAGS) +
$(ALLOBJ), +
$(PROJECT),, +
$(ALLLIB), +
$(DEFFILE), +
$(ALLRES)
!
# ---------------------------------------------------------------------------
.pas.hpp:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.pas.obj:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.cpp.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.cpp.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.asm.obj:
$(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
.rc.res:
$(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
# ---------------------------------------------------------------------------

View File

@ -0,0 +1,21 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("Project1.res");
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,38 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "frxClass"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
sl = new TStringList;
for(int idx = 0; idx < 10; idx++, sl->Add(IntToStr(idx)));
}
//---------------------------------------------------------------------------
__fastcall TForm1::~TForm1()
{
delete sl;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
StringDS->RangeEnd = reCount;
StringDS->RangeEndCount = sl->Count;
frxReport1->ShowReport(true);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::frxReport1GetValue(const AnsiString VarName,
Variant &Value)
{
if(CompareText(VarName, "element") == 0)
Value = sl->Strings[StringDS->RecNo];
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,29 @@
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "frxClass.hpp"
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TfrxReport *frxReport1;
TfrxUserDataSet *StringDS;
TButton *Button1;
void __fastcall Button1Click(TObject *Sender);
void __fastcall frxReport1GetValue(const AnsiString VarName,
Variant &Value);
private: // User declarations
TStringList * sl;
public: // User declarations
__fastcall TForm1(TComponent* Owner);
__fastcall ~TForm1();
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

View File

@ -0,0 +1,210 @@
# ---------------------------------------------------------------------------
!if !$d(BCB)
BCB = $(MAKEDIR)\..
!endif
# ---------------------------------------------------------------------------
# IDE SECTION
# ---------------------------------------------------------------------------
# The following section of the project makefile is managed by the BCB IDE.
# It is recommended to use the IDE to change any of the values in this
# section.
# ---------------------------------------------------------------------------
VERSION = BCB.04.04
# ---------------------------------------------------------------------------
PROJECT = Project1.exe
OBJFILES = Project1.obj Unit1.obj
RESFILES = Project1.res
RESDEPEN = $(RESFILES) Unit1.dfm
LIBFILES =
IDLGENFILES =
IDLFILES =
LIBRARIES =
SPARELIBS = Vcl40.lib Vcldb40.lib frx4.lib VCLX40.lib VCLJPG40.lib FS4.lib
PACKAGES = Vcl40.bpi Vclx40.bpi vcljpg40.bpi Vclmid40.bpi Vcldb40.bpi bcbsmp40.bpi \
ibsmp40.bpi vcldbx40.bpi Qrpt40.bpi TeeUI40.bpi teedb40.bpi tee40.bpi Dss40.bpi \
NMFast40.bpi Inetdb40.bpi Inet40.bpi dclocx40.bpi frx4.bpi fs4.bpi frxe4.bpi \
frxDB4.bpi fsDB4.bpi
DEFFILE =
# ---------------------------------------------------------------------------
PATHCPP = .;
PATHASM = .;
PATHPAS = .;
PATHRC = .;
DEBUGLIBPATH = $(BCB)\lib\debug
RELEASELIBPATH = $(BCB)\lib\release
USERDEFINES =
SYSDEFINES = _RTLDLL;NO_STRICT;USEPACKAGES
# ---------------------------------------------------------------------------
CFLAG1 = -I..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-Od -Hc -H=$(BCB)\lib\vcl40.csm -w -Ve -r- -a8 -k -y -v -vi- -c -b- -w-par \
-w-inl -Vx -tW -tWM -D$(SYSDEFINES);$(USERDEFINES)
IDLCFLAGS = -I..\..\..\Source -I$(BCB)\include -I$(BCB)\include\vcl -I..\..\..\LibBCB4 \
-I..\..\..\LibBCB5 -I..\..\..\LibBCB6 -src_suffixcpp
PFLAGS = -U$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-I..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6 \
-$YD -$W -$O- -v -JPHNE -M
RFLAGS = -i..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
AFLAGS = /i..\..\..\Source /i$(BCB)\include /i$(BCB)\include\vcl /i..\..\..\LibBCB4 \
/i..\..\..\LibBCB5 /i..\..\..\LibBCB6 /mx /w2 /zd
LFLAGS = -L$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6;$(RELEASELIBPATH) \
-aa -Tpe -x -Gn -v
# ---------------------------------------------------------------------------
ALLOBJ = c0w32.obj Memmgr.Lib $(PACKAGES) sysinit.obj $(OBJFILES)
ALLRES = $(RESFILES)
ALLLIB = $(LIBFILES) $(LIBRARIES) import32.lib cp32mti.lib
# ---------------------------------------------------------------------------
!ifdef IDEOPTIONS
[Version Info]
IncludeVerInfo=0
AutoIncBuild=0
MajorVer=1
MinorVer=0
Release=0
Build=0
Debug=0
PreRelease=0
Special=0
Private=0
DLL=0
Locale=1049
CodePage=1251
[Version Info Keys]
CompanyName=
FileDescription=
FileVersion=1.0.0.0
InternalName=
LegalCopyright=
LegalTrademarks=
OriginalFilename=
ProductName=
ProductVersion=1.0.0.0
Comments=
[HistoryLists\hlIncludePath]
Count=2
Item0=..\..\..\Source;$(BCB)\include;$(BCB)\include\vcl;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintTable;C:\Work\Fast Report\fr4\Source;$(BCB)\include;$(BCB)\include\vcl;C:\Work\Fast Report\fs\Source
[HistoryLists\hlLibraryPath]
Count=2
Item0=$(BCB)\Projects\Lib;$(BCB)\lib\obj;$(BCB)\lib;..\..\..\Source;..\..\..\LibBCB4;..\..\..\LibBCB5;..\..\..\LibBCB6
Item1=..\..\..\..\Work\Fast Report\fr4\Demos\BCB Demos\PrintTable;$(BCB)\Projects\Lib;..\..\..\..\Work\Fast Report\fr4\Source;$(BCB)\lib\obj;$(BCB)\lib;C:\Work\Fast Report\fr4\Source;C:\Work\Fast Report\fs\Source
[HistoryLists\hlDebugSourcePath]
Count=1
Item0=$(BCB)\source\vcl
[Debugging]
DebugSourceDirs=$(BCB)\source\vcl
[Parameters]
RunParams=
HostApplication=
RemoteHost=
RemotePath=
RemoteDebug=0
[Compiler]
InMemoryExe=0
ShowInfoMsgs=0
[CORBA]
AddServerUnit=1
AddClientUnit=1
PrecompiledHeaders=1
!endif
# ---------------------------------------------------------------------------
# MAKE SECTION
# ---------------------------------------------------------------------------
# This section of the project file is not used by the BCB IDE. It is for
# the benefit of building from the command-line using the MAKE utility.
# ---------------------------------------------------------------------------
.autodepend
# ---------------------------------------------------------------------------
!if !$d(BCC32)
BCC32 = bcc32
!endif
!if !$d(CPP32)
CPP32 = cpp32
!endif
!if !$d(DCC32)
DCC32 = dcc32
!endif
!if !$d(TASM32)
TASM32 = tasm32
!endif
!if !$d(LINKER)
LINKER = ilink32
!endif
!if !$d(BRCC32)
BRCC32 = brcc32
!endif
!if !$d(IDL2CPP)
IDL2CPP = idl2cpp
!endif
# ---------------------------------------------------------------------------
!if $d(PATHCPP)
.PATH.CPP = $(PATHCPP)
.PATH.C = $(PATHCPP)
!endif
!if $d(PATHPAS)
.PATH.PAS = $(PATHPAS)
!endif
!if $d(PATHASM)
.PATH.ASM = $(PATHASM)
!endif
!if $d(PATHRC)
.PATH.RC = $(PATHRC)
!endif
# ---------------------------------------------------------------------------
$(PROJECT): $(IDLGENFILES) $(OBJFILES) $(RESDEPEN) $(DEFFILE)
$(BCB)\BIN\$(LINKER) @&&!
$(LFLAGS) +
$(ALLOBJ), +
$(PROJECT),, +
$(ALLLIB), +
$(DEFFILE), +
$(ALLRES)
!
# ---------------------------------------------------------------------------
.pas.hpp:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.pas.obj:
$(BCB)\BIN\$(DCC32) $(PFLAGS) {$< }
.cpp.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.obj:
$(BCB)\BIN\$(BCC32) $(CFLAG1) -n$(@D) {$< }
.c.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.cpp.i:
$(BCB)\BIN\$(CPP32) $(CFLAG1) -n. {$< }
.asm.obj:
$(BCB)\BIN\$(TASM32) $(AFLAGS) $<, $@
.rc.res:
$(BCB)\BIN\$(BRCC32) $(RFLAGS) -fo$@ $<
# ---------------------------------------------------------------------------

View File

@ -0,0 +1,21 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("Project1.res");
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TForm1), &Form1);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------

View File

@ -0,0 +1,53 @@
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "frxClass"
#pragma link "frxCross"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
frxReport1->ShowReport(true);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::frxReport1BeforePrint(TfrxReportComponent *Sender)
{
TfrxCrossView * Cross;
int i, j;
Variant Row,Col,Text;
Cross = dynamic_cast <TfrxCrossView *> (Sender);
if(Cross != NULL)
{
Table1->First();
i = 0;
while (!Table1->Eof)
{
for(j = 0; j < Table1->Fields->Count; j++)
{
Row = i;
Col = Table1->Fields->Fields[j]->DisplayLabel;
Text = Table1->Fields->Fields[j]->AsString;
Cross->AddValue(&Row, 1, &Col, 1, &Text, 1);
}
Table1->Next();
i++;
}
}
}
//---------------------------------------------------------------------------

Binary file not shown.

View File

@ -0,0 +1,30 @@
//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "frxClass.hpp"
#include "frxCross.hpp"
#include <Db.hpp>
#include <DBTables.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TButton *Button1;
TfrxReport *frxReport1;
TfrxCrossObject *frxCrossObject1;
TTable *Table1;
void __fastcall Button1Click(TObject *Sender);
void __fastcall frxReport1BeforePrint(TfrxReportComponent *Sender);
private: // User declarations
public: // User declarations
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

View File

@ -0,0 +1,13 @@
program CallDLL;
uses
Forms,
TestDLL in 'TestDLL.pas' {frmCallDLL};
{$R *.RES}
begin
Application.Initialize;
Application.CreateForm(TfrmCallDLL, frmCallDLL);
Application.Run;
end.

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,62 @@
unit FormDLL;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls,
Forms, Dialogs, StdCtrls, DBTables, DB, frxDBSet, frxClass;
type
TfrmDLL = class(TForm)
btnBioLifePrintPreview: TButton;
Table1: TTable;
frxDBDataset1: TfrxDBDataset;
frxReport1: TfrxReport;
procedure btnBioLifePrintPreviewClick(Sender: TObject);
procedure FormActivate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;
function ShowForm(A: TApplication): Bool; StdCall;
implementation
{$R *.DFM}
{------------------------------------------------------------------------}
function ShowForm(A: TApplication): Bool;
var
Form1: TfrmDLL;
begin
Application.Handle := A.Handle;
Form1 := TfrmDLL.Create(A);
try
Result := (Form1.ShowModal = mrOK);
finally
Form1.Free;
end;
end;
procedure TfrmDLL.btnBioLifePrintPreviewClick(Sender: TObject);
begin
frxReport1.ShowReport;
end;
procedure TfrmDLL.FormActivate(Sender: TObject);
begin
Session.Active := True;
end;
procedure TfrmDLL.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Session.Active := False;
end;
end.

Binary file not shown.

View File

@ -0,0 +1,11 @@
library RptDLL;
uses
Forms,
FormDLL in 'FormDLL.pas' {frmDLL};
exports
ShowForm;
begin
end.

Binary file not shown.

View File

@ -0,0 +1,53 @@
unit TestDLL;
interface
uses
SysUtils, Windows, Messages, Classes, Graphics, Controls,
Forms, Dialogs, StdCtrls, DB, ExtCtrls, DBTables;
type
TShowForm = function(A: TApplication): Bool; StdCall;
EDLLLoadError = class(Exception);
TfrmCallDLL = class(TForm)
Database1: TDatabase;
btnCallDLL: TButton;
btnClose: TButton;
procedure btnCallDLLClick(Sender: TObject);
procedure btnCloseClick(Sender: TObject);
end;
var
frmCallDLL: TfrmCallDLL;
implementation
{$R *.DFM}
procedure TfrmCallDLL.btnCallDLLClick(Sender: TObject);
var
LibHandle: THandle;
ShowForm: TShowForm;
begin
LibHandle := LoadLibrary('RptDLL.DLL');
try
if LibHandle = HINSTANCE_ERROR then
raise EDLLLoadError.Create('Unable to Load DLL');
@ShowForm := GetProcAddress(LibHandle, 'ShowForm');
if not (@ShowForm = nil) then
ShowForm(Application);
finally
FreeLibrary(LibHandle);
end;
end;
procedure TfrmCallDLL.btnCloseClick(Sender: TObject);
begin
Close;
end;
end.

View File

@ -0,0 +1,13 @@
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1};
{$R *.RES}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,178 @@
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
frxDesgn, frxClass, frxPreview, ComCtrls, Menus;
type
TForm1 = class(TForm)
PageControl1: TPageControl;
DesignerSheet: TTabSheet;
PreviewSheet: TTabSheet;
frxPreview1: TfrxPreview;
frxReport1: TfrxReport;
frxDesigner1: TfrxDesigner;
MainMenu1: TMainMenu;
File1: TMenuItem;
NewMI: TMenuItem;
OpenMI: TMenuItem;
SaveMI: TMenuItem;
SaveasMI: TMenuItem;
N1: TMenuItem;
PreviewMI: TMenuItem;
PagesettingsMI: TMenuItem;
N2: TMenuItem;
ExitMI: TMenuItem;
Edit1: TMenuItem;
UndoMI: TMenuItem;
RedoMI: TMenuItem;
N3: TMenuItem;
CutMI: TMenuItem;
CopyMI: TMenuItem;
PasteMI: TMenuItem;
N4: TMenuItem;
DeleteMI: TMenuItem;
DeletePageMI: TMenuItem;
SelectAllMI: TMenuItem;
GroupMI: TMenuItem;
UngroupMI: TMenuItem;
EditMI: TMenuItem;
N5: TMenuItem;
BringtoFrontMI: TMenuItem;
SendtoBackMI: TMenuItem;
N6: TMenuItem;
FindMI: TMenuItem;
ReplaceMI: TMenuItem;
FindNextMI: TMenuItem;
Report1: TMenuItem;
DataMI: TMenuItem;
VariablesMI: TMenuItem;
StylesMI: TMenuItem;
ReportOptionsMI: TMenuItem;
View1: TMenuItem;
ToolbarsMI: TMenuItem;
N7: TMenuItem;
RulersMI: TMenuItem;
GuidesMI: TMenuItem;
DeleteGuidesMI: TMenuItem;
N8: TMenuItem;
OptionsMI: TMenuItem;
StandardMI: TMenuItem;
TextMI: TMenuItem;
FrameMI: TMenuItem;
AlignmentPaletteMI: TMenuItem;
ObjectInspectorMI: TMenuItem;
DataTreeMI: TMenuItem;
ReportTreeMI: TMenuItem;
Help1: TMenuItem;
HelpContentsMI: TMenuItem;
AboutFastReportMI: TMenuItem;
N9: TMenuItem;
NewReportMI: TMenuItem;
NewPageMI: TMenuItem;
NewDialogMI: TMenuItem;
procedure FormShow(Sender: TObject);
procedure PageControl1Change(Sender: TObject);
procedure ExitMIClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
uses frxRes;
procedure TForm1.FormShow(Sender: TObject);
var
Designer: TfrxDesignerForm;
begin
// prevent saving/restoring a report when previewing. This will destroy
// objects that are loaded in the designer and will lead to AV.
frxReport1.EngineOptions.DestroyForms := False;
// set the custom preview
frxReport1.Preview := frxPreview1;
// display the designer
frxReport1.DesignReportInPanel(DesignerSheet);
// set FR images for our menu
MainMenu1.Images := frxResources.MainButtonImages;
// get the reference to the Designer
Designer := TfrxDesignerForm(frxReport1.Designer);
// assign FR actions to our menu items
NewMI.Action := Designer.NewItemCmd;
NewReportMI.Action := Designer.NewReportCmd;
NewPageMI.Action := Designer.NewPageCmd;
NewDialogMI.Action := Designer.NewDialogCmd;
OpenMI.Action := Designer.OpenCmd;
SaveMI.Action := Designer.SaveCmd;
SaveasMI.Action := Designer.SaveAsCmd;
PreviewMI.Action := Designer.PreviewCmd;
PageSettingsMI.Action := Designer.PageSettingsCmd;
UndoMI.Action := Designer.UndoCmd;
RedoMI.Action := Designer.RedoCmd;
CutMI.Action := Designer.CutCmd;
CopyMI.Action := Designer.CopyCmd;
PasteMI.Action := Designer.PasteCmd;
DeleteMI.Action := Designer.DeleteCmd;
DeletePageMI.Action := Designer.DeletePageCmd;
SelectAllMI.Action := Designer.SelectAllCmd;
GroupMI.Action := Designer.GroupCmd;
UngroupMI.Action := Designer.UngroupCmd;
EditMI.Action := Designer.EditCmd;
FindMI.Action := Designer.FindCmd;
ReplaceMI.Action := Designer.ReplaceCmd;
FindNextMI.Action := Designer.FindNextCmd;
BringtoFrontMI.Action := Designer.BringToFrontCmd;
SendtoBackMI.Action := Designer.SendToBackCmd;
DataMI.Action := Designer.ReportDataCmd;
VariablesMI.Action := Designer.VariablesCmd;
StylesMI.Action := Designer.ReportStylesCmd;
ReportOptionsMI.Action := Designer.ReportOptionsCmd;
ToolbarsMI.Action := Designer.ToolbarsCmd;
StandardMI.Action := Designer.StandardTBCmd;
TextMI.Action := Designer.TextTBCmd;
FrameMI.Action := Designer.FrameTBCmd;
AlignmentPaletteMI.Action := Designer.AlignTBCmd;
ObjectInspectorMI.Action := Designer.InspectorTBCmd;
DataTreeMI.Action := Designer.DataTreeTBCmd;
ReportTreeMI.Action := Designer.ReportTreeTBCmd;
RulersMI.Action := Designer.ShowRulersCmd;
GuidesMI.Action := Designer.ShowGuidesCmd;
DeleteGuidesMI.Action := Designer.DeleteGuidesCmd;
OptionsMI.Action := Designer.OptionsCmd;
HelpContentsMI.Action := Designer.HelpContentsCmd;
AboutFastReportMI.Action := Designer.AboutCmd;
end;
procedure TForm1.PageControl1Change(Sender: TObject);
begin
if PageControl1.ActivePage = PreviewSheet then
frxReport1.PrepareReport
end;
procedure TForm1.ExitMIClick(Sender: TObject);
begin
Close;
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
frxReport1.Designer.Close;
end;
end.

View File

@ -0,0 +1,13 @@
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1};
{$R *.RES}
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.

Binary file not shown.

Binary file not shown.

View File

@ -0,0 +1,109 @@
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
frxClass, StdCtrls, frxDBSet, Db, DBTables;
type
TForm1 = class(TForm)
Button1: TButton;
Customers: TTable;
CustomersCustNo: TFloatField;
CustomersCompany: TStringField;
CustomersAddr1: TStringField;
CustomersAddr2: TStringField;
CustomersCity: TStringField;
CustomersState: TStringField;
CustomersZip: TStringField;
CustomersCountry: TStringField;
CustomersPhone: TStringField;
CustomersFAX: TStringField;
CustomersTaxRate: TFloatField;
CustomersContact: TStringField;
CustomersLastInvoiceDate: TDateTimeField;
DetailQuery: TQuery;
DetailQueryCustNo: TFloatField;
DetailQueryCompany: TStringField;
DetailQueryAddr1: TStringField;
DetailQueryAddr2: TStringField;
DetailQueryCity: TStringField;
DetailQueryState: TStringField;
DetailQueryZip: TStringField;
DetailQueryCountry: TStringField;
DetailQueryPhone: TStringField;
DetailQueryFAX: TStringField;
DetailQueryTaxRate: TFloatField;
DetailQueryContact: TStringField;
DetailQueryLastInvoiceDate: TDateTimeField;
DetailQueryOrderNo: TFloatField;
DetailQueryCustNo_1: TFloatField;
DetailQuerySaleDate: TDateTimeField;
DetailQueryShipDate: TDateTimeField;
DetailQueryEmpNo: TIntegerField;
DetailQueryShipToContact: TStringField;
DetailQueryShipToAddr1: TStringField;
DetailQueryShipToAddr2: TStringField;
DetailQueryShipToCity: TStringField;
DetailQueryShipToState: TStringField;
DetailQueryShipToZip: TStringField;
DetailQueryShipToCountry: TStringField;
DetailQueryShipToPhone: TStringField;
DetailQueryShipVIA: TStringField;
DetailQueryPO: TStringField;
DetailQueryTerms: TStringField;
DetailQueryPaymentMethod: TStringField;
DetailQueryItemsTotal: TCurrencyField;
DetailQueryTaxRate_1: TFloatField;
DetailQueryFreight: TCurrencyField;
DetailQueryAmountPaid: TCurrencyField;
DetailQueryOrderNo_1: TFloatField;
DetailQueryItemNo: TFloatField;
DetailQueryPartNo: TFloatField;
DetailQueryQty: TIntegerField;
DetailQueryDiscount: TFloatField;
DetailQueryPartNo_1: TFloatField;
DetailQueryVendorNo: TFloatField;
DetailQueryDescription: TStringField;
DetailQueryOnHand: TFloatField;
DetailQueryOnOrder: TFloatField;
DetailQueryCost: TCurrencyField;
DetailQueryListPrice: TCurrencyField;
CustomersDS: TfrxDBDataset;
DetailQueryDS: TfrxDBDataset;
MainReport: TfrxReport;
DetailReport: TfrxReport;
procedure Button1Click(Sender: TObject);
procedure MainReportClickObject(View: TfrxView;
Button: TMouseButton; Shift: TShiftState; var Modified: Boolean);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
begin
MainReport.ShowReport;
end;
procedure TForm1.MainReportClickObject(View: TfrxView;
Button: TMouseButton; Shift: TShiftState; var Modified: Boolean);
begin
if View.Name = 'Memo8' then
begin
DetailQuery.Close;
DetailQuery.ParamByName('custno').Text := View.TagStr;
DetailReport.ShowReport;
end;
end;
end.

View File

@ -0,0 +1,55 @@
object ReportData: TReportData
OldCreateOrder = False
Left = 278
Top = 149
Height = 138
Width = 208
object animals: TTable
DatabaseName = 'DBDEMOS'
TableName = 'animals.dbf'
Left = 8
end
object biolife: TTable
DatabaseName = 'DBDEMOS'
TableName = 'biolife.db'
Left = 56
end
object clients: TTable
DatabaseName = 'DBDEMOS'
TableName = 'clients.dbf'
Left = 104
end
object customer: TTable
DatabaseName = 'DBDEMOS'
TableName = 'customer.db'
Left = 152
end
object animalsDB: TfrxDBDataset
UserName = 'animals'
CloseDataSource = False
DataSet = animals
Left = 8
Top = 56
end
object biolifeDB: TfrxDBDataset
UserName = 'biolifeDB'
CloseDataSource = False
DataSet = biolife
Left = 56
Top = 56
end
object clientsBD: TfrxDBDataset
UserName = 'clients'
CloseDataSource = False
DataSet = clients
Left = 104
Top = 56
end
object customerDB: TfrxDBDataset
UserName = 'customer'
CloseDataSource = False
DataSet = customer
Left = 152
Top = 56
end
end

View File

@ -0,0 +1,31 @@
unit DataUnit;
interface
uses
SysUtils, Classes, frxClass, frxDBSet, DB, DBTables;
type
TReportData = class(TDataModule)
animals: TTable;
biolife: TTable;
clients: TTable;
customer: TTable;
animalsDB: TfrxDBDataset;
biolifeDB: TfrxDBDataset;
clientsBD: TfrxDBDataset;
customerDB: TfrxDBDataset;
private
{ Private declarations }
public
{ Public declarations }
end;
var
ReportData: TReportData;
implementation
{$R *.dfm}
end.

View File

@ -0,0 +1,194 @@
unit MAIN;
interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, Menus,
StdCtrls, Dialogs, Buttons, Messages, ExtCtrls, ComCtrls, StdActns,
ActnList, ToolWin, ImgList, frxClass, frxDesgn;
type
TfrxReportList = class(TObject)
private
FReportList: TList;
function GetReport(Index: Integer): TfrxReport;
function GetCount: Integer;
public
constructor Create;
destructor Destroy; override;
procedure ClearList;
procedure Delete(Index: Integer);
function CreateNewReport: TfrxReport;
function IndexOf(Report: TfrxReport): Integer;
property Report [Index: Integer]: TfrxReport read GetReport;
property Count: Integer read GetCount;
end;
TMainForm = class(TForm)
StatusBar: TStatusBar;
ActionList1: TActionList;
FileNew1: TAction;
FileSave1: TAction;
FileExit1: TAction;
WindowCascade1: TWindowCascade;
WindowTileHorizontal1: TWindowTileHorizontal;
WindowArrangeAll1: TWindowArrange;
WindowMinimizeAll1: TWindowMinimizeAll;
WindowTileVertical1: TWindowTileVertical;
ToolBar2: TToolBar;
ToolButton2: TToolButton;
ToolButton3: TToolButton;
ToolButton9: TToolButton;
ToolButton8: TToolButton;
ToolButton10: TToolButton;
ToolButton11: TToolButton;
ImageList1: TImageList;
ToolButton1: TToolButton;
ToolButton5: TToolButton;
PreviewReport: TAction;
MainMenu1: TMainMenu;
procedure FileNew1Execute(Sender: TObject);
procedure FileExit1Execute(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
procedure DestroyDesigner(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FileSave1Execute(Sender: TObject);
procedure PreviewReportExecute(Sender: TObject);
private
{ Private declarations }
FReportList: TfrxReportList;
public
{ Public declarations }
end;
var
MainForm: TMainForm;
implementation
{$R *.dfm}
{ TfrxReportList }
procedure TfrxReportList.ClearList;
begin
while FReportList.Count > 0 do
begin
TfrxReport(FReportList[0]).Free;
FReportList.Delete(0);
end;
end;
constructor TfrxReportList.Create;
begin
inherited;
FReportList := TList.Create;
end;
function TfrxReportList.CreateNewReport: TfrxReport;
begin
Result := TfrxReport.Create(nil);
Result.CreateUniqueName;
Result.PreviewOptions.MDIChild := True;
Result.PreviewOptions.Modal := False;
Result.EngineOptions.DestroyForms := False;
FReportList.Add(Result);
end;
procedure TfrxReportList.Delete(Index: Integer);
begin
if (Index < 0) or (Index >= FReportList.Count) then
exit;
TfrxReport(FReportList[Index]).Free;
FReportList.Delete(Index);
end;
destructor TfrxReportList.Destroy;
begin
ClearList;
FReportList.Free;
inherited;
end;
function TfrxReportList.GetCount: Integer;
begin
Result := FReportList.Count;
end;
function TfrxReportList.GetReport(Index: Integer): TfrxReport;
begin
if (Index < 0) or (Index >= FReportList.Count) then
Result := nil
else
Result := TfrxReport(FReportList[Index]);
end;
function TfrxReportList.IndexOf(Report: TfrxReport): Integer;
begin
Result := FReportList.IndexOf(Report);
end;
{Main Form}
procedure TMainForm.FileNew1Execute(Sender: TObject);
begin
with FReportList.CreateNewReport do
begin
DesignReport(False, True);
TfrxDesignerForm(Designer).OnDestroy := DestroyDesigner;
TfrxDesignerForm(Designer).Caption := 'Designer-' + IntToStr(FReportList.Count);
end;
end;
procedure TMainForm.FileExit1Execute(Sender: TObject);
begin
Close;
end;
procedure TMainForm.FormCreate(Sender: TObject);
begin
FReportList := TfrxReportList.Create;
end;
procedure TMainForm.FormDestroy(Sender: TObject);
begin
FReportList.Free;
end;
procedure TMainForm.DestroyDesigner(Sender: TObject);
var
idx: Integer;
begin
idx := FReportList.IndexOf(TfrxDesignerForm(Sender).Report);
if FReportList.Report[idx].PreviewForm <> nil then
FReportList.Report[idx].PreviewForm.Close;
FReportList.Delete(idx);
end;
procedure TMainForm.FormClose(Sender: TObject; var Action: TCloseAction);
var
idx: Integer;
begin
for idx := 0 to FReportList.Count - 1 do
TfrxDesignerForm(FReportList.Report[idx].Designer).Close;
Action := caFree;
end;
procedure TMainForm.FileSave1Execute(Sender: TObject);
var
idx: Integer;
begin
for idx := 0 to FReportList.Count - 1 do
TfrxDesignerForm(FReportList.Report[idx].Designer).SaveCmd.Execute;
end;
procedure TMainForm.PreviewReportExecute(Sender: TObject);
var
idx: Integer;
begin
for idx := 0 to FReportList.Count - 1 do
FReportList.Report[idx].ShowReport;
end;
end.

View File

@ -0,0 +1,569 @@
object MainForm: TMainForm
Left = 268
Top = 128
Width = 439
Height = 373
Caption = 'MDI Designer application'
Color = clAppWorkSpace
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Default'
Font.Style = []
FormStyle = fsMDIForm
Menu = MainMenu1
OldCreateOrder = False
Position = poDefault
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object StatusBar: TStatusBar
Left = 0
Top = 320
Width = 431
Height = 19
AutoHint = True
Panels = <>
SimplePanel = True
end
object ToolBar2: TToolBar
Left = 0
Top = 0
Width = 431
Height = 30
BorderWidth = 1
Color = clBtnFace
Images = ImageList1
Indent = 5
ParentColor = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
Wrapable = False
object ToolButton9: TToolButton
Left = 5
Top = 2
Action = FileNew1
ImageIndex = 0
end
object ToolButton2: TToolButton
Left = 28
Top = 2
Action = FileSave1
ImageIndex = 1
end
object ToolButton3: TToolButton
Left = 51
Top = 2
Width = 8
Caption = 'ToolButton3'
ImageIndex = 2
Style = tbsSeparator
end
object ToolButton8: TToolButton
Left = 59
Top = 2
Action = WindowCascade1
ImageIndex = 5
end
object ToolButton10: TToolButton
Left = 82
Top = 2
Action = WindowTileHorizontal1
ImageIndex = 3
end
object ToolButton11: TToolButton
Left = 105
Top = 2
Action = WindowTileVertical1
ImageIndex = 4
end
object ToolButton5: TToolButton
Left = 128
Top = 2
Width = 8
Caption = 'ToolButton5'
ImageIndex = 7
Style = tbsSeparator
end
object ToolButton1: TToolButton
Left = 136
Top = 2
Action = PreviewReport
Caption = 'Preview Report current report'
end
end
object ActionList1: TActionList
Images = ImageList1
Left = 32
Top = 32
object FileNew1: TAction
Category = 'File'
Caption = '&New'
Hint = 'New|Create a new designer window'
ImageIndex = 6
ShortCut = 16462
OnExecute = FileNew1Execute
end
object FileSave1: TAction
Category = 'File'
Caption = '&Save'
Hint = 'Save|Save all reports'
ImageIndex = 8
ShortCut = 16467
OnExecute = FileSave1Execute
end
object FileExit1: TAction
Category = 'File'
Caption = 'E&xit'
Hint = 'Exit|Exit application'
OnExecute = FileExit1Execute
end
object WindowCascade1: TWindowCascade
Category = 'Window'
Caption = '&Cascade'
Hint = 'Cascade'
ImageIndex = 17
end
object WindowTileHorizontal1: TWindowTileHorizontal
Category = 'Window'
Caption = 'Tile &Horizontally'
Hint = 'Tile Horizontally'
ImageIndex = 15
end
object WindowTileVertical1: TWindowTileVertical
Category = 'Window'
Caption = 'Tile &Vertically'
Hint = 'Tile Vertically'
ImageIndex = 16
end
object WindowMinimizeAll1: TWindowMinimizeAll
Category = 'Window'
Caption = '&Minimize All'
Hint = 'Minimize All'
end
object WindowArrangeAll1: TWindowArrange
Category = 'Window'
Caption = '&Arrange All'
Hint = 'Arrange All'
end
object PreviewReport: TAction
Category = 'File'
Caption = 'Preview'
Hint = 'Preview| Preview all report'
ImageIndex = 2
OnExecute = PreviewReportExecute
end
end
object ImageList1: TImageList
Top = 32
Bitmap = {
494C010107000900040010001000FFFFFFFFFF00FFFFFFFFFFFFFFFF424D3600
0000000000003600000028000000400000003000000001002000000000000030
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000080000000800000008000000080000000800000008000
0000800000008000000080000000800000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
0000800000008000000000000000000000000000000000000000000000000000
0000000000000000000080000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00800000000000000000000000000000000000
0000000000000000000000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF008000000000000000000000000000000000000000000000000000
0000000000000000000080000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00800000000000000000000000000000000000
000000000000FFFFFF0000000000FFFFFF000000000000000000000000000000
0000FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF008000000000000000000000000000000000000000000000000000
0000000000000000000080000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000000000000000000000000000FFFF
FF0000000000FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF008000000000000000000000000000000000000000000000008000
0000800000008000000080000000800000008000000080000000800000008000
00008000000080000000800000008000000000000000FFFFFF0000000000FFFF
FF0000000000FFFFFF0000000000FFFFFF000000000000000000000000000000
00000000000000000000FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF008000000000000000000000000000000000000000000000008000
0000FFFFFF00FFFFFF0080000000800000008000000080000000800000008000
00008000000080000000FFFFFF008000000000000000FFFFFF0000000000FFFF
FF0000000000FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF008000000000000000000000000000000000000000000000008000
0000FFFFFF00FFFFFF0080000000800000008000000080000000800000008000
00008000000080000000800000008000000000000000FFFFFF0000000000FFFF
FF0000000000FFFFFF0000000000FFFFFF000000000000000000000000000000
00000000000000000000FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF008000000000000000000000000000000000000000000000008000
0000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF008000000000000000000000000000000000000000FFFFFF0000000000FFFF
FF0000000000FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF008000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
00008000000000000000000000000000000000000000FFFFFF0000000000FFFF
FF0000000000FFFFFF0000000000FFFFFF00000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF008000000000000000000000000000000080000000FFFFFF008000
000080000000800000008000000080000000800000008000000080000000FFFF
FF008000000000000000000000000000000000000000FFFFFF0000000000FFFF
FF0000000000FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF0080000000FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF008000000000000000000000000000000080000000FFFFFF008000
0000800000008000000080000000800000008000000080000000800000008000
00008000000000000000000000000000000000000000FFFFFF0000000000FFFF
FF0000000000FFFFFF0000000000FFFFFF000000000000000000FFFFFF00FFFF
FF0000000000FFFFFF0000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
0000800000008000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00800000000000
00000000000000000000000000000000000000000000FFFFFF0000000000FFFF
FF0000000000FFFFFF0000000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000800000008000
00008000000080000000FFFFFF00800000008000000080000000800000008000
0000FFFFFF008000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000000000
00000000000000000000000000000000000000000000FFFFFF0000000000FFFF
FF0000000000FFFFFF0000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
0000800000008000000000000000000000000000000080000000800000008000
00008000000080000000800000008000000080000000FFFFFF00800000000000
00000000000000000000000000000000000000000000FFFFFF0000000000FFFF
FF00000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000000000
00000000000000000000000000000000000000000000FFFFFF00000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
0000800000008000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000008080000080
8000000000000000000000000000000000000000000000000000C0C0C000C0C0
C0000000000000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000008080000080
8000000000000000000000000000000000000000000000000000C0C0C000C0C0
C0000000000000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000008080000080
8000000000000000000000000000000000000000000000000000C0C0C000C0C0
C0000000000000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF000000000080808000C0C0C000C0C0C0008080
8000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000008080000080
8000000000000000000000000000000000000000000000000000000000000000
00000000000000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF000000000080808000C0C0C000C0C0C000FFFF00008080
8000808080000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
000080000000800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000008080000080
8000008080000080800000808000008080000080800000808000008080000080
80000080800000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF0000000000C0C0C000C0C0C000C0C0C000C0C0C0008080
8000C0C0C0000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
0000FFFFFF00800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000008080000080
8000000000000000000000000000000000000000000000000000000000000000
00000080800000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF0000000000C0C0C000FFFF0000C0C0C000C0C0C0008080
8000C0C0C0000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
000080000000800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000008080000000
0000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
C0000000000000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF000000000080808000FFFF0000FFFF0000C0C0C0008080
8000808080000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000008080000000
0000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
C0000000000000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF000000000080808000C0C0C000C0C0C0008080
8000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00000000000000000000000000000000000000000000000000008080000000
0000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
C0000000000000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000000000000000000000000
0000000000000000000000000000000000000000000080000000FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000
0000000000000000000000000000000000000000000000000000008080000000
0000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
C0000000000000808000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000
0000000000000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
000080000000800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000FFFFFF000000
0000000000000000000000000000000000000000000000000000008080000000
0000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
C0000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000000000000000000000000
0000000000000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
0000FFFFFF00800000000000000000000000000000000000000000000000FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000000000000000
0000000000000000000000000000000000000000000000000000008080000000
0000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0C000C0C0
C00000000000C0C0C000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF0000000000C0C0C000000000000000
0000000000000000000000000000000000000000000080000000800000008000
0000800000008000000080000000800000008000000080000000800000008000
0000800000008000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000424D3E000000000000003E000000
2800000040000000300000000100010000000000800100000000000000000000
000000000000000000000000FFFFFF0000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000FFFFFC00FC0000008003FC00F0000000
8003FC00C00000008003FC00000000008003E000000000008003E00000000000
8003E000000000008003E0070000000080038007000000008003800700000000
80038007000100008003801F000300008003801F000700008003801F001F0000
FFFF801F007F0000FFFFFFFF01FF0000FFFFFFFFFFFFFFFFFFFFC001000C8003
C007800100088003C007800100018003C007800100038003C007800100038003
C007800100038003C007800100038003C007800100038003C007800100078003
C0078001000F8003C0078001000F8003C00F8001000F8003C01F8001001F8003
C03F8001003FFFFFFFFFFFFF007FFFFF}
end
object MainMenu1: TMainMenu
Left = 64
Top = 32
end
end

View File

@ -0,0 +1,15 @@
program Mdiapp;
uses
Forms,
MAIN in 'MAIN.PAS' {MainForm},
DataUnit in 'DataUnit.pas' {ReportData: TDataModule};
{$R *.RES}
begin
Application.Initialize;
Application.CreateForm(TMainForm, MainForm);
Application.CreateForm(TReportData, ReportData);
Application.Run;
end.

Binary file not shown.

View File

@ -0,0 +1,26 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="Demonstrates how to create simple list report." ReportOptions.LastChange="38842,9275207639" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3900000020446174615365743D225265706F7274446174612E437573746F6D65727344532220446174615365744E616D653D22437573746F6D657273220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxReportTitle Name="Band1" Height="30,23624" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo1" Left="0" Top="3,77953" Width="714,33117" Height="26,45671" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band2" Height="34,01577" Left="0" Top="83,14966" Width="755,906">
<TfrxMemoView Name="Memo4" Left="204,09462" Top="7,55906" Width="158,74026" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="8421504" Frame.Typ="8" ParentFont="False" Text="Address"/>
<TfrxMemoView Name="Memo5" Left="377,953" Top="7,55906" Width="120,94496" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="8421504" Frame.Typ="8" ParentFont="False" Text="Contact"/>
<TfrxMemoView Name="Memo6" Left="514,01608" Top="7,55906" Width="83,14966" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="8421504" Frame.Typ="8" ParentFont="False" Text="Phone"/>
<TfrxMemoView Name="Memo7" Left="612,28386" Top="7,55906" Width="102,04731" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="8421504" Frame.Typ="8" ParentFont="False" Text="Fax"/>
<TfrxMemoView Name="Memo3" Left="7,55906" Top="7,55906" Width="181,41744" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="8421504" Frame.Typ="8" ParentFont="False" Text="Company"/>
</TfrxPageHeader>
<TfrxPageFooter Name="Band3" Height="26,45671" Left="0" Top="283,46475" Width="755,906">
<TfrxMemoView Name="Memo2" Left="3,77953" Top="7,55905999999999" Width="710,55164" Height="15,11812" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="Page [Page] of [TotalPages]"/>
</TfrxPageFooter>
<TfrxMasterData Name="Band4" Height="22,67718" Left="0" Top="188,9765" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.CustomersDS" DataSetName="Customers" RowCount="0">
<TfrxMemoView Name="Memo13" Left="3,77953" Top="0" Width="714,33117" Height="18,89765" DataSet="ReportData.CustomersDS" DataSetName="Customers" Highlight.Font.Charset="1" Highlight.Font.Color="-370606080" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="15790320" Highlight.Condition="&#60;Line#&#62; mod 2" WordWrap="False" Text=""/>
<TfrxMemoView Name="Memo9" Left="204,09462" Top="0" Width="173,85838" Height="18,89765" DataField="Addr1" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Addr1&#34;]"/>
<TfrxMemoView Name="Memo10" Left="377,953" Top="0" Width="136,06308" Height="18,89765" DataField="Contact" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Contact&#34;]"/>
<TfrxMemoView Name="Memo11" Left="514,01608" Top="0" Width="98,26778" Height="18,89765" DataField="Phone" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo12" Left="612,28386" Top="0" Width="102,04731" Height="18,89765" DataField="FAX" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;FAX&#34;]"/>
<TfrxMemoView Name="Memo8" Left="7,55906" Top="0" Width="196,53556" Height="18,89765" TagStr="[Customers.&#34;Cust No&#34;]" DataField="Company" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Company&#34;]"/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,55 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9972084722" ReportOptions.Description.Text="This example shows how to create nested reports using subreport component." ReportOptions.LastChange="38842,9404990278" ScriptLanguage="PascalScript" ScriptText.Text="var&#13;&#10; TotalSales: Extended;&#13;&#10;&#13;&#10;procedure Band4OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; TotalSales := 0&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band7OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; TotalSales := TotalSales + &#60;Items.&#34;Qty&#34;&#62; * &#60;Items.&#34;Price&#34;&#62;;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3900000020446174615365743D225265706F7274446174612E437573746F6D65727344532220446174615365744E616D653D22437573746F6D6572732200010C3300000020446174615365743D225265706F7274446174612E4F726465727344532220446174615365744E616D653D224F72646572732200010C3100000020446174615365743D225265706F7274446174612E4974656D7344532220446174615365744E616D653D224974656D73220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxPageFooter Name="Band1" Height="22,67718" Left="0" Top="253,22851" Width="755,906">
<TfrxMemoView Name="Memo1" Left="0" Top="0" Width="710,55164" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="[Page#]"/>
</TfrxPageFooter>
<TfrxReportTitle Name="Band2" Height="26,45671" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo2" Left="0" Top="0" Width="710,55164" Height="22,67718" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxMasterData Name="Band4" Height="64,25201" Left="0" Top="117,16543" Width="755,906" OnBeforePrint="Band4OnBeforePrint" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.CustomersDS" DataSetName="Customers" RowCount="0">
<TfrxMemoView Name="Memo5" Left="0" Top="0" Width="302,3624" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="5" ParentFont="False" VAlign="vaCenter" Text="Company"/>
<TfrxMemoView Name="Memo6" Left="0" Top="18,89765" Width="302,3624" Height="26,45671" Color="128" DataField="Company" DataSet="ReportData.CustomersDS" DataSetName="Customers" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" VAlign="vaCenter" Text="[Customers.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo7" Left="302,3624" Top="0" Width="188,9765" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Phone"/>
<TfrxMemoView Name="Memo8" Left="491,3389" Top="0" Width="219,21274" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="6" ParentFont="False" VAlign="vaCenter" Text="Fax"/>
<TfrxMemoView Name="Memo9" Left="302,3624" Top="18,89765" Width="188,9765" Height="26,45671" Color="128" DataField="Phone" DataSet="ReportData.CustomersDS" DataSetName="Customers" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Customers.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo10" Left="491,3389" Top="18,89765" Width="219,21274" Height="26,45671" Color="128" DataField="FAX" DataSet="ReportData.CustomersDS" DataSetName="Customers" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" VAlign="vaCenter" Text="[Customers.&#34;FAX&#34;]"/>
<TfrxSubreport Name="Subreport1" Left="0" Top="45,35436" Width="94,48825" Height="18,89765" Page="Page4"/>
</TfrxMasterData>
</TfrxReportPage>
<TfrxReportPage Name="Page4" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMasterData Name="MasterData1" Height="37,7953" Left="0" Top="18,89765" Width="718,1107" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.OrdersDS" DataSetName="Orders" RowCount="0">
<TfrxMemoView Name="Memo12" Left="0" Top="0" Width="120,94496" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="1" Text="Order No [Orders.&#34;Order No&#34;]"/>
<TfrxMemoView Name="Memo13" Left="120,94496" Top="0" Width="589,60668" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="2" Text="Date [Orders.&#34;Sale Date&#34;]"/>
<TfrxSubreport Name="Subreport2" Left="0" Top="18,89765" Width="94,48825" Height="18,89765" Page="Page2"/>
</TfrxMasterData>
<TfrxFooter Name="Footer1" Height="26,45671" Left="0" Top="90,70872" Width="718,1107">
<TfrxMemoView Name="Memo14" Left="0" Top="0" Width="710,55164" Height="18,89765" Color="12632256" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Frame.Color="12632256" Frame.Typ="11" Text="Total sales this customer: [TotalSales]"/>
</TfrxFooter>
</TfrxReportPage>
<TfrxReportPage Name="Page2" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxHeader Name="Header1" Height="18,89765" Left="0" Top="18,89765" Width="718,1107">
<TfrxMemoView Name="Memo15" Left="0" Top="0" Width="45,35436" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo16" Left="45,35436" Top="0" Width="60,47248" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Part"/>
<TfrxMemoView Name="Memo17" Left="113,3859" Top="0" Width="230,55133" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Description"/>
<TfrxMemoView Name="Memo18" Left="351,49629" Top="0" Width="79,37013" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Price"/>
<TfrxMemoView Name="Memo19" Left="438,42548" Top="0" Width="60,47248" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Qty"/>
<TfrxMemoView Name="Memo20" Left="506,45702" Top="0" Width="79,37013" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Total"/>
<TfrxMemoView Name="Memo11" Left="585,82715" Top="0" Width="124,72449" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxHeader>
<TfrxMasterData Name="MasterData2" Height="15,11812" Left="0" Top="71,81107" Width="718,1107" OnBeforePrint="Band7OnBeforePrint" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.ItemsDS" DataSetName="Items" RowCount="0">
<TfrxMemoView Name="Memo21" Left="0" Top="0" Width="45,35436" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo22" Left="45,35436" Top="0" Width="60,47248" Height="15,11812" DataField="Part No" DataSet="ReportData.ItemsDS" DataSetName="Items" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Items.&#34;Part No&#34;]"/>
<TfrxMemoView Name="Memo23" Left="113,3859" Top="0" Width="230,55133" Height="15,11812" DataField="Part Name" DataSet="ReportData.ItemsDS" DataSetName="Items" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" ParentFont="False" Text="[Items.&#34;Part Name&#34;]"/>
<TfrxMemoView Name="Memo24" Left="351,49629" Top="0" Width="79,37013" Height="15,11812" DataField="Price" DataSet="ReportData.ItemsDS" DataSetName="Items" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[Items.&#34;Price&#34;]"/>
<TfrxMemoView Name="Memo25" Left="438,42548" Top="0" Width="60,47248" Height="15,11812" DataField="Qty" DataSet="ReportData.ItemsDS" DataSetName="Items" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Items.&#34;Qty&#34;]"/>
<TfrxMemoView Name="Memo26" Left="506,45702" Top="0" Width="79,37013" Height="15,11812" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[&#60;Items.&#34;Qty&#34;&#62;*&#60;Items.&#34;Price&#34;&#62;]"/>
<TfrxMemoView Name="Memo29" Left="585,82715" Top="0" Width="124,72449" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxMasterData>
<TfrxFooter Name="Footer2" Height="22,67718" Left="0" Top="120,94496" Width="718,1107">
<TfrxMemoView Name="Memo27" Left="0" Top="0" Width="45,35436" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo28" Left="45,35436" Top="0" Width="544,25232" Height="18,89765" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="Total this order: [Sum(&#60;Items.&#34;Qty&#34;&#62;*&#60;Items.&#34;Price&#34;&#62;)]"/>
<TfrxMemoView Name="Memo30" Left="589,60668" Top="0" Width="120,94496" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,19 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.0a" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.DoubleBuffered="False" PreviewOptions.Zoom="1" PrintOptions.PagesOnSheet="0" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="38980,9261962847" ReportOptions.Description.Text="This report demonstrates the ability to draw diagrams on the &#34;Data&#34; tab." ReportOptions.LastChange="38981,7689787616" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C2C00000020446174615365743D2241444F5461626C65312220446174615365744E616D653D22437573746F6D6572732200010C2900000020446174615365743D2241444F5461626C65322220446174615365744E616D653D224F7264657273220000095661726961626C65730100055374796C650100">
<TfrxDataPage Name="Data" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Height="1000" Left="0" Top="0" Width="1000">
<TfrxShapeView Name="Shape2" Left="84" Top="260" Width="320" Height="104" Frame.Color="12632256" Shape="skRoundRectangle"/>
<TfrxShapeView Name="Shape1" Left="84" Top="56" Width="320" Height="92" Frame.Color="12632256" Shape="skRoundRectangle"/>
<TfrxADOTable Name="ADOTable1" UserName="Customers" CloseDataSource="True" FieldAliases.Text="" TableName="customer" IndexFieldNames="Company" PropData="05704C65667402780470546F700250"/>
<TfrxADOTable Name="ADOTable2" UserName="Orders" CloseDataSource="True" FieldAliases.Text="" Master="ADOTable1" MasterFields="CustNo=CustNo" TableName="orders" IndexFieldNames="CustNo" PropData="05704C65667402780470546F70032001"/>
<TfrxMemoView Name="Memo2" Left="188" Top="68" Width="208" Height="20" Color="15790320" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" Wysiwyg="False" VAlign="vaCenter" Text="The &#34;Customers&#34; table"/>
<TfrxMemoView Name="Memo3" Left="188" Top="92" Width="208" Height="40" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Wysiwyg="False" Text="This table contains all information about the customer, such as company name, contact, phone, fax."/>
<TfrxMemoView Name="Memo4" Left="188" Top="272" Width="208" Height="20" Color="15790320" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" Wysiwyg="False" VAlign="vaCenter" Text="The &#34;Orders&#34; table"/>
<TfrxMemoView Name="Memo5" Left="188" Top="296" Width="204" Height="52" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Wysiwyg="False" Text="This table contains all orders made by customers. Table is linked to the &#34;Customers&#34; table by master-detail relationship."/>
<TfrxLineView Name="Line1" Left="132" Top="148" Width="0" Height="112" ArrowStart="True" Frame.Color="52479" Frame.Width="2" Diagonal="True"/>
<TfrxMemoView Name="Memo6" Left="88" Top="196" Width="96" Height="28" Color="16777215" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Color="52479" Frame.Typ="15" Frame.Width="2" HAlign="haCenter" ParentFont="False" Wysiwyg="False" Text="Orders.CustNo = Customers.CustNo"/>
<TfrxMemoView Name="Memo7" Left="20" Top="16" Width="420" Height="20" Color="16777215" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-2147483640" Font.Height="-13" Font.Name="Arial" Font.Style="0" HAlign="haCenter" ParentFont="False" Wysiwyg="False" Text="Use the &#34;Text&#34; object and &#34;Draw&#34; category objects to draw a diagram."/>
</TfrxDataPage>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMemoView Name="Memo1" Left="151,1812" Top="37,7953" Width="222,99227" Height="75,5906" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Please look at the &#34;Data&#34; tab"/>
</TfrxReportPage>
</TfrxReport>

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -0,0 +1,8 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.0a" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.DoubleBuffered="False" PreviewOptions.Zoom="1" PrintOptions.PagesOnSheet="0" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="38990,8357143287" ReportOptions.Description.Text="Demonstrates how to print several copies of report where each copy should have a name. To do this:&#13;&#10;&#13;&#10;- put a memo object with [CopyName#] text inside. It will show a copy name;&#13;&#10;&#13;&#10;- go &#34;Code&#34; tab and write a simple script that will give names to each copy. You can also do this in Delphi code;&#13;&#10;&#13;&#10;- print a report. " ReportOptions.LastChange="38990,8528054398" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10; frxGlobalVariables['CopyName0'] := ''; // copy viewed in the preview&#13;&#10; frxGlobalVariables['CopyName1'] := 'First copy'; // 1st printed/exported copy&#13;&#10; frxGlobalVariables['CopyName2'] := 'Second copy'; // 2nd printed copy&#13;&#10; frxGlobalVariables['CopyName3'] := 'Third copy'; // 3rd printed copy&#13;&#10;end." PropData="044C65667403AC0003546F700378010844617461736574730100095661726961626C65730100055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMemoView Name="Memo1" Left="37,7953" Top="37,7953" Width="340,1577" Height="75,5906" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-2147483640" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Print several copies of this report (set copies in the print dialog). You will see that every copy has its own name printed on the top right corner."/>
<TfrxMemoView Name="Memo2" Left="529,1342" Top="0" Width="188,9765" Height="18,89765" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[CopyName#]"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,18 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.0a" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.DoubleBuffered="False" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintMode="pmScale" PrintOptions.PrintOnSheet="9" ReportOptions.CreateDate="38976,8939483796" ReportOptions.Description.Text="This report demonstrates the new print mode, scale one page (A3) to specified size (A4).&#13;&#10;&#13;&#10;You can set this mode either in the print dialog, or in the designer (select Report.PrintOptions in the Object Inspector and set PrintMode, PrintOnSheet properties).&#13;&#10;&#13;&#10;Print the report to see the result." ReportOptions.LastChange="39012,5427692708" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C656674026003546F7003700108446174617365747301010C3900000020446174615365743D225265706F7274446174612E437573746F6D65727344532220446174615365744E616D653D22437573746F6D657273220000095661726961626C65730100055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" PaperWidth="297" PaperHeight="420" PaperSize="8" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" Columns="2" ColumnWidth="138,5" ColumnPositions.Text="0&#13;&#10;138,50" HGuides.Text="" VGuides.Text="">
<TfrxMasterData Name="MasterData1" Height="86,92919" Left="0" Top="124,72449" Width="523,464905" ColumnWidth="0" ColumnGap="0" DataSet="ReportData.CustomersDS" DataSetName="Customers" RowCount="0">
<TfrxShapeView Name="Shape1" Left="7,55906" Top="3,77952999999999" Width="506,45702" Height="79,37013" Frame.Color="12632256" Shape="skRoundRectangle"/>
<TfrxMemoView Name="Memo2" Left="264,5671" Top="11,33859" Width="238,11039" Height="18,89765" Color="15790320" DataField="Company" DataSet="ReportData.CustomersDS" DataSetName="Customers" Font.Charset="1" Font.Color="-2147483640" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="[Customers.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo3" Left="264,5671" Top="34,01577" Width="120,94496" Height="18,89765" Color="15790320" DataField="Phone" DataSet="ReportData.CustomersDS" DataSetName="Customers" Font.Charset="1" Font.Color="-2147483640" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="[Customers.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo4" Left="264,5671" Top="56,69295" Width="120,94496" Height="18,89765" Color="15790320" DataField="FAX" DataSet="ReportData.CustomersDS" DataSetName="Customers" Font.Charset="1" Font.Color="-2147483640" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="[Customers.&#34;FAX&#34;]"/>
<TfrxMemoView Name="Memo5" Left="15,11812" Top="11,33859" Width="238,11039" Height="18,89765" Font.Charset="1" Font.Color="-2147483640" Font.Height="-13" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="Company"/>
<TfrxMemoView Name="Memo6" Left="15,11812" Top="34,01577" Width="120,94496" Height="18,89765" Font.Charset="1" Font.Color="-2147483640" Font.Height="-13" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="Phone"/>
<TfrxMemoView Name="Memo7" Left="15,11812" Top="56,69295" Width="120,94496" Height="18,89765" Font.Charset="1" Font.Color="-2147483640" Font.Height="-13" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="FAX"/>
</TfrxMasterData>
<TfrxReportTitle Name="ReportTitle1" Height="45,35436" Left="0" Top="18,89765" Width="1046,92981">
<TfrxMemoView Name="Memo1" Align="baWidth" Left="0" Top="0" Width="1046,92981" Height="22,67718" Color="15000804" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-2147483640" Font.Height="-13" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="OUR CUSTOMERS"/>
</TfrxReportTitle>
</TfrxReportPage>
</TfrxReport>

File diff suppressed because one or more lines are too long

View File

@ -0,0 +1,20 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9973703935" ReportOptions.Description.Text="Demonstrates how to create side-by-side subreports. Each subreport can have different number of records." ReportOptions.LastChange="38842,9413295023" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B0000844617461736574730100095661726961626C657301010C14000000204E616D653D22204465736372697074696F6E2200010C84000000204E616D653D224465736372697074696F6E222056616C75653D2244656D6F6E7374726174657320686F7720746F2063726561746520736964652D62792D73696465207375627265706F7274732E2045616368207375627265706F72742063616E206861766520646966666572656E74206E756D626572206F66207265636F7264732E220000055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" HGuides.Text="" VGuides.Text="">
<TfrxMasterData Name="Band2" Height="41,57483" Left="0" Top="18,89765" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" RowCount="20">
<TfrxMemoView Name="Memo2" Left="0" Top="0" Width="495,11843" Height="18,89765" Color="12632256" Text="[LINE]"/>
<TfrxSubreport Name="Subreport1" Left="0" Top="22,67718" Width="94,48825" Height="18,89765" Page="Page4"/>
<TfrxSubreport Name="Subreport2" Left="249,44898" Top="22,67718" Width="94,48825" Height="18,89765" Page="Page5"/>
</TfrxMasterData>
</TfrxReportPage>
<TfrxReportPage Name="Page4" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMasterData Name="MasterData1" Height="22,67718" Left="0" Top="18,89765" Width="718,1107" Columns="1" ColumnWidth="200" ColumnGap="20" RowCount="6">
<TfrxMemoView Name="Memo4" Left="0" Top="0" Width="245,66945" Height="18,89765" Color="13296895" Text="[LINE]"/>
</TfrxMasterData>
</TfrxReportPage>
<TfrxReportPage Name="Page5" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMasterData Name="MasterData2" Height="41,57483" Left="0" Top="18,89765" Width="718,1107" Columns="1" ColumnWidth="200" ColumnGap="20" RowCount="4">
<TfrxMemoView Name="Memo5" Left="0" Top="0" Width="245,66945" Height="37,7953" Color="13434828" Text="[LINE]"/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,28 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9975287269" ReportOptions.Description.Text="This report contains two pages (title and list). You can have several pages in your report. Each page can contains one report and can have own paper settings (size, margins, orientation and etc)." ReportOptions.LastChange="38842,9416201968" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3900000020446174615365743D225265706F7274446174612E437573746F6D65727344532220446174615365744E616D653D22437573746F6D657273220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxMemoView Name="Memo1" Left="75,5906" Top="336,37817" Width="604,7248" Height="151,1812" Font.Charset="1" Font.Color="0" Font.Height="-35" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Our customers"/>
</TfrxReportPage>
<TfrxReportPage Name="Page2" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" HGuides.Text="" VGuides.Text="">
<TfrxReportTitle Name="Band1" Height="26,45671" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo2" Left="0" Top="3,77953" Width="718,1107" Height="18,89765" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band2" Height="30,23624" Left="0" Top="79,37013" Width="755,906">
<TfrxMemoView Name="Memo4" Left="3,77953" Top="7,55906" Width="196,53556" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Company"/>
<TfrxMemoView Name="Memo5" Left="204,09462" Top="7,55906" Width="166,29932" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Address"/>
<TfrxMemoView Name="Memo6" Left="377,953" Top="7,55906" Width="128,50402" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Contact"/>
<TfrxMemoView Name="Memo7" Left="514,01608" Top="7,55906" Width="90,70872" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Phone"/>
<TfrxMemoView Name="Memo8" Left="612,28386" Top="7,55906" Width="102,04731" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Fax"/>
</TfrxPageHeader>
<TfrxPageFooter Name="Band3" Height="26,45671" Left="0" Top="275,90569" Width="755,906">
<TfrxMemoView Name="Memo3" Left="3,77953" Top="7,55905999999999" Width="710,55164" Height="15,11812" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="Page [Page#] of [TotalPages#]"/>
</TfrxPageFooter>
<TfrxMasterData Name="Band4" Height="22,67718" Left="0" Top="181,41744" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.CustomersDS" DataSetName="Customers" RowCount="0">
<TfrxMemoView Name="Memo9" Left="3,77953" Top="0" Width="196,53556" Height="18,89765" DataField="Company" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo10" Left="204,09462" Top="0" Width="166,29932" Height="18,89765" DataField="Addr1" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Addr1&#34;]"/>
<TfrxMemoView Name="Memo11" Left="377,953" Top="0" Width="128,50402" Height="18,89765" DataField="Contact" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Contact&#34;]"/>
<TfrxMemoView Name="Memo12" Left="514,01608" Top="0" Width="90,70872" Height="18,89765" DataField="Phone" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo13" Left="612,28386" Top="0" Width="102,04731" Height="18,89765" DataField="FAX" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;FAX&#34;]"/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,8 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" DotMatrixReport="False" EngineOptions.MaxMemSize="10000000" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="38006,6684253472" ReportOptions.Description.Text="Demonstrates how to use OnPreviewClick event." ReportOptions.LastChange="38344,718786412" ScriptLanguage="PascalScript" ScriptText.Text="procedure Memo2OnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);&#13;&#10;var&#13;&#10; s: String;&#13;&#10;begin&#13;&#10; s := TfrxMemoView(Sender).Text;&#13;&#10; SetLength(s, Length(s) - 2); // cut off #13#10&#13;&#10; TfrxMemoView(Sender).Text := InputBox('Edit', 'Edit Memo2 text:', s);&#13;&#10; Modified := True;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo1OnPreviewClick(Sender: TfrxView; Button: TMouseButton; Shift: Integer; var Modified: Boolean);&#13;&#10;begin&#13;&#10; ShowMessage('Memo1 contents:' + #13#10 + TfrxMemoView(Sender).Text);&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B0000844617461736574730100095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMemoView Name="Memo1" Cursor="-21" Left="37,7953" Top="37,7953" Width="94,48825" Height="37,7953" OnPreviewClick="Memo1OnPreviewClick" Frame.Typ="15" HAlign="haCenter" Memo.Text="Memo1" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo2" Cursor="-4" Left="181,41744" Top="102,04731" Width="113,3859" Height="37,7953" OnPreviewClick="Memo2OnPreviewClick" Frame.Typ="15" HAlign="haCenter" Memo.Text="Memo2" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo3" Left="226,7718" Top="7,55906" Width="188,9765" Height="18,89765" HAlign="haCenter" Memo.Text="Click these two memos"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,32 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.0a" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.DoubleBuffered="False" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.PagesOnSheet="0" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9957952199" ReportOptions.Description.Text="Demonstrates how to create simple report with one group. Group breaked each time when first letter of company name changes." ReportOptions.LastChange="38977,7795484259" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3900000020446174615365743D225265706F7274446174612E437573746F6D65727344532220446174615365744E616D653D22437573746F6D657273220000095661726961626C65730100055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" HGuides.Text="" VGuides.Text="">
<TfrxReportTitle Name="Band1" Height="26,45671" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo1" Left="0" Top="0" Width="710,55164" Height="22,67718" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band2" Height="34,01577" Left="0" Top="68,03154" Width="755,906">
<TfrxMemoView Name="Memo5" Left="0" Top="7,55906" Width="188,9765" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Company"/>
<TfrxMemoView Name="Memo6" Left="204,09462" Top="7,55906" Width="154,96073" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Address"/>
<TfrxMemoView Name="Memo7" Left="374,17347" Top="7,55906" Width="120,94496" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Contact"/>
<TfrxMemoView Name="Memo8" Left="510,23655" Top="7,55906" Width="83,14966" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Phone"/>
<TfrxMemoView Name="Memo9" Left="608,50433" Top="7,55906" Width="102,04731" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Fax"/>
</TfrxPageHeader>
<TfrxPageFooter Name="Band3" Height="26,45671" Left="0" Top="347,71676" Width="755,906">
<TfrxMemoView Name="Memo2" Left="0" Top="7,55905999999999" Width="710,55164" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="[Page] of [TotalPages]"/>
</TfrxPageFooter>
<TfrxMasterData Name="Band4" Height="22,67718" Left="0" Top="211,65368" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.CustomersDS" DataSetName="Customers" RowCount="0">
<TfrxMemoView Name="Memo10" Left="0" Top="0" Width="204,09462" Height="18,89765" DataField="Company" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo11" Left="204,09462" Top="0" Width="170,07885" Height="18,89765" DataField="Addr1" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Addr1&#34;]"/>
<TfrxMemoView Name="Memo12" Left="374,17347" Top="0" Width="136,06308" Height="18,89765" DataField="Contact" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Contact&#34;]"/>
<TfrxMemoView Name="Memo13" Left="510,23655" Top="0" Width="98,26778" Height="18,89765" DataField="Phone" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo14" Left="608,50433" Top="0" Width="102,04731" Height="18,89765" DataField="FAX" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;FAX&#34;]"/>
</TfrxMasterData>
<TfrxGroupHeader Name="GroupHeader1" Height="26,45671" Left="0" Top="162,51979" Width="755,906" Condition="Copy(&#60;Customers.&#34;Company&#34;&#62;, 1, 1)">
<TfrxMemoView Name="Memo3" Left="0" Top="0" Width="710,55164" Height="22,67718" Color="16053492" Font.Charset="1" Font.Color="128" Font.Height="-19" Font.Name="Arial" Font.Style="0" ParentFont="False" VAlign="vaCenter" Text="[Copy(&#60;Customers.&#34;Company&#34;&#62;, 1, 1)]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="30,23624" Left="0" Top="257,00804" Width="755,906">
<TfrxMemoView Name="Memo4" Left="0" Top="0" Width="710,55164" Height="18,89765" StretchMode="smMaxHeight" Frame.Color="12632256" Frame.Typ="4" HAlign="haRight" HideZeros="True" Text="Count: [Count(Band4)]"/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,11 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9978869907" ReportOptions.Description.Text="Shows how to use variables inside RichText." ReportOptions.LastChange="38842,972233669" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3900000020446174615365743D225265706F7274446174612E437573746F6D65727344532220446174615365744E616D653D22437573746F6D657273220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" HGuides.Text="" VGuides.Text="">
<TfrxPageFooter Name="Band3" Height="28" Left="0" Top="158,74026" Width="755,906">
<TfrxMemoView Name="Memo2" Left="6" Top="8" Width="704" Height="16" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="Page [Page#]"/>
</TfrxPageFooter>
<TfrxMasterData Name="Band4" Height="68" Left="0" Top="18,89765" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.CustomersDS" DataSetName="Customers" RowCount="0" Stretched="True">
<TfrxRichView Name="Rich1" Left="6" Top="40" Width="340" Height="20" StretchMode="smMaxHeight" GapX="2" GapY="1" PropData="0852696368456469740A3B0200007B5C727466315C616E73695C616E7369637067313235325C64656666305C6465666C616E67313033337B5C666F6E7474626C7B5C66305C66737769737320417269616C3B7D7B5C66315C6673776973735C66636861727365743020417269616C3B7D7B5C66325C666E696C204D532053616E732053657269663B7D7D0D0A7B5C636F6C6F7274626C203B5C726564305C677265656E305C626C7565303B5C726564305C677265656E305C626C75653235353B7D0D0A5C766965776B696E64345C7563315C706172645C71635C6366315C625C66305C667332302044656172205B437573746F6D6572732E22436F6E74616374225D215C62305C7061720D0A5C706172645C7061720D0A5C706172645C716A5C746162205765206469737475726220796F7520746F20696E666F726D2074686174206E65772076657273696F6E206F6620465C6631206173745265706F72745C66302020697320617661696C61626C6520666F7220646F776E6C6F6164696E67206174205C6366325C756C207777772E666173742D7265706F72742E636F6D5C6366315C756C6E6F6E65202E204E6F74696365732C2073756767657374696F6E7320616E6420627567207265706F727473206172652077656C636F6D65642E5C7061720D0A5C706172645C7061720D0A476F6F64206C75636B2C5C7061720D0A416C6578616E64657220547A7967616E656E6B6F5C7461625C7461625C746162205B444154455D5C66325C7061720D0A5C66305C7061720D0A5C7061720D0A5C7061720D0A7D0D0A00"/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,51 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" DotMatrixReport="False" EngineOptions.MaxMemSize="10000000" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37874,9679845602" ReportOptions.Description.Text="This report demonstrates different barcodes." ReportOptions.LastChange="38275,573916088" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B0000844617461736574730100095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="37,7953&#13;&#10;188,9765&#13;&#10;340,1577&#13;&#10;491,3389&#13;&#10;642,5201&#13;&#10;793,7013" VGuides.Text="37,7953&#13;&#10;188,9765&#13;&#10;340,1577&#13;&#10;491,3389">
<TfrxBarCodeView Name="BarCode1" Left="37,7953" Top="37,7953" Width="64" Height="86,92919" BarType="bcCode_2_5_interleaved" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxBarCodeView Name="BarCode2" Left="188,9765" Top="37,7953" Width="112" Height="86,92919" BarType="bcCode_2_5_industrial" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxBarCodeView Name="BarCode3" Left="340,1577" Top="37,7953" Width="79" Height="86,92919" BarType="bcCode_2_5_matrix" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxBarCodeView Name="BarCode4" Left="491,3389" Top="37,7953" Width="129" Height="86,92919" BarType="bcCode39" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxBarCodeView Name="BarCode5" Left="37,7953" Top="188,9765" Width="129" Height="86,92919" BarType="bcCode39Extended" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxBarCodeView Name="BarCode6" Left="188,9765" Top="188,9765" Width="123" Height="86,92919" BarType="bcCode128A" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxBarCodeView Name="BarCode7" Left="340,1577" Top="188,9765" Width="123" Height="86,92919" BarType="bcCode128B" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxBarCodeView Name="BarCode8" Left="491,3389" Top="188,9765" Width="79" Height="86,92919" BarType="bcCode128C" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxBarCodeView Name="BarCode9" Left="37,7953" Top="340,1577" Width="109" Height="86,92919" BarType="bcCode93" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxBarCodeView Name="BarCode10" Left="188,9765" Top="340,1577" Width="109" Height="86,92919" BarType="bcCode93Extended" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo1" Left="188,9765" Top="18,89765" Width="94,48825" Height="18,89765" Memo.Text="2 of 5 industrial"/>
<TfrxMemoView Name="Memo2" Left="37,7953" Top="18,89765" Width="109,60637" Height="18,89765" Memo.Text="2 of 5 interleaved"/>
<TfrxMemoView Name="Memo3" Left="340,1577" Top="18,89765" Width="94,48825" Height="18,89765" Memo.Text="2 of 5 matrix"/>
<TfrxMemoView Name="Memo4" Left="491,3389" Top="18,89765" Width="94,48825" Height="18,89765" Memo.Text="code 39"/>
<TfrxMemoView Name="Memo5" Left="37,7953" Top="170,07885" Width="94,48825" Height="18,89765" Memo.Text="code 39 ext"/>
<TfrxMemoView Name="Memo6" Left="188,9765" Top="170,07885" Width="94,48825" Height="18,89765" Memo.Text="code 128a"/>
<TfrxMemoView Name="Memo7" Left="340,1577" Top="170,07885" Width="94,48825" Height="18,89765" Memo.Text="code 128b"/>
<TfrxMemoView Name="Memo8" Left="491,3389" Top="170,07885" Width="94,48825" Height="18,89765" Memo.Text="code 128c"/>
<TfrxMemoView Name="Memo9" Left="37,7953" Top="321,26005" Width="94,48825" Height="18,89765" Memo.Text="code 93"/>
<TfrxMemoView Name="Memo10" Left="188,9765" Top="321,26005" Width="94,48825" Height="18,89765" Memo.Text="code 93 ext"/>
<TfrxBarCodeView Name="BarCode11" Left="340,1577" Top="340,1577" Width="115" Height="86,92919" BarType="bcCodeMSI" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo11" Left="340,1577" Top="321,26005" Width="94,48825" Height="18,89765" Memo.Text="msi"/>
<TfrxBarCodeView Name="BarCode12" Left="491,3389" Top="340,1577" Width="124" Height="86,92919" BarType="bcCodePostNet" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo12" Left="491,3389" Top="321,26005" Width="94,48825" Height="18,89765" Memo.Text="postnet"/>
<TfrxBarCodeView Name="BarCode13" Left="37,7953" Top="491,3389" Width="101" Height="86,92919" BarType="bcCodeCodabar" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo13" Left="37,7953" Top="472,44125" Width="94,48825" Height="18,89765" Memo.Text="codebar"/>
<TfrxBarCodeView Name="BarCode14" Left="188,9765" Top="491,3389" Width="67" Height="86,92919" BarType="bcCodeEAN8" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo14" Left="188,9765" Top="472,44125" Width="94,48825" Height="18,89765" Memo.Text="ean 8"/>
<TfrxBarCodeView Name="BarCode15" Left="340,1577" Top="491,3389" Width="95" Height="86,92919" BarType="bcCodeEAN13" Rotation="0" Text="1234567890123" Zoom="1"/>
<TfrxMemoView Name="Memo15" Left="340,1577" Top="472,44125" Width="94,48825" Height="18,89765" Memo.Text="ean 13"/>
<TfrxBarCodeView Name="BarCode16" Left="491,3389" Top="491,3389" Width="95" Height="86,92919" BarType="bcCodeUPC_A" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo16" Left="491,3389" Top="472,44125" Width="94,48825" Height="18,89765" Memo.Text="upc a"/>
<TfrxBarCodeView Name="BarCode17" Left="37,7953" Top="642,5201" Width="51" Height="86,92919" BarType="bcCodeUPC_E0" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo17" Left="37,7953" Top="623,62245" Width="94,48825" Height="18,89765" Memo.Text="upc e0"/>
<TfrxBarCodeView Name="BarCode18" Left="188,9765" Top="642,5201" Width="51" Height="86,92919" BarType="bcCodeUPC_E1" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo18" Left="188,9765" Top="623,62245" Width="94,48825" Height="18,89765" Memo.Text="upc e1"/>
<TfrxBarCodeView Name="BarCode19" Left="340,1577" Top="642,5201" Width="20" Height="86,92919" BarType="bcCodeUPC_Supp2" Rotation="0" Text="12" Zoom="1"/>
<TfrxMemoView Name="Memo19" Left="340,1577" Top="623,62245" Width="94,48825" Height="18,89765" Memo.Text="upc supp2"/>
<TfrxBarCodeView Name="BarCode20" Left="491,3389" Top="642,5201" Width="47" Height="86,92919" BarType="bcCodeUPC_Supp5" Rotation="0" Text="12345" Zoom="1"/>
<TfrxMemoView Name="Memo20" Left="491,3389" Top="623,62245" Width="94,48825" Height="18,89765" Memo.Text="upc supp5"/>
<TfrxBarCodeView Name="BarCode21" Left="37,7953" Top="793,7013" Width="134" Height="86,92919" BarType="bcCodeEAN128A" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo21" Left="37,7953" Top="774,80365" Width="94,48825" Height="18,89765" Memo.Text="ean 128a"/>
<TfrxBarCodeView Name="BarCode22" Left="188,9765" Top="793,7013" Width="134" Height="86,92919" BarType="bcCodeEAN128B" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo22" Left="188,9765" Top="774,80365" Width="94,48825" Height="18,89765" Memo.Text="ean 128b"/>
<TfrxBarCodeView Name="BarCode23" Left="340,1577" Top="793,7013" Width="90" Height="86,92919" BarType="bcCodeEAN128C" Rotation="0" Text="12345678" Zoom="1"/>
<TfrxMemoView Name="Memo23" Left="340,1577" Top="774,80365" Width="94,48825" Height="18,89765" Memo.Text="ean 128c"/>
</TfrxReportPage>
</TfrxReport>

File diff suppressed because one or more lines are too long

View File

@ -0,0 +1,57 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.Author="Fediachov A." ReportOptions.ConnectionName="FR Demo Base" ReportOptions.CreateDate="37874,9926516319" ReportOptions.Description.Text="Demonstrates how to use charts." ReportOptions.Name="Countries report" ReportOptions.LastChange="38860,6289093171" ReportOptions.VersionMinor="0" ReportOptions.VersionRelease="0" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;begin&#13;&#10;&#13;&#10;end." OnStartReport="frxReport1OnStartReport" PropData="044C65667403880003546F7003B00008446174617365747301010C2800000020446174615365743D22436F756E7472792220446174615365744E616D653D22436F756E7472792200010C3600000020446174615365743D2241726561506F70756C6174696F6E2220446174615365744E616D653D2241726561506F70756C6174696F6E2200010C2200000020446174615365743D22417265612220446174615365744E616D653D22417265612200010C2E00000020446174615365743D22506F70756C6174696F6E2220446174615365744E616D653D22506F70756C6174696F6E220000095661726961626C657301010C11000000204E616D653D222044617461626173652200010C2C000000204E616D653D2250617468546F4461746162617365222056616C75653D22272E2E5C64656D6F2E6D646227220000055374796C650100">
<TfrxReportPage Name="ChartN1" PaperWidth="215,9" PaperHeight="279,4" PaperSize="1" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxADOQuery Name="Country" UserName="Country" CloseDataSource="True" FieldAliases.Text="Name=Name&#13;&#10;Capital=Capital&#13;&#10;Continent=Continent&#13;&#10;Area=Area&#13;&#10;Population=Population" SQL.Text="SELECT c.Name, c.Capital, c.Area, c.Population, c.Continent&#13;&#10;FROM&#13;&#10; country c&#13;&#10;ORDER BY c.Continent, c.Name" SQLSchema="eAFtzj0LwjAQgOE90H9yw+VDsMMNWsGliKJbcThjhtCalDYd/Pcmg0Oh3Pi83F134sRHnt2zEvdbS8oYg0bX+7oS3YNfg5uzWLJxCWn6glagDShEkDvMyXny7xwgXfjj4F9ZkHkQECohqeHRJx5WWqyoosPkeJM0XeO4DJx8DJuBoSaG5IMLaeUy3y27u9aHvrz/A/nrQSc=" CommandTimeout="30" PropData="0A506172616D65746572730100"/>
<TfrxPageHeader Name="PageHeader1" Height="963,78015" Left="0" Top="18,89765" Width="740,409927">
<TfrxMemoView Name="Memo12" Left="11,33859" Top="3,77953" Width="718,1107" Height="30,23624" Color="15000804" Font.Charset="1" Font.Color="-16777208" Font.Height="-19" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Countries report"/>
<TfrxChartView Name="Chart1" ShiftMode="smWhenOverlapped" Left="11,33859" Top="34,01577" Width="718,1107" Height="449,76407" PropData="0543686172740A6A0300005450463006544368617274054368617274044C656674020003546F7002000557696474680390010648656967687403FA00144261636B57616C6C2E42727573682E436F6C6F720707636C5768697465144261636B57616C6C2E42727573682E5374796C6507076273436C656172144261636B57616C6C2E50656E2E56697369626C6508124772616469656E742E446972656374696F6E070B6764426F74746F6D546F70125469746C652E466F6E742E43686172736574070F44454641554C545F43484152534554105469746C652E466F6E742E436F6C6F720707636C426C61636B115469746C652E466F6E742E48656967687402F00F5469746C652E466F6E742E4E616D650605417269616C105469746C652E466F6E742E5374796C650B066673426F6C6400125469746C652E546578742E537472696E6773010623436861727420312E20506F70756C6174696F6E2028746F702031302076616C75657329000D4672616D652E56697369626C6508154C656674417869732E477269642E56697369626C6508114C656674417869732E496E766572746564090E4C6567656E642E56697369626C6508115269676874417869732E56697369626C650814546F70417869732E477269642E56697369626C65080656696577334408165669657733444F7074696F6E732E526F746174696F6E02000A426576656C4F75746572070662764E6F6E6505436F6C6F720707636C5768697465000F54486F72697A426172536572696573000E436F6C6F7245616368506F696E740909486F72697A41786973070861546F7041786973114D61726B732E4172726F774C656E677468020A0B4D61726B732E5374796C650709736D735856616C75650D4D61726B732E56697369626C65090B536572696573436F6C6F720705636C5265640C53686F77496E4C6567656E64080B4175746F42617253697A6509105856616C7565732E4461746554696D65080C5856616C7565732E4E616D650603426172125856616C7565732E4D756C7469706C696572050000000000000080FF3F0D5856616C7565732E4F7264657207066C6F4E6F6E65105956616C7565732E4461746554696D65080C5956616C7565732E4E616D65060159125956616C7565732E4D756C7469706C696572050000000000000080FF3F0D5956616C7565732E4F72646572070C6C6F44657363656E64696E670000000E4368617274456C65766174696F6E0359010A5365726965734461746101010C240100002044617461547970653D2264744442446174612220446174615365743D22506F70756C6174696F6E2220446174615365744E616D653D22506F70756C6174696F6E2220536F72744F726465723D22736F44657363656E64696E672220546F704E3D2233302220546F704E43617074696F6E3D224F74686572222058547970653D227874546578742220536F75726365313D22506F70756C6174696F6E2E262333343B4E616D65262333343B2220536F75726365323D22506F70756C6174696F6E2E262333343B506F70756C6174696F6E262333343B222058536F757263653D22506F70756C6174696F6E2E262333343B4E616D65262333343B222059536F757263653D22506F70756C6174696F6E2E262333343B506F70756C6174696F6E262333343B220000"/>
<TfrxChartView Name="Chart2" Left="11,33859" Top="483,77984" Width="718,1107" Height="476,22078" PropData="0543686172740AF90200005450463006544368617274054368617274044C656674020003546F7002000557696474680390010648656967687403FA000C416C6C6F7750616E6E696E670706706D4E6F6E6509416C6C6F775A6F6F6D08144261636B57616C6C2E42727573682E436F6C6F720707636C5768697465144261636B57616C6C2E42727573682E5374796C6507076273436C656172144261636B57616C6C2E50656E2E56697369626C6508114772616469656E742E456E64436F6C6F720707636C426C61636B125469746C652E466F6E742E43686172736574070F44454641554C545F43484152534554105469746C652E466F6E742E436F6C6F720707636C426C61636B115469746C652E466F6E742E48656967687402F00F5469746C652E466F6E742E4E616D650605417269616C105469746C652E466F6E742E5374796C650B066673426F6C6400125469746C652E546578742E537472696E6773010622436861727420322E20417265612073697A652028746F702031302076616C75657329000B4178697356697369626C65080A436C6970506F696E7473080D4672616D652E56697369626C6508175669657733444F7074696F6E732E456C65766174696F6E034001185669657733444F7074696F6E732E4F7274686F676F6E616C08195669657733444F7074696F6E732E50657273706563746976650200165669657733444F7074696F6E732E526F746174696F6E0368010B56696577334457616C6C73080A426576656C4F75746572070662764E6F6E6505436F6C6F720707636C5768697465000A5450696553657269657300114D61726B732E4172726F774C656E677468020F0D4D61726B732E56697369626C65090B536572696573436F6C6F720705636C5265640F4F74686572536C6963652E5465787406054F746865721250696556616C7565732E4461746554696D65080E50696556616C7565732E4E616D6506035069651450696556616C7565732E4D756C7469706C696572050000000000000080FF3F0F50696556616C7565732E4F7264657207066C6F4E6F6E650000000E4368617274456C65766174696F6E0340010A5365726965734461746101010CDF0000002044617461547970653D2264744442446174612220446174615365743D22417265612220446174615365744E616D653D22417265612220536F72744F726465723D22736F44657363656E64696E672220546F704E3D2230222058547970653D227874546578742220536F75726365313D22417265612E262333343B4E616D65262333343B2220536F75726365323D22417265612E262333343B41726561262333343B222058536F757263653D22417265612E262333343B4E616D65262333343B222059536F757263653D22417265612E262333343B41726561262333343B220000"/>
</TfrxPageHeader>
<TfrxADOQuery Name="AreaPopulation" UserName="AreaPopulation" CloseDataSource="True" FieldAliases.Text="Name=Name&#13;&#10;off=off" SQL.Text="SELECT TOP 20 Name, Population/Area as off&#13;&#10;FROM&#13;&#10; country&#13;&#10; order by Population/Area desc" SQLSchema="eAFtjz0PwiAURXcS/skbgH65vEFr4tIYjW7E4UkZiBUaSgf/vdTEjdzxnJvcq4+U6ECLfXB2uw7YtdVOiroVnOk7PSe7ZGDQhNWn+AGloJOghADZbMopujELAvswWvhbBiSIXziTeKZ3GSnsaXaJpmKxwn20VEQ1XsK8TpRc8EWhyXt8ct76VOR6cP61PfsCzIZIWQ==" CommandTimeout="30" PropData="0A506172616D65746572730100"/>
<TfrxADOQuery Name="Area" UserName="Area" CloseDataSource="True" FieldAliases.Text="" SQL.Text="select top 10 * from country order by area desc" CommandTimeout="30" PropData="0A506172616D65746572730100"/>
<TfrxADOQuery Name="Population" UserName="Population" CloseDataSource="True" FieldAliases.Text="" SQL.Text="select TOP 10 * from country order by population desc" CommandTimeout="30" PropData="0A506172616D65746572730100"/>
</TfrxReportPage>
<TfrxReportPage Name="ChartN2" PaperWidth="215,9" PaperHeight="279,4" PaperSize="1" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="PageHeader2" Height="430,86642" Left="0" Top="18,89765" Width="740,409927">
<TfrxChartView Name="Chart3" Left="22,67718" Top="3,77953" Width="657,63822" Height="400,63018" PropData="0543686172740AED0200005450463006544368617274054368617274044C656674020003546F7002000557696474680390010648656967687403FA00144261636B57616C6C2E42727573682E436F6C6F720707636C5768697465144261636B57616C6C2E50656E2E56697369626C6508125469746C652E466F6E742E43686172736574070F44454641554C545F43484152534554105469746C652E466F6E742E436F6C6F720707636C426C61636B115469746C652E466F6E742E48656967687402F00F5469746C652E466F6E742E4E616D650605417269616C105469746C652E466F6E742E5374796C650B066673426F6C6400125469746C652E546578742E537472696E677301062B436861727420332E20506F70756C6174696F6E2064656E736974792028746F702032302076616C756573290011426F74746F6D417869732E4C6162656C730817426F74746F6D417869732E4C6162656C734F6E41786973080D4672616D652E56697369626C6508175669657733444F7074696F6E732E456C65766174696F6E033B01195669657733444F7074696F6E732E50657273706563746976650200165669657733444F7074696F6E732E526F746174696F6E0368010A426576656C4F75746572070662764E6F6E6505436F6C6F720707636C5768697465000A54426172536572696573000E436F6C6F7245616368506F696E7409114D61726B732E4172726F774C656E67746802280A4D61726B732E436C6970090D4D61726B732E56697369626C65080B536572696573436F6C6F720705636C526564105856616C7565732E4461746554696D65080C5856616C7565732E4E616D65060158125856616C7565732E4D756C7469706C696572050000000000000080FF3F0D5856616C7565732E4F72646572070B6C6F417363656E64696E67105956616C7565732E4461746554696D65080C5956616C7565732E4E616D650603426172125956616C7565732E4D756C7469706C696572050000000000000080FF3F0D5956616C7565732E4F7264657207066C6F4E6F6E650000000E4368617274456C65766174696F6E033B010A5365726965734461746101010C130100002044617461547970653D2264744442446174612220446174615365743D2241726561506F70756C6174696F6E2220446174615365744E616D653D2241726561506F70756C6174696F6E2220536F72744F726465723D22736F4E6F6E652220546F704E3D2230222058547970653D227874546578742220536F75726365313D2241726561506F70756C6174696F6E2E262333343B4E616D65262333343B2220536F75726365323D2241726561506F70756C6174696F6E2E262333343B6F6666262333343B222058536F757263653D2241726561506F70756C6174696F6E2E262333343B4E616D65262333343B222059536F757263653D2241726561506F70756C6174696F6E2E262333343B6F6666262333343B220000"/>
<TfrxLineView Name="Line1" Left="22,67718" Top="419,52783" Width="653,85869" Height="0" Frame.Typ="4" Frame.Width="3"/>
</TfrxPageHeader>
</TfrxReportPage>
<TfrxReportPage Name="CountryList" PaperWidth="215,9" PaperHeight="279,4" PaperSize="1" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxHeader Name="Header1" Height="26,45671" Left="0" Top="181,41744" Width="740,409927" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo5" Left="0" Top="3,77952999999999" Width="226,7718" Height="18,89765" Color="12632256" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Name"/>
<TfrxMemoView Name="Memo6" Left="234,33086" Top="3,77952999999999" Width="177,63791" Height="18,89765" Color="12632256" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Capital"/>
<TfrxMemoView Name="Memo7" Left="419,52783" Top="3,77952999999999" Width="117,16543" Height="18,89765" Color="12632256" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Area"/>
<TfrxMemoView Name="Memo8" Left="544,25232" Top="3,77952999999999" Width="173,85838" Height="18,89765" Color="12632256" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Population"/>
</TfrxHeader>
<TfrxGroupHeader Name="GroupHeader1" Height="22,67718" Left="0" Top="230,55133" Width="740,409927" Condition="Country.&#34;Continent&#34;" OutlineText="Country.&#34;Continent&#34;">
<TfrxMemoView Name="Memo11" Left="0" Top="0" Width="718,11030945" Height="18,89765" Color="12632256" DataField="Continent" DataSet="Country" DataSetName="Country" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="[Country.&#34;Continent&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="MasterData1" Height="15,11812" Left="0" Top="275,90569" Width="740,409927" ColumnWidth="0" ColumnGap="0" DataSet="Country" DataSetName="Country" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="718,1107" Height="15,11812" DataSet="ReportData.CustomersDS" DataSetName="Customers" Highlight.Font.Charset="1" Highlight.Font.Color="-370606080" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="15790320" Highlight.Condition="&#60;Line#&#62; mod 2" WordWrap="False" Text=""/>
<TfrxMemoView Name="Memo1" Left="3,77953" Top="0" Width="222,99227" Height="15,11812" DataField="Name" DataSet="Country" DataSetName="Country" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="[Country.&#34;Name&#34;]"/>
<TfrxMemoView Name="Memo2" Left="234,33086" Top="0" Width="177,63791" Height="15,11812" DataField="Capital" DataSet="Country" DataSetName="Country" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="[Country.&#34;Capital&#34;]"/>
<TfrxMemoView Name="Memo3" Left="419,52783" Top="0" Width="117,16543" Height="15,11812" DataSet="Country" DataSetName="Country" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.0n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haRight" ParentFont="False" Text="[Country.&#34;Area&#34;]"/>
<TfrxMemoView Name="Memo4" Left="544,25232" Top="0" Width="170,07885" Height="15,11812" DataField="Population" DataSet="Country" DataSetName="Country" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.0n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haRight" ParentFont="False" Text="[Country.&#34;Population&#34;]"/>
</TfrxMasterData>
<TfrxReportTitle Name="ReportTitle2" Height="56,69295" Left="0" Top="18,89765" Width="740,409927">
<TfrxMemoView Name="Memo13" Left="0" Top="15,11812" Width="718,1107" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-19" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Countries summary"/>
</TfrxReportTitle>
<TfrxGroupFooter Name="GroupFooter1" Height="18,89765" Left="0" Top="313,70099" Width="740,409927">
<TfrxMemoView Name="Memo14" Left="0" Top="0" Width="536,69326" Height="18,89765" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.0n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Arial" Font.Style="1" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="[SUM(&#60;Country.&#34;Area&#34;&#62;,MasterData1)]"/>
<TfrxMemoView Name="Memo15" Left="536,69326" Top="0" Width="181,41744" Height="18,89765" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.0n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Arial" Font.Style="1" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="[SUM(&#60;Country.&#34;Population&#34;&#62;,MasterData1)]"/>
</TfrxGroupFooter>
<TfrxReportSummary Name="ReportSummary1" Height="22,67718" Left="0" Top="393,07112" Width="740,409927">
<TfrxMemoView Name="Memo16" Left="219,21274" Top="0" Width="317,48052" Height="18,89765" Color="12632256" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.0n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Arial" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;Country.&#34;Area&#34;&#62;,MasterData1)]"/>
<TfrxMemoView Name="Memo17" Left="536,69326" Top="0" Width="181,41744" Height="18,89765" Color="12632256" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.0n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Arial" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;Country.&#34;Population&#34;&#62;,MasterData1)]"/>
<TfrxMemoView Name="Memo18" Left="90,70872" Top="0" Width="128,50402" Height="18,89765" Color="12632256" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.0n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Arial" Font.Style="1" ParentFont="False" VAlign="vaCenter" Text="[COUNT(MasterData1)]"/>
<TfrxMemoView Name="Memo19" Left="0" Top="0" Width="90,70872" Height="18,89765" Color="12632256" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.0n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Arial" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTAL:"/>
</TfrxReportSummary>
<TfrxPageHeader Name="PageHeader3" Height="22,67718" Left="0" Top="98,26778" Width="740,409927">
<TfrxMemoView Name="Memo10" Left="0" Top="3,77952999999999" Width="718,1107" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="8" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Countries summary"/>
</TfrxPageHeader>
<TfrxPageFooter Name="PageFooter1" Height="22,67718" Left="0" Top="438,42548" Width="740,409927">
<TfrxMemoView Name="Memo20" Left="0" Top="3,77953000000002" Width="721,89023" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="Page [Page#] of [TotalPages#]"/>
</TfrxPageFooter>
</TfrxReportPage>
</TfrxReport>

File diff suppressed because one or more lines are too long

View File

@ -0,0 +1,51 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.0a" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.DoubleBuffered="False" PreviewOptions.Zoom="1" PrintOptions.PagesOnSheet="0" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9959574884" ReportOptions.Description.Text="This report shows how to use multiple groups." ReportOptions.LastChange="38977,5564009954" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3100000020446174615365743D225265706F7274446174612E517565727944532220446174615365744E616D653D2253616C6573220000095661726961626C65730100055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxPageFooter Name="Band1" Height="22,67718" Left="0" Top="461,10266" Width="755,906">
<TfrxMemoView Name="Memo5" Left="3,77953" Top="3,77953000000002" Width="710,55164" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="[Page#]"/>
</TfrxPageFooter>
<TfrxReportTitle Name="Band2" Height="30,23624" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo6" Left="3,77953" Top="3,77953" Width="710,55164" Height="22,67718" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band3" Height="22,67718" Left="0" Top="71,81107" Width="755,906" PrintOnFirstPage="False">
<TfrxMemoView Name="Memo16" Left="3,77953" Top="3,77952999999999" Width="710,55164" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="4" Frame.Width="2" ParentFont="False" Text=""/>
</TfrxPageHeader>
<TfrxGroupHeader Name="Band4" Height="45,35436" Left="0" Top="154,96073" Width="755,906" Condition="Sales.&#34;Cust No&#34;">
<TfrxMemoView Name="Memo17" Left="3,77953" Top="0" Width="287,24428" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="5" GapX="6" ParentFont="False" VAlign="vaCenter" Text="Company"/>
<TfrxMemoView Name="Memo19" Left="291,02381" Top="0" Width="177,63791" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Phone"/>
<TfrxMemoView Name="Memo20" Left="468,66172" Top="0" Width="245,66945" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="6" ParentFont="False" VAlign="vaCenter" Text="Fax"/>
<TfrxMemoView Name="Memo21" Left="291,02381" Top="18,89765" Width="177,63791" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo22" Left="468,66172" Top="18,89765" Width="245,66945" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;FAX&#34;]"/>
<TfrxMemoView Name="Memo18" Left="3,77953" Top="18,89765" Width="287,24428" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="1" GapX="6" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Company&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupHeader Name="Band5" Height="37,7953" Left="0" Top="222,99227" Width="755,906" Condition="Sales.&#34;Order No&#34;">
<TfrxMemoView Name="Memo3" Left="3,77953" Top="18,8976500000001" Width="52,91342" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo8" Left="3,77953" Top="0" Width="124,72449" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="1" GapX="4" Text="Order No [Sales.&#34;Order No&#34;]"/>
<TfrxMemoView Name="Memo9" Left="128,50402" Top="0" Width="585,82715" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="2" Text="Date [Sales.&#34;Sale Date&#34;]"/>
<TfrxMemoView Name="Memo10" Left="56,69295" Top="18,8976500000001" Width="71,81107" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Part"/>
<TfrxMemoView Name="Memo11" Left="128,50402" Top="18,8976500000001" Width="279,68522" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Description"/>
<TfrxMemoView Name="Memo12" Left="408,18924" Top="18,8976500000001" Width="83,14966" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Price"/>
<TfrxMemoView Name="Memo13" Left="491,3389" Top="18,8976500000001" Width="60,47248" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Qty"/>
<TfrxMemoView Name="Memo14" Left="551,81138" Top="18,8976500000001" Width="90,70872" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Total"/>
<TfrxMemoView Name="Memo31" Left="642,5201" Top="18,8976500000001" Width="71,81107" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupHeader>
<TfrxMasterData Name="Band6" Height="18,89765" Left="0" Top="283,46475" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.QueryDS" DataSetName="Sales" RowCount="0">
<TfrxMemoView Name="Memo2" Left="3,77953" Top="0" Width="52,91342" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo23" Left="56,69295" Top="0" Width="71,81107" Height="18,89765" DataField="Part No" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Part No&#34;]"/>
<TfrxMemoView Name="Memo24" Left="128,50402" Top="0" Width="279,68522" Height="18,89765" DataField="Description" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" ParentFont="False" Text="[Sales.&#34;Description&#34;]"/>
<TfrxMemoView Name="Memo25" Left="408,18924" Top="0" Width="83,14966" Height="18,89765" DataField="List Price" DataSet="ReportData.QueryDS" DataSetName="Sales" DisplayFormat.FormatStr="%2.2m" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[Sales.&#34;List Price&#34;]"/>
<TfrxMemoView Name="Memo26" Left="491,3389" Top="0" Width="60,47248" Height="18,89765" DataField="Qty" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Qty&#34;]"/>
<TfrxMemoView Name="Memo27" Left="551,81138" Top="0" Width="90,70872" Height="18,89765" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;]"/>
<TfrxMemoView Name="Memo32" Left="642,5201" Top="0" Width="71,81107" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxMasterData>
<TfrxGroupFooter Name="Band7" Height="30,23624" Left="0" Top="370,39394" Width="755,906">
<TfrxMemoView Name="Memo28" Left="3,77953" Top="0" Width="710,55164" Height="18,89765" Color="12632256" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Frame.Color="12632256" Frame.Typ="11" Text="Total sales this customer: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
</TfrxGroupFooter>
<TfrxGroupFooter Name="Band8" Height="22,67718" Left="0" Top="325,03958" Width="755,906">
<TfrxMemoView Name="Memo1" Left="3,77953" Top="0" Width="52,91342" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo15" Left="56,69295" Top="0" Width="585,82715" Height="22,67718" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="Total this order: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
<TfrxMemoView Name="Memo33" Left="642,5201" Top="0" Width="71,81107" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,24 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" DotMatrixReport="False" EngineOptions.MaxMemSize="10000000" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37875,5872434375" ReportOptions.Description.Text="New rotation types, fill styles, shadow, shapes." ReportOptions.LastChange="38112,9189174769" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B0000844617461736574730E00095661726961626C65730E00055374796C650E00">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMemoView Name="Memo1" Left="151,1812" Top="37,7953" Width="75,5906" Height="79,37013" Frame.Typ="15" HAlign="haCenter" Memo.Text="Rotated text" Rotation="45" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo2" Left="264,5671" Top="37,7953" Width="75,5906" Height="79,37013" Frame.Typ="15" HAlign="haCenter" Memo.Text="Rotated text" Rotation="90" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo3" Left="377,953" Top="37,7953" Width="75,5906" Height="79,37013" Frame.Typ="15" HAlign="haCenter" Memo.Text="Rotated text" Rotation="180" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo4" Left="491,3389" Top="37,7953" Width="75,5906" Height="79,37013" Frame.Typ="15" HAlign="haCenter" Memo.Text="Rotated text" Rotation="270" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo5" Left="37,7953" Top="188,9765" Width="75,5906" Height="75,5906" BrushStyle="bsHorizontal" Frame.Typ="15" HAlign="haCenter" Memo.Text="New fills" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo6" Left="151,1812" Top="188,9765" Width="75,5906" Height="75,5906" BrushStyle="bsVertical" Frame.Typ="15" HAlign="haCenter" Memo.Text="New fills" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo7" Left="264,5671" Top="188,9765" Width="75,5906" Height="75,5906" BrushStyle="bsFDiagonal" Frame.Typ="15" HAlign="haCenter" Memo.Text="New fills" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo8" Left="377,953" Top="188,9765" Width="75,5906" Height="75,5906" BrushStyle="bsBDiagonal" Frame.Typ="15" HAlign="haCenter" Memo.Text="New fills" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo9" Left="491,3389" Top="188,9765" Width="75,5906" Height="75,5906" BrushStyle="bsCross" Frame.Typ="15" HAlign="haCenter" Memo.Text="New fills" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo10" Left="604,7248" Top="188,9765" Width="75,5906" Height="75,5906" BrushStyle="bsDiagCross" Frame.Typ="15" HAlign="haCenter" Memo.Text="New fills" VAlign="vaCenter"/>
<TfrxMemoView Name="Memo11" Left="94,48825" Top="343,93723" Width="75,5906" Height="75,5906" Frame.DropShadow="True" Frame.ShadowColor="8421504" Frame.Typ="15" HAlign="haCenter" Memo.Text="shadow" VAlign="vaCenter"/>
<TfrxLineView Name="Line1" Left="90,70872" Top="495,11843" Width="75,5906" Height="75,5906" Diagonal="True"/>
<TfrxLineView Name="Line2" Left="166,29932" Top="570,70903" Width="75,5906" Height="-75,5906" Diagonal="True"/>
<TfrxLineView Name="Line3" Left="166,29932" Top="457,32313" Width="75,5906" Height="37,7953" Diagonal="True"/>
<TfrxLineView Name="Line4" Left="90,70872" Top="495,11843" Width="75,5906" Height="-37,7953" Diagonal="True"/>
<TfrxShapeView Name="Shape1" Left="207,87415" Top="343,93723" Width="75,5906" Height="75,5906" Shape="skRoundRectangle"/>
<TfrxShapeView Name="Shape2" Left="321,26005" Top="343,93723" Width="75,5906" Height="75,5906" Shape="skEllipse"/>
<TfrxShapeView Name="Shape3" Left="434,64595" Top="343,93723" Width="75,5906" Height="75,5906" Shape="skTriangle"/>
<TfrxShapeView Name="Shape4" Left="548,03185" Top="343,93723" Width="75,5906" Height="75,5906" Shape="skDiamond"/>
</TfrxReportPage>
</TfrxReport>

File diff suppressed because one or more lines are too long

View File

@ -0,0 +1,47 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9959574884" ReportOptions.Description.Text="This report shows how to keep all group records together on the page." ReportOptions.LastChange="38842,973694213" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3100000020446174615365743D225265706F7274446174612E517565727944532220446174615365744E616D653D2253616C6573220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxPageFooter Name="Band1" Height="26,45671" Left="0" Top="480,00031" Width="755,906">
<TfrxMemoView Name="Memo5" Left="3,77953" Top="3,77953000000002" Width="710,55164" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="[Page#]"/>
</TfrxPageFooter>
<TfrxReportTitle Name="Band2" Height="30,23624" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo6" Left="3,77953" Top="0" Width="710,55164" Height="22,67718" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxGroupHeader Name="Band4" Height="45,35436" Left="0" Top="120,94496" Width="755,906" Condition="Sales.&#34;Cust No&#34;" KeepTogether="True">
<TfrxMemoView Name="Memo17" Left="3,77953" Top="0" Width="298,58287" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="5" ParentFont="False" VAlign="vaCenter" Text="Company"/>
<TfrxMemoView Name="Memo18" Left="3,77953" Top="18,89765" Width="298,58287" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo19" Left="302,3624" Top="0" Width="162,51979" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Phone"/>
<TfrxMemoView Name="Memo20" Left="464,88219" Top="0" Width="249,44898" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="6" ParentFont="False" VAlign="vaCenter" Text="Fax"/>
<TfrxMemoView Name="Memo21" Left="302,3624" Top="18,89765" Width="162,51979" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo22" Left="464,88219" Top="18,89765" Width="249,44898" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;FAX&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupHeader Name="Band5" Height="37,7953" Left="0" Top="200,31509" Width="755,906" Condition="Sales.&#34;Order No&#34;">
<TfrxMemoView Name="Memo3" Left="3,77953" Top="18,89765" Width="41,57483" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo8" Left="3,77953" Top="0" Width="124,72449" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="1" Text="Order No [Sales.&#34;Order No&#34;]"/>
<TfrxMemoView Name="Memo9" Left="124,72449" Top="0" Width="589,60668" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="2" Text="Date [Sales.&#34;Sale Date&#34;]"/>
<TfrxMemoView Name="Memo10" Left="45,35436" Top="18,89765" Width="52,91342" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Part"/>
<TfrxMemoView Name="Memo11" Left="109,60637" Top="18,89765" Width="226,7718" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Description"/>
<TfrxMemoView Name="Memo12" Left="355,27582" Top="18,89765" Width="86,92919" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Price"/>
<TfrxMemoView Name="Memo13" Left="442,20501" Top="18,89765" Width="68,03154" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Qty"/>
<TfrxMemoView Name="Memo14" Left="510,23655" Top="18,89765" Width="79,37013" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Total"/>
<TfrxMemoView Name="Memo4" Left="589,60668" Top="18,89765" Width="124,72449" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupHeader>
<TfrxMasterData Name="Band6" Height="15,11812" Left="0" Top="272,12616" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.QueryDS" DataSetName="Sales" RowCount="0">
<TfrxMemoView Name="Memo2" Left="3,77953" Top="0" Width="41,57483" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo23" Left="45,35436" Top="0" Width="52,91342" Height="15,11812" DataField="Part No" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Part No&#34;]"/>
<TfrxMemoView Name="Memo24" Left="109,60637" Top="0" Width="226,7718" Height="15,11812" DataField="Description" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" ParentFont="False" Text="[Sales.&#34;Description&#34;]"/>
<TfrxMemoView Name="Memo25" Left="355,27582" Top="0" Width="86,92919" Height="15,11812" DataField="List Price" DataSet="ReportData.QueryDS" DataSetName="Sales" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[Sales.&#34;List Price&#34;]"/>
<TfrxMemoView Name="Memo26" Left="442,20501" Top="0" Width="68,03154" Height="15,11812" DataField="Qty" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Qty&#34;]"/>
<TfrxMemoView Name="Memo27" Left="510,23655" Top="0" Width="79,37013" Height="15,11812" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;]"/>
<TfrxMemoView Name="Memo7" Left="589,60668" Top="0" Width="124,72449" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxMasterData>
<TfrxGroupFooter Name="Band7" Height="30,23624" Left="0" Top="377,953" Width="755,906">
<TfrxMemoView Name="Memo28" Left="3,77953" Top="0" Width="710,55164" Height="18,89765" Color="12632256" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Frame.Color="12632256" Frame.Typ="11" Text="Total sales this customer: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
</TfrxGroupFooter>
<TfrxGroupFooter Name="Band8" Height="22,67718" Left="0" Top="321,26005" Width="755,906">
<TfrxMemoView Name="Memo1" Left="3,77953" Top="0" Width="41,57483" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo15" Left="45,35436" Top="0" Width="544,25232" Height="18,89765" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="Total this order: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
<TfrxMemoView Name="Memo29" Left="589,60668" Top="0" Width="124,72449" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,50 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineVisible="True" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9959574884" ReportOptions.Description.Text="This report shows how to put items in the preview outline control. Some bands (all data bands and group headers) have OutlineText property. You can put a value into this property and FR will automatically build a report outline. You can use it for navigation in the preview." ReportOptions.LastChange="38842,9742227546" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3100000020446174615365743D225265706F7274446174612E517565727944532220446174615365744E616D653D2253616C6573220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxPageFooter Name="Band1" Height="26,45671" Left="0" Top="536,69326" Width="755,906">
<TfrxMemoView Name="Memo5" Left="3,77953" Top="3,77953000000002" Width="710,55164" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="[Page#]"/>
</TfrxPageFooter>
<TfrxReportTitle Name="Band2" Height="30,23624" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo6" Left="3,77953" Top="3,77953" Width="710,55164" Height="22,67718" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band3" Height="22,67718" Left="0" Top="83,14966" Width="755,906" PrintOnFirstPage="False">
<TfrxMemoView Name="Memo16" Left="3,77953" Top="3,77952999999999" Width="710,55164" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="4" Frame.Width="2" ParentFont="False" Text=""/>
</TfrxPageHeader>
<TfrxGroupHeader Name="Band4" Height="45,35436" Left="0" Top="177,63791" Width="755,906" Condition="Sales.&#34;Cust No&#34;" OutlineText="&#60;Sales.&#34;Company&#34;&#62;">
<TfrxMemoView Name="Memo17" Left="3,77953" Top="0" Width="298,58287" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="5" ParentFont="False" VAlign="vaCenter" Text="Company"/>
<TfrxMemoView Name="Memo18" Left="3,77953" Top="18,89765" Width="298,58287" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo19" Left="302,3624" Top="0" Width="162,51979" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Phone"/>
<TfrxMemoView Name="Memo20" Left="464,88219" Top="0" Width="249,44898" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="6" ParentFont="False" VAlign="vaCenter" Text="Fax"/>
<TfrxMemoView Name="Memo21" Left="302,3624" Top="18,89765" Width="162,51979" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo22" Left="464,88219" Top="18,89765" Width="249,44898" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;FAX&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupHeader Name="Band5" Height="37,7953" Left="0" Top="257,00804" Width="755,906" Condition="Sales.&#34;Order No&#34;" OutlineText="Sales.&#34;Order No&#34;">
<TfrxMemoView Name="Memo3" Left="3,77953" Top="18,8976500000001" Width="41,57483" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo8" Left="3,77953" Top="0" Width="120,94496" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="1" Text="Order No [Sales.&#34;Order No&#34;]"/>
<TfrxMemoView Name="Memo9" Left="124,72449" Top="0" Width="589,60668" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="2" Text="Date [Sales.&#34;Sale Date&#34;]"/>
<TfrxMemoView Name="Memo10" Left="45,35436" Top="18,8976500000001" Width="60,47248" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Part"/>
<TfrxMemoView Name="Memo11" Left="113,3859" Top="18,8976500000001" Width="230,55133" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Description"/>
<TfrxMemoView Name="Memo12" Left="355,27582" Top="18,8976500000001" Width="79,37013" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Price"/>
<TfrxMemoView Name="Memo13" Left="442,20501" Top="18,8976500000001" Width="60,47248" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Qty"/>
<TfrxMemoView Name="Memo14" Left="510,23655" Top="18,8976500000001" Width="79,37013" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Total"/>
<TfrxMemoView Name="Memo7" Left="672,75634" Top="18,8976500000001" Width="41,57483" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupHeader>
<TfrxMasterData Name="Band6" Height="15,11812" Left="0" Top="328,81911" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.QueryDS" DataSetName="Sales" RowCount="0">
<TfrxMemoView Name="Memo2" Left="3,77953" Top="0" Width="41,57483" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo23" Left="45,35436" Top="0" Width="60,47248" Height="15,11812" DataField="Part No" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Part No&#34;]"/>
<TfrxMemoView Name="Memo24" Left="113,3859" Top="0" Width="230,55133" Height="15,11812" DataField="Description" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" ParentFont="False" Text="[Sales.&#34;Description&#34;]"/>
<TfrxMemoView Name="Memo25" Left="355,27582" Top="0" Width="79,37013" Height="15,11812" DataField="List Price" DataSet="ReportData.QueryDS" DataSetName="Sales" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[Sales.&#34;List Price&#34;]"/>
<TfrxMemoView Name="Memo26" Left="442,20501" Top="0" Width="60,47248" Height="15,11812" DataField="Qty" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Qty&#34;]"/>
<TfrxMemoView Name="Memo27" Left="510,23655" Top="0" Width="79,37013" Height="15,11812" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;]"/>
<TfrxMemoView Name="Memo29" Left="672,75634" Top="0" Width="41,57483" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxMasterData>
<TfrxGroupFooter Name="Band7" Height="30,23624" Left="0" Top="434,64595" Width="755,906">
<TfrxMemoView Name="Memo28" Left="3,77953" Top="0" Width="710,55164" Height="18,89765" Color="12632256" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Frame.Color="12632256" Frame.Typ="11" Text="Total sales this customer: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
</TfrxGroupFooter>
<TfrxGroupFooter Name="Band8" Height="22,67718" Left="0" Top="377,953" Width="755,906">
<TfrxMemoView Name="Memo1" Left="3,77953" Top="0" Width="41,57483" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo15" Left="45,35436" Top="0" Width="544,25232" Height="18,89765" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="Total this order: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
<TfrxMemoView Name="Memo30" Left="672,75634" Top="0" Width="41,57483" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,60 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9959574884" ReportOptions.Description.Text="This report demonstrates how to use URLs and anchors.&#13;&#10;&#13;&#10;To assign an URL to an object, just fill in its URL property. If first symbol of this property is '#', this is an anchor (it should be added in the script by Engine.AddAnchor method). First '@' symbol means a page number. Otherwise it is treated as an URL (for example, http://www.someurl.com)." ReportOptions.LastChange="38842,9747479282" ScriptLanguage="PascalScript" ScriptText.Text="procedure Band4OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; Engine.AddAnchor(&#60;Sales.&#34;Company&#34;&#62;);&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3100000020446174615365743D225265706F7274446174612E517565727944532220446174615365744E616D653D2253616C6573220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page2" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxGroupHeader Name="GroupHeader1" Height="22,67718" Left="0" Top="162,51979" Width="718,1107" Condition="Sales.&#34;Cust No&#34;">
<TfrxMemoView Name="Memo29" Left="0" Top="0" Width="238,11039" Height="18,89765" URL="#[Sales.&#34;Company&#34;]" DataField="Company" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="16711680" Font.Height="-13" Font.Name="Arial" Font.Style="5" ParentFont="False" Text="[Sales.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo31" Left="536,69326" Top="0" Width="162,51979" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" HAlign="haRight" ParentFont="False" Text="[Engine.GetAnchorPage(&#60;Sales.&#34;Company&#34;&#62;)]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="MasterData1" Height="0" Left="0" Top="219,21274" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="ReportData.QueryDS" DataSetName="Sales" RowCount="0"/>
<TfrxReportTitle Name="ReportTitle1" Height="71,81107" Left="0" Top="18,89765" Width="718,1107">
<TfrxMemoView Name="Memo30" Left="0" Top="37,7953" Width="699,21305" Height="26,45671" Font.Charset="1" Font.Color="0" Font.Height="-19" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="Table of contents"/>
<TfrxMemoView Name="Memo32" Left="453,5436" Top="0" Width="245,66945" Height="18,89765" HAlign="haRight" Text="This report is created in the FastReport"/>
<TfrxMemoView Name="Memo33" Left="453,5436" Top="18,89765" Width="245,66945" Height="18,89765" URL="http://www.fast-report.com" Font.Charset="1" Font.Color="16711680" Font.Height="-13" Font.Name="Arial" Font.Style="4" HAlign="haRight" ParentFont="False" Text="http://www.fast-report.com"/>
</TfrxReportTitle>
</TfrxReportPage>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" HGuides.Text="" VGuides.Text="">
<TfrxPageFooter Name="Band1" Height="22,67718" Left="0" Top="476,22078" Width="755,906">
<TfrxMemoView Name="Memo5" Left="109,60637" Top="3,77953000000002" Width="604,7248" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="[Page#]"/>
<TfrxMemoView Name="Memo34" Left="0" Top="3,77953000000002" Width="109,60637" Height="15,11812" URL="@1" Font.Charset="1" Font.Color="16711680" Font.Height="-11" Font.Name="Arial" Font.Style="4" Frame.Typ="4" Frame.Width="2" ParentFont="False" Text="&#60;&#60; back to first page"/>
</TfrxPageFooter>
<TfrxReportTitle Name="Band2" Height="26,45671" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo6" Left="0" Top="3,77953" Width="714,33117" Height="18,89765" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxGroupHeader Name="Band4" Height="45,35436" Left="0" Top="117,16543" Width="755,906" OnBeforePrint="Band4OnBeforePrint" Condition="Sales.&#34;Cust No&#34;">
<TfrxMemoView Name="Memo17" Left="0" Top="0" Width="302,3624" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Company"/>
<TfrxMemoView Name="Memo18" Left="0" Top="18,89765" Width="306,14193" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo19" Left="302,3624" Top="0" Width="162,51979" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Phone"/>
<TfrxMemoView Name="Memo20" Left="464,88219" Top="0" Width="249,44898" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="6" ParentFont="False" VAlign="vaCenter" Text="Fax"/>
<TfrxMemoView Name="Memo21" Left="302,3624" Top="18,89765" Width="162,51979" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo22" Left="464,88219" Top="18,89765" Width="249,44898" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;FAX&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupHeader Name="Band5" Height="37,7953" Left="0" Top="196,53556" Width="755,906" Condition="Sales.&#34;Order No&#34;">
<TfrxMemoView Name="Memo3" Left="0" Top="18,89765" Width="45,35436" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo8" Left="0" Top="0" Width="124,72449" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="1" Text="Order No [Sales.&#34;Order No&#34;]"/>
<TfrxMemoView Name="Memo9" Left="124,72449" Top="0" Width="589,60668" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="2" Text="Date [Sales.&#34;Sale Date&#34;]"/>
<TfrxMemoView Name="Memo10" Left="45,35436" Top="18,89765" Width="60,47248" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Part"/>
<TfrxMemoView Name="Memo11" Left="113,3859" Top="18,89765" Width="230,55133" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Description"/>
<TfrxMemoView Name="Memo12" Left="355,27582" Top="18,89765" Width="79,37013" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Price"/>
<TfrxMemoView Name="Memo13" Left="442,20501" Top="18,89765" Width="60,47248" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Qty"/>
<TfrxMemoView Name="Memo14" Left="510,23655" Top="18,89765" Width="79,37013" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Total"/>
<TfrxMemoView Name="Memo4" Left="589,60668" Top="18,89765" Width="124,72449" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupHeader>
<TfrxMasterData Name="Band6" Height="15,11812" Left="0" Top="268,34663" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.QueryDS" DataSetName="Sales" RowCount="0">
<TfrxMemoView Name="Memo2" Left="0" Top="0" Width="45,35436" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo23" Left="45,35436" Top="0" Width="60,47248" Height="15,11812" DataField="Part No" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Part No&#34;]"/>
<TfrxMemoView Name="Memo24" Left="113,3859" Top="0" Width="230,55133" Height="15,11812" DataField="Description" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" ParentFont="False" Text="[Sales.&#34;Description&#34;]"/>
<TfrxMemoView Name="Memo25" Left="355,27582" Top="0" Width="79,37013" Height="15,11812" DataField="List Price" DataSet="ReportData.QueryDS" DataSetName="Sales" DisplayFormat.FormatStr="%2.2m" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[Sales.&#34;List Price&#34;]"/>
<TfrxMemoView Name="Memo26" Left="442,20501" Top="0" Width="60,47248" Height="15,11812" DataField="Qty" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Qty&#34;]"/>
<TfrxMemoView Name="Memo27" Left="510,23655" Top="0" Width="79,37013" Height="15,11812" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;]"/>
<TfrxMemoView Name="Memo7" Left="589,60668" Top="0" Width="124,72449" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxMasterData>
<TfrxGroupFooter Name="Band7" Height="30,23624" Left="0" Top="374,17347" Width="755,906">
<TfrxMemoView Name="Memo28" Left="0" Top="0" Width="714,33117" Height="18,89765" Color="12632256" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Frame.Color="12632256" Frame.Typ="11" Text="Total sales this customer: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
</TfrxGroupFooter>
<TfrxGroupFooter Name="Band8" Height="22,67718" Left="0" Top="317,48052" Width="755,906">
<TfrxMemoView Name="Memo1" Left="0" Top="0" Width="45,35436" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo15" Left="45,35436" Top="0" Width="544,25232" Height="18,89765" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="Total this order: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
<TfrxMemoView Name="Memo35" Left="589,60668" Top="0" Width="124,72449" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,20 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.20" DotMatrixReport="False" EngineOptions.DoublePass="True" EngineOptions.UseFileCache="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.Author="FastReport" ReportOptions.ConnectionName="FR Demo Base" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="Demonstrates how to create simple unicode report." ReportOptions.Name="Unicode report" ReportOptions.LastChange="38804,0465254861" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." OnStartReport="frxReport1OnStartReport" PropData="08446174617365747301010C2800000020446174615365743D22556E69636F64652220446174615365744E616D653D22556E69636F6465220000095661726961626C657301010C0F000000204E616D653D22204D79566172732200010C0E000000204E616D653D22506172616D312200010C0E000000204E616D653D22506172616D322200010C11000000204E616D653D222044617461626173652200010C2C000000204E616D653D2250617468546F4461746142617365222056616C75653D22272E2E5C64656D6F2E6D646227220000055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxReportTitle Name="Band1" Height="26,45671" Left="0" Top="18,89765" Width="718,1107">
<TfrxMemoView Name="Memo1" Align="baWidth" Left="0" Top="3,77953" Width="718,1107" Height="22,67718" Color="8421376" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Unicode example"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band2" Height="34,01577" Left="0" Top="68,03154" Width="718,1107">
<TfrxMemoView Name="Memo4" Align="baRight" Left="370,39394" Top="7,55906" Width="347,71676" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Value"/>
<TfrxMemoView Name="Memo3" Align="baLeft" Left="0" Top="7,55906" Width="362,83488" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Description"/>
</TfrxPageHeader>
<TfrxPageFooter Name="Band3" Height="26,45671" Left="0" Top="245,66945" Width="718,1107">
<TfrxMemoView Name="Memo2" Align="baWidth" Left="0" Top="7,55905999999999" Width="718,1107" Height="15,11812" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="Page [Page] of [TotalPages]"/>
</TfrxPageFooter>
<TfrxMasterData Name="Band4" Height="22,67718" Left="0" Top="162,51979" Width="718,1107" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="Unicode" DataSetName="Unicode" RowCount="0">
<TfrxMemoView Name="Memo9" Align="baRight" Left="366,61441" Top="0" Width="351,49629" Height="18,89765" DataField="Value" DataSet="Unicode" DataSetName="Unicode" Text="[Unicode.&#34;Value&#34;]"/>
<TfrxMemoView Name="Memo8" Align="baLeft" Left="0" Top="0" Width="359,05535" Height="18,89765" DataSet="Unicode" DataSetName="Unicode" Text="[Unicode.&#34;Description&#34;]"/>
</TfrxMasterData>
<TfrxADOQuery Name="Unicode" UserName="Unicode" CloseDataSource="True" FieldAliases.Text="Description=Description&#13;&#10;Value=Value" SQL.Text="select * from unicode" CommandTimeout="30" PropData="0A506172616D65746572730100"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,52 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9961568403" ReportOptions.Description.Text="Demonstrates how to create Master/Detail/SubDetail report. This report contains three data-bands which are connected to datasets." ReportOptions.LastChange="38842,9250798611" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3900000020446174615365743D225265706F7274446174612E437573746F6D65727344532220446174615365744E616D653D22437573746F6D6572732200010C3300000020446174615365743D225265706F7274446174612E4F726465727344532220446174615365744E616D653D224F72646572732200010C3100000020446174615365743D225265706F7274446174612E4974656D7344532220446174615365744E616D653D224974656D73220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxPageFooter Name="Band1" Height="22,67718" Left="0" Top="510,23655" Width="755,906">
<TfrxMemoView Name="Memo5" Left="3,77953" Top="3,77953000000008" Width="706,77211" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="[Page#]"/>
</TfrxPageFooter>
<TfrxReportTitle Name="Band2" Height="30,23624" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo6" Left="3,77953" Top="3,77953" Width="706,77211" Height="22,67718" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxMasterData Name="Band4" Height="45,35436" Left="0" Top="120,94496" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.CustomersDS" DataSetName="Customers" RowCount="0">
<TfrxMemoView Name="Memo23" Left="11,33859" Top="0" Width="283,46475" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Company"/>
<TfrxMemoView Name="Memo24" Left="11,33859" Top="18,89765" Width="283,46475" Height="26,45671" Color="128" DataField="Company" DataSet="ReportData.CustomersDS" DataSetName="Customers" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Customers.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo25" Left="294,80334" Top="0" Width="173,85838" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Phone"/>
<TfrxMemoView Name="Memo26" Left="468,66172" Top="0" Width="162,51979" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Fax"/>
<TfrxMemoView Name="Memo27" Left="294,80334" Top="18,89765" Width="173,85838" Height="26,45671" Color="128" DataField="Phone" DataSet="ReportData.CustomersDS" DataSetName="Customers" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Customers.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo28" Left="468,66172" Top="18,89765" Width="162,51979" Height="26,45671" Color="128" DataField="FAX" DataSet="ReportData.CustomersDS" DataSetName="Customers" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Customers.&#34;FAX&#34;]"/>
<TfrxMemoView Name="Memo29" Left="631,18151" Top="0" Width="79,37013" Height="45,35436" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="3" Frame.Color="12632256" Frame.Typ="6" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo7" Left="3,77953" Top="0" Width="7,55906" Height="45,35436" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="3" Frame.Color="12632256" Frame.Typ="5" ParentFont="False" VAlign="vaCenter" Text=""/>
</TfrxMasterData>
<TfrxDetailData Name="Band5" Height="18,89765" Left="0" Top="200,31509" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.OrdersDS" DataSetName="Orders" RowCount="0">
<TfrxMemoView Name="Memo4" Left="3,77953" Top="0" Width="3,77953" Height="18,89765" Color="12632256" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo8" Left="7,55906" Top="0" Width="117,16543" Height="18,89765" Color="12632256" Text="Order No [Orders.&#34;Order No&#34;]"/>
<TfrxMemoView Name="Memo9" Left="124,72449" Top="0" Width="585,82715" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="2" Text="Date [Orders.&#34;Sale Date&#34;]"/>
</TfrxDetailData>
<TfrxFooter Name="Band6" Height="26,45671" Left="0" Top="253,22851" Width="755,906">
<TfrxMemoView Name="Memo10" Left="3,77953" Top="0" Width="706,77211" Height="18,89765" Color="12632256" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Frame.Color="12632256" Frame.Typ="11" Text="Total sales this customer: [Sum(&#60;Items.&#34;Qty&#34;&#62;*&#60;Items.&#34;Price&#34;&#62;, Band8)]"/>
</TfrxFooter>
<TfrxHeader Name="Band7" Height="18,89765" Left="0" Top="313,70099" Width="755,906">
<TfrxMemoView Name="Memo3" Left="3,77953" Top="0" Width="41,57483" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo11" Left="45,35436" Top="0" Width="56,69295" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="Part"/>
<TfrxMemoView Name="Memo12" Left="109,60637" Top="0" Width="226,7718" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="Description"/>
<TfrxMemoView Name="Memo13" Left="343,93723" Top="0" Width="79,37013" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="Price"/>
<TfrxMemoView Name="Memo14" Left="430,86642" Top="0" Width="56,69295" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="Qty"/>
<TfrxMemoView Name="Memo15" Left="495,11843" Top="0" Width="79,37013" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="Total"/>
<TfrxMemoView Name="Memo30" Left="574,48856" Top="0" Width="136,06308" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxHeader>
<TfrxSubdetailData Name="Band8" Height="15,11812" Left="0" Top="366,61441" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.ItemsDS" DataSetName="Items" RowCount="0">
<TfrxMemoView Name="Memo2" Left="3,77953" Top="0" Width="41,57483" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo16" Left="45,35436" Top="0" Width="56,69295" Height="15,11812" DataField="Part No" DataSet="ReportData.ItemsDS" DataSetName="Items" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="[Items.&#34;Part No&#34;]"/>
<TfrxMemoView Name="Memo17" Left="109,60637" Top="0" Width="226,7718" Height="15,11812" DataField="Part Name" DataSet="ReportData.ItemsDS" DataSetName="Items" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="[Items.&#34;Part Name&#34;]"/>
<TfrxMemoView Name="Memo18" Left="343,93723" Top="0" Width="79,37013" Height="15,11812" DataField="Price" DataSet="ReportData.ItemsDS" DataSetName="Items" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haRight" ParentFont="False" Text="[Items.&#34;Price&#34;]"/>
<TfrxMemoView Name="Memo19" Left="430,86642" Top="0" Width="56,69295" Height="15,11812" DataField="Qty" DataSet="ReportData.ItemsDS" DataSetName="Items" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="[Items.&#34;Qty&#34;]"/>
<TfrxMemoView Name="Memo20" Left="495,11843" Top="0" Width="79,37013" Height="15,11812" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" HAlign="haRight" ParentFont="False" Text="[&#60;Items.&#34;Qty&#34;&#62;*&#60;Items.&#34;Price&#34;&#62;]"/>
<TfrxMemoView Name="Memo31" Left="574,48856" Top="0" Width="136,06308" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxSubdetailData>
<TfrxFooter Name="Band9" Height="22,67718" Left="0" Top="415,7483" Width="755,906">
<TfrxMemoView Name="Memo1" Left="3,77953" Top="0" Width="41,57483" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo21" Left="45,35436" Top="0" Width="529,1342" Height="18,89765" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="Total this order: [Sum(&#60;Items.&#34;Qty&#34;&#62;*&#60;Items.&#34;Price&#34;&#62;, Band8)]"/>
<TfrxMemoView Name="Memo32" Left="574,48856" Top="0" Width="136,06308" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,11 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" DotMatrixReport="False" EngineOptions.MaxMemSize="10000000" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37875,6208219213" ReportOptions.Description.Text="Demonstrates how to add a dialog form to the report.&#13;&#10;If you press OK button you will see the report. Otherwise report will be cancelled." ReportOptions.LastChange="38344,7228706366" ScriptLanguage="PascalScript" ScriptText.Text="procedure Label2OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B0000844617461736574730100095661726961626C65730100055374796C650100">
<TfrxDialogPage Name="DialogPage1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" BorderStyle="bsDialog" Height="139" Left="265" Top="150" Width="300">
<TfrxButtonControl Name="Button1" Left="68" Top="64" Width="75" Height="25" Caption="OK" ModalResult="1"/>
<TfrxLabelControl Name="Label1" Left="104" Top="28" Width="84" Height="13" Alignment="taCenter" Caption="Hello FastReport!" Color="-2147483633"/>
<TfrxButtonControl Name="Button2" Left="148" Top="64" Width="75" Height="25" Caption="Cancel" ModalResult="2"/>
</TfrxDialogPage>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMemoView Name="Memo1" Left="75,5906" Top="37,7953" Width="566,9295" Height="37,7953" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" Memo.Text="THE REPORT" ParentFont="False"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,13 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" DotMatrixReport="False" EngineOptions.MaxMemSize="10000000" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37875,6208219213" ReportOptions.Description.Text="Demonstrates how to pass a parameter from dialog form to the report." ReportOptions.LastChange="38344,7227262268" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B0000844617461736574730100095661726961626C65730100055374796C650100">
<TfrxDialogPage Name="DialogPage1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" BorderStyle="bsDialog" Height="139" Left="265" Top="150" Width="300">
<TfrxButtonControl Name="Button1" Left="68" Top="64" Width="75" Height="25" Caption="OK" ModalResult="1"/>
<TfrxButtonControl Name="Button2" Left="148" Top="64" Width="75" Height="25" Caption="Cancel" ModalResult="2"/>
<TfrxLabelControl Name="Label1" Left="12" Top="12" Width="95" Height="13" Caption="Print any text here:" Color="-2147483633"/>
<TfrxEditControl Name="Edit1" Left="112" Top="8" Width="169" Height="21" Color="-2147483643" MaxLength="0" PasswordChar="0" Text=" "/>
<TfrxLabelControl Name="Label2" Left="112" Top="32" Width="170" Height="13" Caption="it will be displayed in the report title" Color="-2147483633"/>
</TfrxDialogPage>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMemoView Name="Memo1" Left="75,5906" Top="37,7953" Width="566,9295" Height="45,35436" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" Memo.Text="The text you've entered:&#13;&#10;[Edit1.Text]" ParentFont="False"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,14 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" EngineOptions.MaxMemSize="10000000" IniFile="\Software\FastReport" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37875,6208219213" ReportOptions.Description.Text="Demonstrates simple script that enables or disables some controls depending on state of another controls." ReportOptions.LastChange="38013,7146677083" ScriptLanguage="PascalScript" ScriptText.Text="procedure CheckBox1OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; Edit1.Enabled := CheckBox1.Checked;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure CheckBox2OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; Edit2.Enabled := CheckBox2.Checked;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B0000844617461736574730E00095661726961626C65730E00055374796C650E00">
<TfrxDialogPage Name="DialogPage1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Height="165" Left="265" Top="150" Width="300">
<TfrxButtonControl Name="Button1" Left="68" Top="96" Width="75" Height="25" Caption="OK" ModalResult="1"/>
<TfrxButtonControl Name="Button2" Left="148" Top="96" Width="75" Height="25" Caption="Cancel" ModalResult="2"/>
<TfrxCheckBoxControl Name="CheckBox1" Left="8" Top="12" Width="97" Height="17" Alignment="taRightJustify" Caption="Enable Edit1" Checked="True" OnClick="CheckBox1OnClick"/>
<TfrxCheckBoxControl Name="CheckBox2" Left="8" Top="48" Width="97" Height="17" Alignment="taRightJustify" Caption="Enable Edit2" Checked="True" OnClick="CheckBox2OnClick"/>
<TfrxEditControl Name="Edit1" Left="120" Top="12" Width="121" Height="21" Color="-2147483643" MaxLength="0" PasswordChar="0" Text="Edit1"/>
<TfrxEditControl Name="Edit2" Left="120" Top="48" Width="121" Height="21" Color="-2147483643" MaxLength="0" PasswordChar="0" Text="Edit2"/>
</TfrxDialogPage>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMemoView Name="Memo1" Left="75,5906" Top="37,7953" Width="566,9295" Height="37,7953" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" Memo.Text="THE REPORT" ParentFont="False"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,31 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="3.23" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="Demonstrates how to create simple list report." ReportOptions.LastChange="38965,5327842824" ScriptLanguage="PascalScript" ScriptText.Text="procedure DialogPage1OnShow(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; BDETable1.Open;&#13;&#10; while not BDETable1.EOF do&#13;&#10; begin&#13;&#10; CheckListBox1.Items.Add(BDETable1.FieldByName('Company').AsString);&#13;&#10; BDETable1.Next;&#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band4OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if CheckListBox1.Checked[&#60;Line#&#62; - 1] then&#13;&#10; Band4.Visible := True else&#13;&#10; Band4.Visible := False;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3500000020446174615365743D224244455461626C65312220446174615365744E616D653D22496E7465726E616C20437573746F6D657273220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxReportTitle Name="Band1" Height="28" Left="0" Top="16" Width="755,906">
<TfrxMemoView Name="Memo1" Align="baWidth" Left="0" Top="4" Width="755,906" Height="20" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaBottom" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band2" Height="32" Left="0" Top="64" Width="755,906">
<TfrxMemoView Name="Memo3" Left="6" Top="8" Width="194" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Company"/>
<TfrxMemoView Name="Memo4" Left="207" Top="8" Width="163" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Address"/>
<TfrxMemoView Name="Memo5" Left="378" Top="8" Width="127" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Contact"/>
<TfrxMemoView Name="Memo6" Left="512" Top="8" Width="89" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Phone"/>
<TfrxMemoView Name="Memo7" Left="609" Top="8" Width="101" Height="20" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Fax"/>
</TfrxPageHeader>
<TfrxPageFooter Name="Band3" Height="28" Left="0" Top="156" Width="755,906">
<TfrxMemoView Name="Memo2" Left="6" Top="8" Width="704" Height="16" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="Page [Page#] of [TotalPages#]"/>
</TfrxPageFooter>
<TfrxMasterData Name="Band4" Height="20" Left="0" Top="116" Width="755,906" OnBeforePrint="Band4OnBeforePrint" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="BDETable1" DataSetName="Internal Customers" RowCount="0">
<TfrxMemoView Name="Memo8" Left="6" Top="0" Width="194" Height="20" DataField="Company" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo9" Left="207" Top="0" Width="163" Height="20" DataField="Addr1" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Addr1&#34;]"/>
<TfrxMemoView Name="Memo10" Left="378" Top="0" Width="127" Height="20" DataField="Contact" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Contact&#34;]"/>
<TfrxMemoView Name="Memo11" Left="512" Top="0" Width="89" Height="20" DataField="Phone" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo12" Left="609" Top="0" Width="101" Height="20" DataField="FAX" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;FAX&#34;]"/>
</TfrxMasterData>
</TfrxReportPage>
<TfrxDialogPage Name="DialogPage1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" BorderStyle="bsDialog" Caption="Choose records to print" Height="417" Left="265" Top="150" Width="306" OnShow="DialogPage1OnShow">
<TfrxADOTable Name="BDETable1" UserName="Internal Customers" CloseDataSource="True" FieldAliases.Text="" TableName="customer" IndexName="ByCompany" IndexFieldNames="Company"/>
<TfrxCheckListBoxControl Name="CheckListBox1" Left="4" Top="8" Width="193" Height="377" Color="-2147483643" Items.Text=""/>
<TfrxBitBtnControl Name="BitBtn1" Left="212" Top="16" Width="75" Height="25" Glyph.PropData="04446174610AE2010000DE010000424DDE01000000000000760000002800000024000000120000000100040000000000680100000000000000000000100000000000000000000000000080000080000000808000800000008000800080800000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333333333333333333333333333333333330000333333333333333333333333F3333333333300003333344333333333333333388F3333333333000033334224333333333333338338F3333333330000333422224333333333333833338F3333333300003342222224333333333383333338F3333333000034222A22224333333338F338F3338F33333300003222A3A2224333333338F3838F338F33333300003A2A333A222433333338F83338F338F33333000033A33333A222433333338333338F338F33330000333333333A222433333333333338F338F33300003333333333A222433333333333338F338F33000033333333333A222433333333333338F338F30000333333333333A222433333333333338F338F00003333333333333A224333333333333338F38F000033333333333333A223333333333333338F830000333333333333333A3333333333333333383300003333333333333333333333333333333333330000" Kind="bkOK" Caption="OK" ModalResult="1" NumGlyphs="2"/>
<TfrxBitBtnControl Name="BitBtn2" Left="212" Top="48" Width="75" Height="25" Glyph.PropData="04446174610AE2010000DE010000424DDE01000000000000760000002800000024000000120000000100040000000000680100000000000000000000100000000000000000000000000080000080000000808000800000008000800080800000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333333333333333333333333333000033338833333333333333333F3333333333330000333911833333983333333388F333333F333300003339111833391183333338F38F333F88F33300003339111183911118333338F338F3F8338F3300003333911118111118333338F3338F833338F3000033333911111111833333338F33383333F8330000333333911111183333333338F333333F833300003333333111118333333333338F3333383333000033333339111183333333333338F33383333300003333339111118333333333333833338F333300003333391118111833333333338333338F333300003333911183911183333333383338F338F333000033339118333911183333338F33838F338F33000033333913333391113333338FF83338F338F300003333333333333919333333388333338FFF83000033333333333333333333333333333338883300003333333333333333333333333333333333330000" Kind="bkCancel" Caption="Cancel" ModalResult="2" NumGlyphs="2"/>
</TfrxDialogPage>
</TfrxReport>

View File

@ -0,0 +1,52 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.0a" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.DoubleBuffered="False" PreviewOptions.Zoom="1" PrintOptions.PagesOnSheet="0" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9959574884" ReportOptions.Description.Text="This report demonstrates how to show group total in the group header. The report is two-pass report. On first pass the group totals are accumulated in the variables, on final pass they are printed in the group header." ReportOptions.LastChange="38989,6231235532" ScriptLanguage="PascalScript" ScriptText.Text="procedure Band7OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; Set(&#60;Sales.&#34;Company&#34;&#62;, Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;));&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo4OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; Memo4.Text := 'Sum: ' + Format('%2.2m',[Get(&#60;Sales.&#34;Company&#34;&#62;)]);&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403AC0003546F7003780108446174617365747301010C3100000020446174615365743D225265706F7274446174612E517565727944532220446174615365744E616D653D2253616C6573220000095661726961626C65730100055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxPageFooter Name="Band1" Height="22,67718" Left="0" Top="457,32313" Width="755,906">
<TfrxMemoView Name="Memo5" Left="3,77953" Top="3,77953000000002" Width="710,55164" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="[Page#]"/>
</TfrxPageFooter>
<TfrxReportTitle Name="Band2" Height="26,45671" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo6" Left="3,77953" Top="3,77953" Width="710,55164" Height="18,89765" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band3" Height="22,67718" Left="0" Top="68,03154" Width="755,906" PrintOnFirstPage="False">
<TfrxMemoView Name="Memo16" Left="3,77953" Top="3,77952999999999" Width="710,55164" Height="15,11812" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="4" Frame.Width="2" ParentFont="False" Text=""/>
</TfrxPageHeader>
<TfrxGroupHeader Name="Band4" Height="45,35436" Left="0" Top="151,1812" Width="755,906" Condition="Sales.&#34;Cust No&#34;">
<TfrxMemoView Name="Memo17" Left="3,77953" Top="0" Width="272,12616" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="5" GapX="6" ParentFont="False" VAlign="vaCenter" Text="Company"/>
<TfrxMemoView Name="Memo19" Left="275,90569" Top="0" Width="177,63791" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Phone"/>
<TfrxMemoView Name="Memo20" Left="453,5436" Top="0" Width="139,84261" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" ParentFont="False" VAlign="vaCenter" Text="Fax"/>
<TfrxMemoView Name="Memo21" Left="275,90569" Top="18,89765" Width="177,63791" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo22" Left="453,5436" Top="18,89765" Width="260,78757" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;FAX&#34;]"/>
<TfrxMemoView Name="Memo18" Left="3,77953" Top="18,89765" Width="272,12616" Height="26,45671" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-19" Font.Name="Arial" Font.Style="2" Frame.Color="12632256" Frame.Typ="1" GapX="6" ParentFont="False" VAlign="vaCenter" Text="[Sales.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo4" Left="593,38621" Top="0" Width="120,94496" Height="18,89765" OnBeforePrint="Memo4OnBeforePrint" Color="128" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="6" ParentFont="False" VAlign="vaCenter" Text="Sum:"/>
</TfrxGroupHeader>
<TfrxGroupHeader Name="Band5" Height="37,7953" Left="0" Top="219,21274" Width="755,906" Condition="Sales.&#34;Order No&#34;">
<TfrxMemoView Name="Memo3" Left="3,77953" Top="18,89765" Width="52,91342" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo8" Left="3,77953" Top="0" Width="124,72449" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="1" GapX="4" Text="Order No [Sales.&#34;Order No&#34;]"/>
<TfrxMemoView Name="Memo9" Left="128,50402" Top="0" Width="585,82715" Height="18,89765" Color="12632256" Frame.Color="12632256" Frame.Typ="2" Text="Date [Sales.&#34;Sale Date&#34;]"/>
<TfrxMemoView Name="Memo10" Left="56,69295" Top="18,89765" Width="71,81107" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Part"/>
<TfrxMemoView Name="Memo11" Left="128,50402" Top="18,89765" Width="279,68522" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Description"/>
<TfrxMemoView Name="Memo12" Left="408,18924" Top="18,89765" Width="83,14966" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Price"/>
<TfrxMemoView Name="Memo13" Left="491,3389" Top="18,89765" Width="60,47248" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Qty"/>
<TfrxMemoView Name="Memo14" Left="551,81138" Top="18,89765" Width="90,70872" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="Total"/>
<TfrxMemoView Name="Memo31" Left="642,5201" Top="18,89765" Width="71,81107" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupHeader>
<TfrxMasterData Name="Band6" Height="18,89765" Left="0" Top="279,68522" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.QueryDS" DataSetName="Sales" RowCount="0">
<TfrxMemoView Name="Memo2" Left="3,77953" Top="0" Width="52,91342" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo23" Left="56,69295" Top="0" Width="71,81107" Height="18,89765" DataField="Part No" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Part No&#34;]"/>
<TfrxMemoView Name="Memo24" Left="128,50402" Top="0" Width="279,68522" Height="18,89765" DataField="Description" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" ParentFont="False" Text="[Sales.&#34;Description&#34;]"/>
<TfrxMemoView Name="Memo25" Left="408,18924" Top="0" Width="83,14966" Height="18,89765" DataField="List Price" DataSet="ReportData.QueryDS" DataSetName="Sales" DisplayFormat.FormatStr="%2.2m" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[Sales.&#34;List Price&#34;]"/>
<TfrxMemoView Name="Memo26" Left="491,3389" Top="0" Width="60,47248" Height="18,89765" DataField="Qty" DataSet="ReportData.QueryDS" DataSetName="Sales" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haCenter" ParentFont="False" Text="[Sales.&#34;Qty&#34;]"/>
<TfrxMemoView Name="Memo27" Left="551,81138" Top="0" Width="90,70872" Height="18,89765" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" HAlign="haRight" ParentFont="False" Text="[&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;]"/>
<TfrxMemoView Name="Memo32" Left="642,5201" Top="0" Width="71,81107" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxMasterData>
<TfrxGroupFooter Name="Band7" Height="30,23624" Left="0" Top="366,61441" Width="755,906" OnBeforePrint="Band7OnBeforePrint">
<TfrxMemoView Name="Memo28" Left="3,77953" Top="0" Width="710,55164" Height="18,89765" Color="12632256" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Frame.Color="12632256" Frame.Typ="11" Text="Total sales this customer: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
</TfrxGroupFooter>
<TfrxGroupFooter Name="Band8" Height="22,67718" Left="0" Top="321,26005" Width="755,906">
<TfrxMemoView Name="Memo1" Left="3,77953" Top="0" Width="52,91342" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="1" ParentFont="False" Text=""/>
<TfrxMemoView Name="Memo15" Left="56,69295" Top="0" Width="585,82715" Height="22,67718" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Color="12632256" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="Total this order: [Sum(&#60;Sales.&#34;Qty&#34;&#62;*&#60;Sales.&#34;List Price&#34;&#62;)]"/>
<TfrxMemoView Name="Memo33" Left="642,5201" Top="0" Width="71,81107" Height="22,67718" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="12632256" Frame.Typ="2" ParentFont="False" Text=""/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,14 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,996337662" ReportOptions.Description.Text="Demonstrates how to create Master/Detail/Detail reports. Just put on the page one MasterData band and two DetailData bands and connect each of them to the appropriate dataset. Of course, you can create Master/Master, Master/Detail/Detail/Detail and other reports with the same way." ReportOptions.LastChange="38842,9283153009" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B0000844617461736574730100095661726961626C657301010C14000000204E616D653D22204465736372697074696F6E2200010C35010000204E616D653D224465736372697074696F6E222056616C75653D2244656D6F6E7374726174657320686F7720746F20637265617465204D61737465722F44657461696C2F44657461696C207265706F7274732E204A75737420707574206F6E207468652070616765206F6E65204D6173746572446174612062616E6420616E642074776F2044657461696C446174612062616E647320616E6420636F6E6E6563742065616368206F66207468656D20746F2074686520617070726F70726961746520646174617365742E204F6620636F757273652C20796F752063616E20637265617465204D61737465722F4D61737465722C204D61737465722F44657461696C2F44657461696C2F44657461696C20616E64206F74686572207265706F7274732077697468207468652073616D65207761792E220000055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" HGuides.Text="" VGuides.Text="">
<TfrxMasterData Name="Band2" Height="18,89765" Left="0" Top="18,89765" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" RowCount="5">
<TfrxMemoView Name="Memo2" Left="3,77953" Top="0" Width="710,55164" Height="18,89765" Color="128" Font.Charset="1" Font.Color="16777215" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="[LINE#]. master"/>
</TfrxMasterData>
<TfrxDetailData Name="Band4" Height="22,67718" Left="0" Top="71,81107" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" RowCount="6">
<TfrxMemoView Name="Memo4" Left="3,77953" Top="0" Width="245,66945" Height="18,89765" Color="13421772" Text="[LINE#]. detail1"/>
</TfrxDetailData>
<TfrxDetailData Name="Band5" Height="41,57483" Left="0" Top="128,50402" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" RowCount="4">
<TfrxMemoView Name="Memo5" Left="3,77953" Top="0" Width="245,66945" Height="37,7953" Color="15000804" Text="[LINE#]. detail2"/>
</TfrxDetailData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,27 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="Demonstrates how to create simple list report with an internal table." ReportOptions.LastChange="38843,0161078704" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3500000020446174615365743D224244455461626C65312220446174615365744E616D653D22496E7465726E616C20437573746F6D657273220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxReportTitle Name="Band1" Height="26,45671" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo1" Left="7,55906" Top="3,77953" Width="740,78788" Height="18,89765" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaBottom" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band2" Height="34,01577" Left="0" Top="79,37013" Width="755,906">
<TfrxMemoView Name="Memo3" Left="7,55906" Top="3,77952999999999" Width="192,75603" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Company"/>
<TfrxMemoView Name="Memo4" Left="207,87415" Top="3,77952999999999" Width="162,51979" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Address"/>
<TfrxMemoView Name="Memo5" Left="377,953" Top="3,77952999999999" Width="128,50402" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Contact"/>
<TfrxMemoView Name="Memo6" Left="514,01608" Top="3,77952999999999" Width="90,70872" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Phone"/>
<TfrxMemoView Name="Memo7" Left="612,28386" Top="3,77952999999999" Width="102,04731" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Fax"/>
</TfrxPageHeader>
<TfrxPageFooter Name="Band3" Height="26,45671" Left="0" Top="279,68522" Width="755,906">
<TfrxMemoView Name="Memo2" Left="7,55906" Top="7,55905999999999" Width="702,99258" Height="15,11812" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="Page [Page#] of [TotalPages#]"/>
</TfrxPageFooter>
<TfrxMasterData Name="Band4" Height="22,67718" Left="0" Top="185,19697" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="BDETable1" DataSetName="Internal Customers" RowCount="0">
<TfrxMemoView Name="Memo13" Left="3,77953" Top="0" Width="710,55164" Height="18,89765" DataSet="BDETable1" DataSetName="Internal Customers" Highlight.Font.Charset="1" Highlight.Font.Color="-370606080" Highlight.Font.Height="-13" Highlight.Font.Name="Arial" Highlight.Font.Style="0" Highlight.Color="15790320" Highlight.Condition="&#60;Line#&#62; mod 2" WordWrap="False" Text=""/>
<TfrxMemoView Name="Memo8" Left="7,55906" Top="0" Width="200,31509" Height="18,89765" DataField="Company" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo9" Left="207,87415" Top="0" Width="170,07885" Height="18,89765" DataField="Addr1" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Addr1&#34;]"/>
<TfrxMemoView Name="Memo10" Left="377,953" Top="0" Width="136,06308" Height="18,89765" DataField="Contact" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Contact&#34;]"/>
<TfrxMemoView Name="Memo11" Left="514,01608" Top="0" Width="98,26778" Height="18,89765" DataField="Phone" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo12" Left="612,28386" Top="0" Width="94,48825" Height="18,89765" DataField="FAX" DataSet="BDETable1" DataSetName="Internal Customers" Text="[Internal Customers.&#34;FAX&#34;]"/>
</TfrxMasterData>
<TfrxADOTable Name="BDETable1" UserName="Internal Customers" CloseDataSource="True" FieldAliases.Text="CustNo=Cust No&#13;&#10;Company=Company&#13;&#10;Addr1=Addr1&#13;&#10;Addr2=Addr2&#13;&#10;City=City&#13;&#10;State=State&#13;&#10;Zip=Zip&#13;&#10;Country=Country&#13;&#10;Phone=Phone&#13;&#10;FAX=FAX&#13;&#10;TaxRate=Tax Rate&#13;&#10;Contact=Contact&#13;&#10;LastInvoiceDate=Last Invoice Date" TableName="customer" IndexName="ByCompany" IndexFieldNames="Company"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,34 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="Demonstrates how to create simple list report with an internal query." ReportOptions.LastChange="38843,0164901273" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3100000020446174615365743D224244455175657279312220446174615365744E616D653D22496E7465726E616C207175657279220000095661726961626C65730100055374796C650100">
<TfrxDialogPage Name="DialogPage1" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" BorderStyle="bsDialog" Height="135" Left="265" Top="150" Width="251">
<TfrxADOQuery Name="BDEQuery1" UserName="Internal query" CloseDataSource="True" FieldAliases.Text="CustNo=Cust No&#13;&#10;Company=Company&#13;&#10;Addr1=Addr1&#13;&#10;Addr2=Addr2&#13;&#10;City=City&#13;&#10;State=State&#13;&#10;Zip=Zip&#13;&#10;Country=Country&#13;&#10;Phone=Phone&#13;&#10;FAX=FAX&#13;&#10;TaxRate=Tax Rate&#13;&#10;Contact=Contact&#13;&#10;LastInvoiceDate=Last Invoice Date" SQL.Text="select * from customer&#13;&#10;where custno &#62; :p1" CommandTimeout="30" PropData="0A506172616D657465727301010C35000000204E616D653D227031222044617461547970653D226674466C6F6174222045787072657373696F6E3D2245646974312E54657874220000"/>
<TfrxEditControl Name="Edit1" Left="172" Top="16" Width="49" Height="21" Color="-2147483643" MaxLength="0" PasswordChar="0" Text="2000"/>
<TfrxLabelControl Name="Label1" Left="8" Top="20" Width="146" Height="13" Caption="Select if CustNo greather than" Color="-2147483633"/>
<TfrxButtonControl Name="Button1" Left="44" Top="64" Width="75" Height="25" Caption="OK" ModalResult="1"/>
<TfrxButtonControl Name="Button2" Left="128" Top="64" Width="75" Height="25" Caption="Cancel" ModalResult="2"/>
</TfrxDialogPage>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5" RightMargin="5" TopMargin="5" BottomMargin="5" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxReportTitle Name="Band1" Height="30,23624" Left="0" Top="18,89765" Width="755,906">
<TfrxMemoView Name="Memo1" Align="baWidth" Left="0" Top="3,77953" Width="755,906" Height="22,67718" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageHeader Name="Band2" Height="30,23624" Left="0" Top="83,14966" Width="755,906">
<TfrxMemoView Name="Memo3" Left="64,25201" Top="7,55906" Width="192,75603" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Company"/>
<TfrxMemoView Name="Memo4" Left="260,78757" Top="7,55906" Width="162,51979" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Address"/>
<TfrxMemoView Name="Memo5" Left="427,08689" Top="7,55906" Width="124,72449" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Contact"/>
<TfrxMemoView Name="Memo6" Left="555,59091" Top="7,55906" Width="90,70872" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Phone"/>
<TfrxMemoView Name="Memo7" Left="650,07916" Top="7,55906" Width="105,82684" Height="18,89765" Color="16777215" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="Fax"/>
<TfrxMemoView Name="Memo13" Left="0" Top="7,55906" Width="60,47248" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="8" ParentFont="False" Text="CustNo"/>
</TfrxPageHeader>
<TfrxPageFooter Name="Band3" Height="26,45671" Left="0" Top="275,90569" Width="755,906">
<TfrxMemoView Name="Memo2" Left="0" Top="7,55905999999999" Width="755,906" Height="15,11812" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="Page [Page#] of [TotalPages#]"/>
</TfrxPageFooter>
<TfrxMasterData Name="Band4" Height="18,89765" Left="0" Top="185,19697" Width="755,906" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="BDEQuery1" DataSetName="Internal query" RowCount="0">
<TfrxMemoView Name="Memo8" Left="64,25201" Top="0" Width="196,53556" Height="18,89765" DataField="Company" DataSet="BDEQuery1" DataSetName="Internal query" Text="[Internal query.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo9" Left="260,78757" Top="0" Width="166,29932" Height="18,89765" DataField="Addr1" DataSet="BDEQuery1" DataSetName="Internal query" Text="[Internal query.&#34;Addr1&#34;]"/>
<TfrxMemoView Name="Memo10" Left="427,08689" Top="0" Width="128,50402" Height="18,89765" DataField="Contact" DataSet="BDEQuery1" DataSetName="Internal query" Text="[Internal query.&#34;Contact&#34;]"/>
<TfrxMemoView Name="Memo11" Left="555,59091" Top="0" Width="94,48825" Height="18,89765" DataField="Phone" DataSet="BDEQuery1" DataSetName="Internal query" Text="[Internal query.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo12" Left="650,07916" Top="0" Width="105,82684" Height="18,89765" DataField="FAX" DataSet="BDEQuery1" DataSetName="Internal query" Text="[Internal query.&#34;FAX&#34;]"/>
<TfrxMemoView Name="Memo14" Left="0" Top="0" Width="64,25201" Height="18,89765" DataField="Cust No" DataSet="BDEQuery1" DataSetName="Internal query" HAlign="haCenter" Text="[Internal query.&#34;Cust No&#34;]"/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,24 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9964986574" ReportOptions.Description.Text="Demonstrates how to create simple report with columns. Just set number of columns in page options." ReportOptions.LastChange="38842,9317989005" ScriptLanguage="PascalScript" ScriptText.Text="begin&#13;&#10;&#13;&#10;end." PropData="044C65667403880003546F7003B00008446174617365747301010C3900000020446174615365743D225265706F7274446174612E437573746F6D65727344532220446174615365744E616D653D22437573746F6D657273220000095661726961626C65730100055374796C650100">
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="5,08" RightMargin="5,08" TopMargin="5,08" BottomMargin="5,08" Columns="2" ColumnWidth="100,076" ColumnPositions.Text="0&#13;&#10;100,08" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxReportTitle Name="Band1" Height="26,45671" Left="0" Top="18,89765" Width="755,3012752">
<TfrxMemoView Name="Memo1" Left="0" Top="0" Width="737,00835" Height="22,67718" Color="8421504" Font.Charset="1" Font.Color="16777215" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Customers"/>
</TfrxReportTitle>
<TfrxPageFooter Name="Band2" Height="31,77953" Left="0" Top="328,81911" Width="755,3012752">
<TfrxMemoView Name="Memo2" Left="0" Top="8" Width="712" Height="16" Color="16777215" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="4" Frame.Width="2" HAlign="haRight" ParentFont="False" Text="Page [PAGE#] of [TOTALPAGES#]"/>
</TfrxPageFooter>
<TfrxMasterData Name="Band3" Height="139,84261" Left="0" Top="117,16543" Width="755,3012752" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="ReportData.CustomersDS" DataSetName="Customers" RowCount="0">
<TfrxMemoView Name="Memo3" Left="0" Top="22,67718" Width="132,28355" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="Company"/>
<TfrxMemoView Name="Memo4" Left="0" Top="41,57483" Width="132,28355" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="Address"/>
<TfrxMemoView Name="Memo5" Left="0" Top="60,47248" Width="132,28355" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="Contact"/>
<TfrxMemoView Name="Memo6" Left="0" Top="79,37013" Width="132,28355" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="Phone"/>
<TfrxMemoView Name="Memo7" Left="0" Top="98,26778" Width="132,28355" Height="18,89765" Font.Charset="1" Font.Color="128" Font.Height="-13" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="Fax"/>
<TfrxMemoView Name="Memo8" Left="132,28355" Top="22,67718" Width="196,53556" Height="18,89765" Color="15790320" DataField="Company" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Company&#34;]"/>
<TfrxMemoView Name="Memo9" Left="132,28355" Top="41,57483" Width="196,53556" Height="18,89765" Color="15790320" DataField="Addr1" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Addr1&#34;]"/>
<TfrxMemoView Name="Memo10" Left="132,28355" Top="60,47248" Width="196,53556" Height="18,89765" Color="15790320" DataField="Contact" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Contact&#34;]"/>
<TfrxMemoView Name="Memo11" Left="132,28355" Top="79,37013" Width="196,53556" Height="18,89765" Color="15790320" DataField="Phone" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;Phone&#34;]"/>
<TfrxMemoView Name="Memo12" Left="132,28355" Top="98,26778" Width="196,53556" Height="18,89765" Color="15790320" DataField="FAX" DataSet="ReportData.CustomersDS" DataSetName="Customers" Text="[Customers.&#34;FAX&#34;]"/>
<TfrxMemoView Name="Memo13" Left="0" Top="3,77952999999999" Width="132,28355" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Color="15790320" Frame.Typ="8" ParentFont="False" Text="[LINE]."/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

Some files were not shown because too many files have changed in this diff Show More