rm_st2dbarc.hpp

这是一个功能强大

// CodeGear C++Builder
// Copyright (c) 1995, 2007 by CodeGear
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Rm_st2dbarc.pas' rev: 11.00

#ifndef Rm_st2dbarcHPP
#define Rm_st2dbarcHPP

#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 <Messages.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Stdctrls.hpp>	// Pascal unit
#include <Math.hpp>	// Pascal unit
#include <Clipbrd.hpp>	// Pascal unit
#include <Rm_stconst.hpp>	// Pascal unit

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

namespace Rm_st2dbarc
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TStDataMode { dmBinary, dmText, dmNumeric };
#pragma option pop

typedef Word TStPDF417CodewordList[2701];

#pragma option push -b-
enum TStPDF417ECCLevels { ecAuto, ecLevel0, ecLevel1, ecLevel2, ecLevel3, ecLevel4, ecLevel5, ecLevel6, ecLevel7, ecLevel8 };
#pragma option pop

#pragma option push -b-
enum TStMaxiCodeMode { cmMode2, cmMode3, cmMode4, cmMode5, cmMode6 };
#pragma option pop

typedef Byte TStMaxiCodeECCData[145];

#pragma option push -b-
enum TStMaxiCodeECCPoly { epPrimary, epStandard, epEnhanced };
#pragma option pop

#pragma option push -b-
enum TStMaxiCodeECCInterleave { imNone, imEven, imOdd };
#pragma option pop

class DELPHICLASS E2DBarcodeError;
class PASCALIMPLEMENTATION E2DBarcodeError : public Sysutils::Exception 
{
	typedef Sysutils::Exception inherited;
	
public:
	#pragma option push -w-inl
	/* Exception.Create */ inline __fastcall E2DBarcodeError(const AnsiString Msg) : Sysutils::Exception(Msg) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateFmt */ inline __fastcall E2DBarcodeError(const AnsiString Msg, System::TVarRec const * Args, const int Args_Size) : Sysutils::Exception(Msg, Args, Args_Size) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateRes */ inline __fastcall E2DBarcodeError(int Ident)/* overload */ : Sysutils::Exception(Ident) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmt */ inline __fastcall E2DBarcodeError(int Ident, System::TVarRec const * Args, const int Args_Size)/* overload */ : Sysutils::Exception(Ident, Args, Args_Size) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateHelp */ inline __fastcall E2DBarcodeError(const AnsiString Msg, int AHelpContext) : Sysutils::Exception(Msg, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateFmtHelp */ inline __fastcall E2DBarcodeError(const AnsiString Msg, System::TVarRec const * Args, const int Args_Size, int AHelpContext) : Sysutils::Exception(Msg, Args, Args_Size, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResHelp */ inline __fastcall E2DBarcodeError(int Ident, int AHelpContext)/* overload */ : Sysutils::Exception(Ident, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmtHelp */ inline __fastcall E2DBarcodeError(System::PResStringRec ResStringRec, System::TVarRec const * Args, const int Args_Size, int AHelpContext)/* overload */ : Sysutils::Exception(ResStringRec, Args, Args_Size, AHelpContext) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~E2DBarcodeError(void) { }
	#pragma option pop
	
};


class DELPHICLASS TStCustom2DBarcode;
class PASCALIMPLEMENTATION TStCustom2DBarcode : public Controls::TGraphicControl 
{
	typedef Controls::TGraphicControl inherited;
	
protected:
	AnsiString FCode;
	int FBarWidth;
	Graphics::TColor FBackgroundColor;
	AnsiString FCaption;
	int FECCLevel;
	bool FExtendedSyntax;
	bool FRelativeBarHeight;
	int FBarHeightToWidth;
	int FBarHeight;
	int FQuietZone;
	Classes::TAlignment FAlignment;
	Stdctrls::TTextLayout FCaptionLayout;
	#pragma pack(push,1)
	Types::TRect FBarCodeRect;
	#pragma pack(pop)
	int FUsedCodewords;
	int FFreeCodewords;
	int FUsedECCCodewords;
	int FTotalCodewords;
	Graphics::TBitmap* FBitmap;
	virtual int __fastcall CalculateBarCodeWidth(int PaintableWidth) = 0 ;
	virtual int __fastcall CalculateBarCodeHeight(int PaintableHeight) = 0 ;
	virtual void __fastcall DrawBarcode(void) = 0 ;
	void __fastcall GenerateBarcodeBitmap(int BCWidth, int BCHeight);
	virtual void __fastcall GenerateCodewords(void) = 0 ;
	int __fastcall GetBarCodeHeight(void);
	int __fastcall GetBarCodeWidth(void);
	void __fastcall GetCurrentResolution(int &ResX, int &ResY);
	AnsiString __fastcall GetVersion();
	virtual void __fastcall Paint(void);
	void __fastcall SetAlignment(const Classes::TAlignment v);
	void __fastcall SetBackgroundColor(const Graphics::TColor v);
	virtual void __fastcall SetBarHeight(const int v);
	virtual void __fastcall SetBarHeightToWidth(const int v);
	virtual void __fastcall SetBarWidth(const int v);
	void __fastcall SetBitmap(const Graphics::TBitmap* v);
	void __fastcall SetCaption(const AnsiString v);
	void __fastcall SetCaptionLayout(const Stdctrls::TTextLayout v);
	void __fastcall SetCode(const AnsiString v);
	void __fastcall SetECCLevel(const int v);
	void __fastcall SetExtendedSyntax(const bool v);
	virtual void __fastcall SetRelativeBarHeight(const bool v);
	void __fastcall SetQuietZone(const int v);
	void __fastcall SetVersion(const AnsiString Value);
	
public:
	__fastcall virtual TStCustom2DBarcode(Classes::TComponent* AOwner);
	__fastcall virtual ~TStCustom2DBarcode(void);
	void __fastcall CopyToClipboard(void);
	void __fastcall CopyToClipboardRes(int ResX, int ResY);
	void __fastcall PaintToCanvas(Graphics::TCanvas* ACanvas, const Types::TPoint &Position);
	void __fastcall PaintToCanvasRes(Graphics::TCanvas* ACanvas, const Types::TPoint &Position, int ResX, int ResY);
	void __fastcall PaintToCanvasSize(Graphics::TCanvas* ACanvas, double X, double Y, double H);
	void __fastcall PaintToDC(HDC DC, const Types::TPoint &Position);
	void __fastcall PaintToDCRes(HDC DC, const Types::TPoint &Position, int ResX, int ResY);
	void __fastcall PaintToPrinterCanvas(Graphics::TCanvas* ACanvas, const Types::TPoint &Position);
	void __fastcall PaintToPrinterCanvasRes(Graphics::TCanvas* ACanvas, const Types::TPoint &Position, int ResX, int ResY);
	void __fastcall PaintToPrinterCanvasSize(Graphics::TCanvas* ACanvas, double X, double Y, double H);
	void __fastcall PaintToPrinterDC(HDC DC, const Types::TPoint &Position);
	void __fastcall PaintToPrinterDCRes(HDC DC, const Types::TPoint &Position, int ResX, int ResY);
	virtual void __fastcall RenderToResolution(Graphics::TBitmap* &OutBitmap, int ResX, int ResY, int &SizeX, int &SizeY) = 0 ;
	void __fastcall SaveToFile(const AnsiString FileName);
	void __fastcall SaveToFileRes(const AnsiString FileName, int ResX, int ResY);
	__property Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, default=2};
	__property Graphics::TColor BackgroundColor = {read=FBackgroundColor, write=SetBackgroundColor, default=16777215};
	__property int BarCodeHeight = {read=GetBarCodeHeight, nodefault};
	__property Types::TRect BarCodeRect = {read=FBarCodeRect};
	__property int BarCodeWidth = {read=GetBarCodeWidth, nodefault};
	__property int BarHeight = {read=FBarHeight, write=SetBarHeight, default=2};
	__property int BarHeightToWidth = {read=FBarHeightToWidth, write=SetBarHeightToWidth, default=4};
	__property int BarWidth = {read=FBarWidth, write=SetBarWidth, default=2};
	__property Graphics::TBitmap* Bitmap = {read=FBitmap, write=SetBitmap, stored=false};
	__property AnsiString Caption = {read=FCaption, write=SetCaption};
	__property Stdctrls::TTextLayout CaptionLayout = {read=FCaptionLayout, write=SetCaptionLayout, default=2};
	__property AnsiString Code = {read=FCode, write=SetCode};
	__property int ECCLevel = {read=FECCLevel, write=SetECCLevel, default=0};
	__property bool ExtendedSyntax = {read=FExtendedSyntax, write=SetExtendedSyntax, default=1};
	__property int FreeCodewords = {read=FFreeCodewords, nodefault};
	__property bool RelativeBarHeight = {read=FRelativeBarHeight, write=SetRelativeBarHeight, default=0};
	__property int QuietZone = {read=FQuietZone, write=SetQuietZone, default=8};
	__property int TotalCodewords = {read=FTotalCodewords, nodefault};
	__property int UsedCodewords = {read=FUsedCodewords, nodefault};
	__property int UsedECCCodewords = {read=FUsedECCCodewords, nodefault};
	__property Color  = {default=0};
	
__published:
	__property AnsiString Version = {read=GetVersion, write=SetVersion, stored=false};
	__property Align  = {default=0};
	__property Cursor  = {default=0};
	__property Enabled  = {default=1};
	__property Font ;
	__property ParentColor  = {default=1};
	__property ParentFont  = {default=1};
	__property ParentShowHint  = {default=1};
	__property ShowHint ;
	__property Visible  = {default=1};
	__property OnClick ;
	__property OnDblClick ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
};


class DELPHICLASS TStPDF417Barcode;
class PASCALIMPLEMENTATION TStPDF417Barcode : public TStCustom2DBarcode 
{
	typedef TStCustom2DBarcode inherited;