sctrep.hpp

suite component ace report

// Borland C++ Builder
// Copyright (c) 1995, 1999 by Borland International
// All rights reserved

// (DO NOT EDIT: machine generated header) 'SctRep.pas' rev: 4.00

#ifndef SctRepHPP
#define SctRepHPP

#pragma delphiheader begin
#pragma option push -w-
#include <Bde.hpp>	// Pascal unit
#include <DBTables.hpp>	// Pascal unit
#include <AceDS.hpp>	// Pascal unit
#include <Db.hpp>	// Pascal unit
#include <DsgnIntf.hpp>	// Pascal unit
#include <AceUtil.hpp>	// Pascal unit
#include <AcePage.hpp>	// Pascal unit
#include <AceFile.hpp>	// Pascal unit
#include <AceView.hpp>	// Pascal unit
#include <AceOut.hpp>	// Pascal unit
#include <SctUtil.hpp>	// Pascal unit
#include <SctRtf.hpp>	// Pascal unit
#include <PSetup.hpp>	// Pascal unit
#include <Buttons.hpp>	// Pascal unit
#include <CommDlg.hpp>	// Pascal unit
#include <Printers.hpp>	// Pascal unit
#include <SctCtrl.hpp>	// Pascal unit
#include <SctVar.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <StdCtrls.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <ExtCtrls.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Sctrep
{
//-- type declarations -------------------------------------------------------
typedef Messages::TWMNoParams  TSctUpdateForm;

typedef Messages::TWMNoParams  TSctSetDataLists;

typedef Messages::TWMNoParams  TSctCreatePage;

typedef Messages::TWMNoParams  TSctSelectGroupPage;

typedef Messages::TWMNoParams  TSctDataControl;

typedef Messages::TWMNoParams  TSctDataUpdateVars;

typedef Messages::TWMNoParams  TSctVarChanged;

typedef Messages::TWMNoParams  TGPUpdateVarList;

typedef Messages::TWMNoParams  TSctAddBands;

typedef Messages::TWMNoParams  TSctOverviewReport;

typedef Messages::TWMNoParams  TSctDiagReport;

#pragma pack(push, 4)
struct TWMSCTLABEL
{
	unsigned Msg;
	Word WParam;
	Sctctrl::TSctTextLabel* LB;
	Sctctrl::TSctTextLabel* LB2;
	int Result;
} ;
#pragma pack(pop)

typedef TWMSCTLABEL  TSctModifyLabel;

typedef Messages::TWMNoParams  TSctCopyReport;

#pragma option push -b-
enum SctRep__1 { psArrangeBands, psUpdateVarList, psInsertBand };
#pragma option pop

typedef Set<SctRep__1, psArrangeBands, psInsertBand>  TSctPageState;

#pragma option push -b-
enum TSctOutputType { otNormal, otRichText };
#pragma option pop

#pragma option push -b-
enum TSctStatus { ssBegin, ssEnd, ssPrinting, ssNoWhere, ssGenerating };
#pragma option pop

class DELPHICLASS TSctPage;
typedef void __fastcall (__closure *TSctOnUpdateStatus)(TSctPage* Page, TSctStatus Stat);

typedef void __fastcall (__closure *TSctDataFilterEvent)(System::TObject* Sender, bool &Result);

#pragma option push -b-
enum TSctDataRange { drAllRecords, drSingleRecord };
#pragma option pop

#pragma option push -b-
enum SctRep__2 { gpsPrintHead, gpsPrintPageHead, gpsPrintDetail, gpsPrintPageFoot, gpsPrintFoot, gpsPrintRepeats, 
	gpsPrintGroupHead, gpsPrintGroupFoot, gpsPrintOverLays };
#pragma option pop

typedef Set<SctRep__2, gpsPrintHead, gpsPrintOverLays>  TSctGroupPageState;

class DELPHICLASS TSctReport;
typedef void __fastcall (__closure *TSctReportPrintEvent)(TSctReport* Report);

class DELPHICLASS TSctBand;
typedef void __fastcall (__closure *TSctBandPrintEvent)(TSctBand* Band);

typedef void __fastcall (__closure *TSctPrintWhenEvent)(TSctBand* Band, bool &Result);

typedef void __fastcall (__closure *TSctPromptPrintEvent)(TSctPage* Page, bool &Result);

#pragma option push -b-
enum SctRep__3 { bsPrinting };
#pragma option pop

typedef Set<SctRep__3, bsPrinting, bsPrinting>  TSctBandState;

class DELPHICLASS TSctGrouppage;
typedef void __fastcall (__closure *TSctOnNewPage)(TSctGrouppage* Page, System::TObject* AceOutput, 
	int PageNum);

typedef void __fastcall (__closure *TSctPageAfterSkipEvent)(TSctGrouppage* Page);

typedef void __fastcall (__closure *TSctOnBeforeNewPage)(TSctPage* Page, bool &DoNewPage);

class DELPHICLASS TSctReserveSpace;
#pragma pack(push, 4)
class PASCALIMPLEMENTATION TSctReserveSpace : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	Extctrls::TCustomPanel* FBand;
	int FBandCount;
	int FSpace;
	
protected:
	int __fastcall GetReserve(void);
	
public:
	__fastcall virtual TSctReserveSpace(void);
	__fastcall virtual ~TSctReserveSpace(void);
	__property int Reserve = {read=GetReserve, nodefault};
	
__published:
	__property Extctrls::TCustomPanel* Band = {read=FBand, write=FBand};
	__property int BandCount = {read=FBandCount, write=FBandCount, default=1};
	__property int Space = {read=FSpace, write=FSpace, default=0};
};

#pragma pack(pop)

#pragma pack(push, 4)
class PASCALIMPLEMENTATION TSctBand : public Extctrls::TCustomPanel 
{
	typedef Extctrls::TCustomPanel inherited;
	
private:
	Classes::TList* FLabels;
	bool FVisible;
	bool FStretch;
	AnsiString FBandName;
	bool FAllowDelete;
	TSctPage* FPage;
	Sctvar::TSctLevel* FUpdateLevel;
	bool FEndPrint;
	bool FFirstPass;
	int FPixelsPerInch;
	TSctPrintWhenEvent FOnPrintWhen;
	int FListPos;
	bool FNewPage;
	bool FNewPageRepeat;
	TSctBandState FBandState;
	bool FContinued;
	Graphics::TBrush* FBrush;
	Graphics::TPen* FPen;
	Sctctrl::TSctBorderType FBorderType;
	TSctReserveSpace* FReserveSpace;
	TSctBandPrintEvent FOnBeforePrint;
	TSctBandPrintEvent FOnAfterPrint;
	int FOrder;
	TSctBand* FBand;
	bool FKeepTogether;
	bool FSaveNewPage;
	Aceout::TAceDestination FSaveOutputDest;
	Aceutil::TAceShadePercent FShade;
	void __fastcall PushDest(void);
	void __fastcall PopDest(void);
	HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Message);
	HIDESBASE MESSAGE void __fastcall WMMove(Messages::TWMMove &Message);
	MESSAGE void __fastcall ModifyLabel(TWMSCTLABEL &Message);
	void __fastcall BandDragOver(System::TObject* Sender, System::TObject* Source, int X, int Y, Controls::TDragState 
		State, bool &Accept);
	void __fastcall BandDragDrop(System::TObject* Sender, System::TObject* Source, int X, int Y);
	
protected:
	virtual void __fastcall SetParent(Controls::TWinControl* AParent);
	int __fastcall GetPrintHeight(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation
		);
	virtual void __fastcall Paint(void);
	virtual void __fastcall Loaded(void);
	int __fastcall getppi(void);
	bool __fastcall GetPrintOk(void);
	HIDESBASE virtual void __fastcall SetVisible(bool value);
	virtual void __fastcall SetStretch(bool value);
	virtual void __fastcall SetNewPage(bool value);
	virtual void __fastcall SetNewPageRepeat(bool value);
	virtual TSctBand* __fastcall GetMainBand(void);
	virtual void __fastcall SetBorderType(Sctctrl::TSctBorderType bt);
	void __fastcall BeforePrint(void);
	void __fastcall AfterPrint(void);
	MESSAGE void __fastcall MouseMovement(Messages::TWMMouse &Message);
	virtual void __fastcall WndProc(Messages::TMessage &Message);
	bool __fastcall DoOnPrintWhen(void);
	virtual void __fastcall SetOrder(int n);
	virtual void __fastcall SetName(const AnsiString NewName);
	void __fastcall SetBandName(const AnsiString NewName);
	virtual void __fastcall SetShade(Aceutil::TAceShadePercent ShadePercent);
	
public:
	__fastcall virtual TSctBand(Classes::TComponent* AOwner);
	__fastcall virtual ~TSctBand(void);
	void __fastcall InsertLabel(Sctctrl::TSctLabel* oLabel);
	void __fastcall RemoveLabel(Sctctrl::TSctLabel* oLabel);
	void __fastcall Print(TSctPage* oPage);
	virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
	void __fastcall SafeDelete(void);
	bool __fastcall GetAllowDelete(void);
	__property bool AllowDelete = {read=FAllowDelete, write=FAllowDelete, nodefault};
	__property bool OkDelete = {read=GetAllowDelete, nodefault};
	__property TSctPage* Page = {read=FPage, write=FPage};
	__property TSctBand* MainBand = {read=GetMainBand};
	__property Classes::TList* Labels = {read=FLabels, write=FLabels};
	__property bool EndPrint = {read=FEndPrint, write=FEndPrint, nodefault};
	__property bool FirstPass = {read=FFirstPass, write=FFirstPass, nodefault};
	void __fastcall StartPrint(void);
	void __fastcall FinishedPrint(void);
	virtual int __fastcall PrintHeight(TSctPage* oPage, int Space);
	__property bool PrintOk = {read=GetPrintOk, nodefault};
	__property TSctBandState BandState = {read=FBandState, write=FBandState, nodefault};
	__property bool Continued = {read=FContinued, write=FContinued, nodefault};
	int __fastcall SpendHeight(TSctPage* oPage, int Space);
	void __fastcall PrintRtf(TSctPage* oPage, Sctrtf::TSctRtfFile* rtf);
	__property Hint ;
	__property HelpContext ;
	__property Cursor ;
	__property OnClick ;
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDrag ;
	__property OnEnter ;
	__property OnExit ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnResize ;
	__property int PHeight = {read=GetPrintHeight, nodefault};
	__property int PixelsPerInch = {read=getppi, write=FPixelsPerInch, nodefault};
	__property int ListPos = {read=FListPos, write=FListPos, nodefault};
	__property Graphics::TBrush* Brush = {read=FBrush, write=FBrush};
	__property Graphics::TPen* Pen = {read=FPen, write=FPen};
	__property int Order = {read=FOrder, write=SetOrder, default=0};
	void __fastcall SetOrderDirect(int n);
	__property TSctBand* Band = {read=FBand, write=FBand};
	
__published:
	__property Color ;
	__property Font ;
	__property ParentColor ;
	__property ParentFont ;
	__property AnsiString BandName = {read=FBandName, write=SetBandName};
	__property TSctPrintWhenEvent OnPrintWhen = {read=FOnPrintWhen, write=FOnPrintWhen};
	__property Sctvar::TSctLevel* Updatelevel = {read=FUpdateLevel, write=FUpdateLevel};
	__property bool Visible = {read=FVisible, write=SetVisible, default=1};
	__property bool Stretch = {read=FStretch, write=SetStretch, default=0};
	__property bool NewPage = {read=FNewPage, write=SetNewPage, default=0};
	__property bool NewPageRepeat = {read=FNewPageRepeat, write=SetNewPageRepeat, default=0};
	__property Sctctrl::TSctBorderType BorderType = {read=FBorderType, write=SetBorderType, default=0};
		
	__property TSctReserveSpace* ReserveSpace = {read=FReserveSpace, write=FReserveSpace};
	__property bool KeepTogether = {read=FKeepTogether, write=FKeepTogether, default=0};
	__property TSctBandPrintEvent OnBeforePrint = {read=FOnBeforePrint, write=FOnBeforePrint};