Rosi Components

Units

Class Hierarchy

Classes, Interfaces, Objects and Records

Types

Variables

Constants

Functions and Procedures

Identifiers

Unit rXMLReport

Description
Uses
Classes, Interfaces, Objects and Records
Functions and Procedures
Types
Constants
Variables

Description

rXMLReport unit contains TrXMLReport - non visual component which provides functionality for generating reports according prepared DOCX or ODT template with special TAGs; it uses this template and fill data into it instead of TAGs; DOCX or ODT template can be modified easily by any editor (MS Word, OpenOffice, Google docs).

See homepage http://www.rosinsky.cz/delphi/ for detail help.

Updated version compatible with Delphi2010+ and 64bit platform. Splash screen in demo version.

Overview

Classes, Interfaces, Objects and Records

Name Description
Class TCalcField Object contain calculated value for each field
Class TrXMLReport rXMLReport is non visual component which provides functionality for generating reports according prepared DOCX or ODT template with special TAGs

Types

TTemplateFormat = (...);
TRtfSupportedFormat = (...);
TRtfSupportedFormats = set of TRtfSupportedFormat;
TXMLTextFormat = (...);
TXMLTextFormats = set of TXMLTextFormat;
TReportProcessEvent = procedure(Sender: TObject; RecNbr: integer; var Abort: boolean) of object;
TUserCalc = procedure(Sender: TObject; var CalcStr: string; var Replace: boolean) of object;
TUserCalcParams = procedure(Sender: TObject; FuncName: string; Params: array of variant; var FuncResult: variant; var Replace: boolean) of object;
TOnGetPictureContent = procedure(Sender: TObject; FuncName: string; Bmp: TBitmap) of object;
TModifyContent = procedure(Sender: TObject; FileName: string; var Content: string) of object;
TGetRowHeight = procedure(Sender: TObject; ID: string; RowIndex: integer; var RowHeightMM: integer) of object;
TGetColumnWidth = procedure(Sender: TObject; ID: string; Field: TField; ColIndex: integer; var ColWidthMM: integer; var AbsoluteWidth: boolean) of object;
TGetCellParams = procedure(Sender: TObject; ID: string; Field: TField; RowIndex, ColIndex: integer; var Text: string; var TableCellFormatRec: TTableCellFormatRec) of object;

Constants

maxDS = 25;
cDOCXBold = '<w:b/>';
cDOCXItalic = '<w:i/>';
cDOCXUnderline = '<w:u w:val="single"/>';
cDOCXStrikeOut = '<w:strike/>';
cInlineFormatConvert = '###convert###';

Description

Types

TTemplateFormat = (...);

Defines default template format

Values
  • tfAutoDetect
  • tfDOCX
  • tfODT
  • tfXML
TRtfSupportedFormat = (...);

list of supported RTF format types

Values
  • rtfFontName
  • rtfFontSize
  • rtfBold
  • rtfItalic
  • rtfUnderline
  • rtfUnderlineDouble
  • rtfStrike
  • rtfStrikeDouble
TRtfSupportedFormats = set of TRtfSupportedFormat;

set of supported RTF format types

TXMLTextFormat = (...);

list of XML text format types

Values
  • frmBold
  • frmItalic
  • frmUnderline
TXMLTextFormats = set of TXMLTextFormat;

set of XML text format types

TReportProcessEvent = procedure(Sender: TObject; RecNbr: integer; var Abort: boolean) of object;

event type called for each record during reporting

TUserCalc = procedure(Sender: TObject; var CalcStr: string; var Replace: boolean) of object;

event type called to get calculated string result

TUserCalcParams = procedure(Sender: TObject; FuncName: string; Params: array of variant; var FuncResult: variant; var Replace: boolean) of object;

event type called to get calculated string result, supports function parameters

TOnGetPictureContent = procedure(Sender: TObject; FuncName: string; Bmp: TBitmap) of object;

event type called to get bitmap content for Picture tag

TModifyContent = procedure(Sender: TObject; FileName: string; var Content: string) of object;

event type called to modify file content

TGetRowHeight = procedure(Sender: TObject; ID: string; RowIndex: integer; var RowHeightMM: integer) of object;

event type called to get row height for named tables

TGetColumnWidth = procedure(Sender: TObject; ID: string; Field: TField; ColIndex: integer; var ColWidthMM: integer; var AbsoluteWidth: boolean) of object;

event type called to get column width for named tables

TGetCellParams = procedure(Sender: TObject; ID: string; Field: TField; RowIndex, ColIndex: integer; var Text: string; var TableCellFormatRec: TTableCellFormatRec) of object;

event type called to get cell parameters for named tables

Constants

maxDS = 25;
 
cDOCXBold = '<w:b/>';
 
cDOCXItalic = '<w:i/>';
 
cDOCXUnderline = '<w:u w:val="single"/>';
 
cDOCXStrikeOut = '<w:strike/>';
 
cInlineFormatConvert = '###convert###';
 

Author

Created

Oct 2014

Last Modified

Dec 2021

Generated by PasDoc 0.15.0.