⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 acefile.hpp

📁 suite component ace report
💻 HPP
📖 第 1 页 / 共 2 页
字号:
};

#pragma pack(pop)

#pragma option push -b-
enum TAceAceFileObjectTypes { aotNone, aotBrush, aotFont, aotPen };
#pragma option pop

class DELPHICLASS TAceAceFileObject;
#pragma pack(push, 4)
class PASCALIMPLEMENTATION TAceAceFileObject : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	TAceAceFileObjectTypes ObjectType;
	Graphics::TPen* Pen;
	Graphics::TBrush* Brush;
	Graphics::TFont* Font;
	unsigned SelectFont;
	unsigned SelectBrush;
	unsigned SelectPen;
	Acetypes::TAceLogPen LogPen;
	Acetypes::TAceLogBrush LogBrush;
	Acetypes::TAceLogFont LogFont;
	__fastcall virtual TAceAceFileObject(void);
	__fastcall virtual ~TAceAceFileObject(void);
	void __fastcall CreateObject(int PixelsPerInchY);
	void __fastcall DeleteObject(void);
	bool __fastcall FontSame(const Acetypes::TAceLogFont &lf);
	bool __fastcall PenSame(const Acetypes::TAceLogPen &lp);
	bool __fastcall BrushSame(const Acetypes::TAceLogBrush &lb);
	void __fastcall Write(Classes::TStream* Str);
	void __fastcall Read(Classes::TStream* Str);
};

#pragma pack(pop)

class DELPHICLASS TAceAceFile;
#pragma pack(push, 4)
class PASCALIMPLEMENTATION TAceAceFile : public TAceFile 
{
	typedef TAceFile inherited;
	
private:
	Classes::TList* FObjects;
	AnsiString FFileName;
	int FLastFont;
	int FLastPen;
	int FLastBrush;
	int FCurrFont;
	int FCurrPen;
	int FCurrBrush;
	bool FRunning;
	float FPercentDone;
	AnsiString FDescription;
	Classes::TStream* FUserStream;
	bool FCreateFile;
	Acesetup::TAcePrinterSetup* FAceStartPrinterSetup;
	
protected:
	int __fastcall GetPageWidth(void);
	int __fastcall GetPageHeight(void);
	int __fastcall GetPixelsPerInchX(void);
	void __fastcall SetPixelsPerInchX(int ppi);
	int __fastcall GetPixelsPerInchY(void);
	void __fastcall SetPixelsPerInchY(int ppi);
	void __fastcall SetUserStream(Classes::TStream* S);
	
public:
	Acetypes::TAceFileHeader AceFileHeader;
	Acetypes::TAceFileInfo AceFileInfo;
	Acetypes::TAceFilePrinterInfo AceFilePrinterInfo;
	__fastcall virtual TAceAceFile(void);
	__fastcall virtual ~TAceAceFile(void);
	__property float PercentDone = {read=FPercentDone, write=FPercentDone};
	__property int PageWidth = {read=GetPageWidth, nodefault};
	__property int PageHeight = {read=GetPageHeight, nodefault};
	__property int PixelsPerInchX = {read=GetPixelsPerInchX, write=SetPixelsPerInchX, nodefault};
	__property int PixelsPerInchY = {read=GetPixelsPerInchY, write=SetPixelsPerInchY, nodefault};
	__property AnsiString Description = {read=FDescription, write=FDescription};
	__property Classes::TStream* UserStream = {read=FUserStream, write=SetUserStream};
	virtual void __fastcall Clear(void);
	__property bool Running = {read=FRunning, write=FRunning, nodefault};
	__property bool CreateFile = {read=FCreateFile, write=FCreateFile, nodefault};
	bool __fastcall GetPagePrinterInfo(Acesetup::TAcePrinterSetup* APS, int Page);
	void __fastcall BeginDoc(void);
	void __fastcall EndDoc(void);
	void __fastcall NewPage(void);
	void __fastcall SetFont(Graphics::TFont* font);
	void __fastcall SetLogFont(Graphics::TFont* Font, const tagLOGFONTA &LogFont);
	void __fastcall SetPen(Graphics::TPen* pen);
	void __fastcall SetBrush(Graphics::TBrush* brush);
	void __fastcall SetTextAlign(Word flags);
	void __fastcall Textout(int x, int y, const AnsiString Text);
	void __fastcall MoveTo(int x, int y);
	void __fastcall LineTo(int x, int y);
	void __fastcall PTextout(int x, int y, char * Text, int Count);
	void __fastcall ExtTextout(int x, int y, Word Options, const Windows::TRect &Rect, char * Text, Word 
		Count);
	void __fastcall TextRect(const Windows::TRect &Rect, int x, int y, const AnsiString Text);
	void __fastcall FillRect(const Windows::TRect &Rect);
	void __fastcall Rectangle(int x1, int y1, int x2, int y2);
	void __fastcall RoundRect(int x1, int y1, int x2, int y2, int x3, int y3);
	void __fastcall Ellipse(int x1, int y1, int x2, int y2);
	void __fastcall Draw(int x, int y, Graphics::TGraphic* Graphic);
	void __fastcall StretchDraw(const Windows::TRect &Rect, Graphics::TGraphic* Graphic);
	void __fastcall DrawBitmap(int X, int Y, Classes::TStream* Stream);
	void __fastcall StretchDrawBitmap(const Windows::TRect &Rect, Classes::TStream* Stream);
	void __fastcall ShadeRect(const Windows::TRect &Rect, Aceutil::TAceShadePercent Shade);
	void __fastcall SetBkColor(int bkColor);
	void __fastcall TextJustify(const Windows::TRect &Rect, int x, int y, const AnsiString Text, bool EndParagraph
		, const Windows::TRect &FullRect);
	void __fastcall RtfDraw(const Windows::TRect &Rect, Classes::TStream* Stream, int StartPos, int EndPos
		, bool SetDefFont);
	void __fastcall DrawCheckBox(const Windows::TRect &Rect, Aceutil::TAceCheckStyle CheckStyle, Graphics::TColor 
		Color, int Thickness);
	void __fastcall DrawShapeType(Aceutil::TAceDrawType dt, int x1, int y1, int x2, int y2, int x3, int 
		y3, int x4, int y4);
	void __fastcall PolyDrawType(Aceutil::TAcePolyType pt, const Windows::TPoint * Points, const int Points_Size
		);
	void __fastcall Print3of9Barcode(int Left, int Top, int Width, int Height, int NarrowWidth, int WideWidth
		, bool Inches, bool Vertical, AnsiString BarData);
	void __fastcall Print2of5Barcode(int Left, int Top, int Width, int Height, int NarrowWidth, int WideWidth
		, bool Inches, bool Vertical, AnsiString BarData);
	void __fastcall WritePrinterInfo(const Acetypes::TAceFilePrinterInfo &pi);
	void __fastcall WriteType(Word RecType);
	void __fastcall WriteRect(const Windows::TRect &Rect);
	void __fastcall WriteWord(Word W);
	void __fastcall WriteSmallInt(short I);
	void __fastcall WriteLongInt(int LI);
	void __fastcall WriteString(AnsiString S);
	void __fastcall WritePChar(char * S, int Len);
	void __fastcall WriteStream(Classes::TStream* S);
	void __fastcall WriteBoolean(bool Value);
	void __fastcall ReadPrinterInfo(Acetypes::TAceFilePrinterInfo &pi);
	void __fastcall ReadType(Word &RecType);
	void __fastcall ReadRect(Windows::TRect &Rect);
	void __fastcall ReadWord(Word &W);
	void __fastcall ReadSmallInt(short &I);
	void __fastcall ReadLongInt(int &LI);
	void __fastcall ReadString(AnsiString &S);
	void __fastcall ReadPChar(char * &S, int Len);
	void __fastcall ReadStream(Classes::TStream* S);
	void __fastcall ReadBoolean(bool &Value);
	virtual void __fastcall LoadAceFile(TAceFile* AceFile);
	virtual void __fastcall LoadPage(TAceFile* AceFile, int Page);
	virtual void __fastcall LoadPages(TAceFile* AceFile, int StartPage, int EndPage);
	virtual void __fastcall Send(TAceFile* AceFile);
	virtual void __fastcall SendPage(TAceFile* AceFile, int Page);
	virtual void __fastcall SendPages(TAceFile* AceFile, int StartPage, int EndPage);
	virtual void __fastcall SaveToFile(AnsiString FileName);
	virtual void __fastcall SaveToStream(Classes::TStream* SaveStream);
	virtual void __fastcall LoadFromFile(AnsiString FileName);
	virtual void __fastcall LoadFromStream(Classes::TStream* LoadStream);
	virtual void __fastcall PlayPage(unsigned DC, int Page);
	void __fastcall PlayRecord(int RecType, unsigned DC);
	__property Classes::TList* Objects = {read=FObjects, write=FObjects};
	__property AnsiString FileName = {read=FFileName, write=FFileName};
	__property int LastFont = {read=FLastFont, write=FLastFont, nodefault};
	__property int LastPen = {read=FLastPen, write=FLastPen, nodefault};
	__property int LastBrush = {read=FLastBrush, write=FLastBrush, nodefault};
	__property int CurrFont = {read=FCurrFont, write=FCurrFont, nodefault};
	__property int CurrPen = {read=FCurrPen, write=FCurrPen, nodefault};
	__property int CurrBrush = {read=FCurrBrush, write=FCurrBrush, nodefault};
};

#pragma pack(pop)

typedef void __fastcall (*TAceRecordPrintEvent)(unsigned Handle, TAceAceFile* AceFile);

//-- var, const, procedure ---------------------------------------------------
extern PACKAGE bool DuplexNewJob;
extern PACKAGE void __fastcall AceAddRecordType(const short RecordType, TAceRecordPrintEvent PrintEvent
	);

}	/* namespace Acefile */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Acefile;
#endif
#pragma option pop	// -w-

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// AceFile

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -