NO HAY CÓDIGO FUENTE git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.TRichView@1 b34d35ef-135b-4489-b9d1-9916e9c25524
193 lines
6.6 KiB
C++
193 lines
6.6 KiB
C++
// Borland C++ Builder
|
|
// Copyright (c) 1995, 2005 by Borland Software Corporation
|
|
// All rights reserved
|
|
|
|
// (DO NOT EDIT: machine generated header) 'Rvreport.pas' rev: 10.00
|
|
|
|
#ifndef RvreportHPP
|
|
#define RvreportHPP
|
|
|
|
#pragma delphiheader begin
|
|
#pragma option push
|
|
#pragma option -w- // All warnings off
|
|
#pragma option -Vx // Zero-length empty class member functions
|
|
#pragma pack(push,8)
|
|
#include <System.hpp> // Pascal unit
|
|
#include <Sysinit.hpp> // Pascal unit
|
|
#include <Windows.hpp> // Pascal unit
|
|
#include <Graphics.hpp> // Pascal unit
|
|
#include <Classes.hpp> // Pascal unit
|
|
#include <Rvstyle.hpp> // Pascal unit
|
|
#include <Rvclasses.hpp> // Pascal unit
|
|
#include <Rvitem.hpp> // Pascal unit
|
|
#include <Rvscroll.hpp> // Pascal unit
|
|
#include <Crvdata.hpp> // Pascal unit
|
|
#include <Crvfdata.hpp> // Pascal unit
|
|
#include <Rvrvdata.hpp> // Pascal unit
|
|
#include <Richview.hpp> // Pascal unit
|
|
#include <Ptrvdata.hpp> // Pascal unit
|
|
#include <Ptblrv.hpp> // Pascal unit
|
|
#include <Rvfuncs.hpp> // Pascal unit
|
|
#include <Rvctrldata.hpp> // Pascal unit
|
|
#include <Controls.hpp> // Pascal unit
|
|
#include <Rvrtfprops.hpp> // Pascal unit
|
|
|
|
//-- user supplied -----------------------------------------------------------
|
|
|
|
namespace Rvreport
|
|
{
|
|
//-- type declarations -------------------------------------------------------
|
|
class DELPHICLASS TRVReportHelper;
|
|
typedef void __fastcall (__closure *TRVDrawHyperlinkEvent)(TRVReportHelper* Sender, Crvdata::TCustomRVData* RVData, int ItemNo, const Types::TRect &R);
|
|
|
|
typedef void __fastcall (__closure *TRVDrawCheckpointEvent)(TRVReportHelper* Sender, Crvdata::TCustomRVData* RVData, int ItemNo, int X, int Y);
|
|
|
|
class DELPHICLASS TReportRVData;
|
|
class PASCALIMPLEMENTATION TReportRVData : public Ptrvdata::TCustomMainPtblRVData
|
|
{
|
|
typedef Ptrvdata::TCustomMainPtblRVData inherited;
|
|
|
|
private:
|
|
int StartY;
|
|
int StartAt;
|
|
int Y;
|
|
int DrawItemNo;
|
|
int CurHeight;
|
|
bool Splitting;
|
|
void __fastcall StoreMargins(void);
|
|
void __fastcall RestoreMargins(void);
|
|
void __fastcall Init(Graphics::TCanvas* ACanvas, int APageWidth);
|
|
HIDESBASE bool __fastcall FormatNextPage(int AMaxHeight);
|
|
bool __fastcall Finished(void);
|
|
void __fastcall Reset(void);
|
|
|
|
protected:
|
|
DYNAMIC bool __fastcall ShareItems(void);
|
|
virtual void __fastcall DoOnHyperlink(Crvdata::TCustomRVData* RVData, int ItemNo, const Types::TRect &R);
|
|
virtual void __fastcall DoOnCheckpoint(Crvdata::TCustomRVData* RVData, int ItemNo, int X, int Y);
|
|
|
|
public:
|
|
virtual int __fastcall GetHeight(void);
|
|
DYNAMIC int __fastcall GetPageHeight(void);
|
|
DYNAMIC int __fastcall GetPageWidth(void);
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCustomMainPtblRVData.Create */ inline __fastcall virtual TReportRVData(Rvscroll::TRVScroller* RichView) : Ptrvdata::TCustomMainPtblRVData(RichView) { }
|
|
#pragma option pop
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCustomMultiPagePtblRVData.Destroy */ inline __fastcall virtual ~TReportRVData(void) { }
|
|
#pragma option pop
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TReportRichView;
|
|
class PASCALIMPLEMENTATION TReportRichView : public Ptblrv::TCustomPrintableRV
|
|
{
|
|
typedef Ptblrv::TCustomPrintableRV inherited;
|
|
|
|
private:
|
|
int __fastcall GetHeight(void);
|
|
int __fastcall GetWidth(void);
|
|
int __fastcall GetLeft(void);
|
|
int __fastcall GetTop(void);
|
|
|
|
protected:
|
|
virtual TMetaClass* __fastcall GetDataClass(void);
|
|
virtual void __fastcall SetBiDiModeRV(const Rvscroll::TRVBiDiMode Value);
|
|
|
|
public:
|
|
__fastcall virtual TReportRichView(Classes::TComponent* AOwner);
|
|
virtual bool __fastcall CanUseCustomPPI(void);
|
|
|
|
__published:
|
|
__property Color = {default=536870911};
|
|
__property BackgroundBitmap ;
|
|
__property BackgroundStyle ;
|
|
__property BiDiMode = {default=0};
|
|
__property BottomMargin = {default=5};
|
|
__property Delimiters ;
|
|
__property LeftMargin = {default=5};
|
|
__property Options = {default=326949};
|
|
__property RightMargin = {default=5};
|
|
__property RTFOptions = {default=14};
|
|
__property RTFReadProperties ;
|
|
__property RVFOptions = {default=98435};
|
|
__property RVFParaStylesReadMode = {default=2};
|
|
__property RVFTextStylesReadMode = {default=2};
|
|
__property Style ;
|
|
__property TopMargin = {default=5};
|
|
__property OnControlAction ;
|
|
__property OnHTMLSaveImage ;
|
|
__property OnRVFImageListNeeded ;
|
|
__property OnRVFControlNeeded ;
|
|
__property OnRVFPictureNeeded ;
|
|
__property OnSaveComponentToFile ;
|
|
__property OnURLNeeded ;
|
|
__property OnReadHyperlink ;
|
|
__property OnWriteHyperlink ;
|
|
__property int Width = {read=GetWidth, nodefault};
|
|
__property int Height = {read=GetHeight, nodefault};
|
|
__property int Left = {read=GetLeft, nodefault};
|
|
__property int Top = {read=GetTop, nodefault};
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCustomPrintableRV.Destroy */ inline __fastcall virtual ~TReportRichView(void) { }
|
|
#pragma option pop
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TWinControl.CreateParented */ inline __fastcall TReportRichView(HWND ParentWindow) : Ptblrv::TCustomPrintableRV(ParentWindow) { }
|
|
#pragma option pop
|
|
|
|
};
|
|
|
|
|
|
class PASCALIMPLEMENTATION TRVReportHelper : public Ptblrv::TCustomRVPrint
|
|
{
|
|
typedef Ptblrv::TCustomRVPrint inherited;
|
|
|
|
private:
|
|
TRVDrawHyperlinkEvent FOnDrawHyperlink;
|
|
TRVDrawCheckpointEvent FOnDrawCheckpoint;
|
|
TReportRichView* __fastcall GetRichView(void);
|
|
|
|
protected:
|
|
DYNAMIC Ptblrv::TCustomPrintableRV* __fastcall CreateRichView(void);
|
|
|
|
public:
|
|
__fastcall virtual TRVReportHelper(Classes::TComponent* AOwner);
|
|
void __fastcall Init(Graphics::TCanvas* ACanvas, int APageWidth);
|
|
bool __fastcall FormatNextPage(int AMaxHeight);
|
|
void __fastcall Reset(void);
|
|
void __fastcall DrawPage(int APageNo, Graphics::TCanvas* ACanvas, bool APreview, int AHeight);
|
|
void __fastcall DrawPageAt(int Left, int Top, int APageNo, Graphics::TCanvas* ACanvas, bool APreview, int AHeight);
|
|
bool __fastcall Finished(void);
|
|
int __fastcall GetLastPageHeight(void);
|
|
|
|
__published:
|
|
__property TReportRichView* RichView = {read=GetRichView};
|
|
__property ColorMode = {default=0};
|
|
__property TRVDrawHyperlinkEvent OnDrawHyperlink = {read=FOnDrawHyperlink, write=FOnDrawHyperlink};
|
|
__property TRVDrawCheckpointEvent OnDrawCheckpoint = {read=FOnDrawCheckpoint, write=FOnDrawCheckpoint};
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TComponent.Destroy */ inline __fastcall virtual ~TRVReportHelper(void) { }
|
|
#pragma option pop
|
|
|
|
};
|
|
|
|
|
|
//-- var, const, procedure ---------------------------------------------------
|
|
|
|
} /* namespace Rvreport */
|
|
using namespace Rvreport;
|
|
#pragma pack(pop)
|
|
#pragma option pop
|
|
|
|
#pragma delphiheader end.
|
|
//-- end unit ----------------------------------------------------------------
|
|
#endif // Rvreport
|