rm_utils.hpp

这是一个功能强大

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

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

#ifndef Rm_utilsHPP
#define Rm_utilsHPP

#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 <Sysutils.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Typinfo.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Stdctrls.hpp>	// Pascal unit
#include <Menus.hpp>	// Pascal unit
#include <Rm_common.hpp>	// Pascal unit
#include <Rm_class.hpp>	// Pascal unit
#include <Rm_dataset.hpp>	// Pascal unit
#include <Sysconst.hpp>	// Pascal unit
#include <Variants.hpp>	// Pascal unit
#include <Strutils.hpp>	// Pascal unit

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

namespace Rm_utils
{
//-- type declarations -------------------------------------------------------
typedef AnsiString RM_utils__1[36];

typedef AnsiString RM_utils__2[12];

class DELPHICLASS TRMDeviceCompatibleCanvas;
class PASCALIMPLEMENTATION TRMDeviceCompatibleCanvas : public Graphics::TCanvas 
{
	typedef Graphics::TCanvas inherited;
	
private:
	HDC FReferenceDC;
	HDC FCompatibleDC;
	HBITMAP FCompatibleBitmap;
	HBITMAP FOldBitmap;
	int FWidth;
	int FHeight;
	HPALETTE FSavePalette;
	bool FRestorePalette;
	
protected:
	virtual void __fastcall CreateHandle(void);
	virtual void __fastcall Changing(void);
	void __fastcall UpdateFont(void);
	
public:
	__fastcall TRMDeviceCompatibleCanvas(HDC aReferenceDC, int aWidth, int aHeight, HPALETTE aPalette);
	__fastcall virtual ~TRMDeviceCompatibleCanvas(void);
	void __fastcall RenderToDevice(const Types::TRect &aDestRect, HPALETTE aPalette, int aCopyMode);
	__property int Height = {read=FHeight, nodefault};
	__property int Width = {read=FWidth, nodefault};
};


class DELPHICLASS TRMHtmlFontStack;
class PASCALIMPLEMENTATION TRMHtmlFontStack : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	Classes::TList* FFontList;
	
public:
	__fastcall TRMHtmlFontStack(void);
	__fastcall virtual ~TRMHtmlFontStack(void);
	void __fastcall Push(Graphics::TFont* aFont);
	Graphics::TFont* __fastcall Pop(void);
};


struct TRMtmlElement;
typedef TRMtmlElement *PRMHtmlElement;

typedef DynamicArray<WideString >  RM_utils__5;

typedef DynamicArray<WideString >  RM_utils__6;

struct TRMtmlElement
{
	
public:
	WideString H_tag;
	WideString H_str;
	DynamicArray<WideString >  H_paras;
	DynamicArray<WideString >  H_values;
	WideString H_TagStr;
} ;

struct TRMHtmlParaValue;
typedef TRMHtmlParaValue *PRMHtmlParaValue;

struct TRMHtmlParaValue
{
	
public:
	WideString ParaName;
	WideString ParaValue;
} ;

class DELPHICLASS TRMHtmlList;
class PASCALIMPLEMENTATION TRMHtmlList : public Classes::TList 
{
	typedef Classes::TList inherited;
	
public:
	virtual void __fastcall Clear(void);
public:
	#pragma option push -w-inl
	/* TList.Destroy */ inline __fastcall virtual ~TRMHtmlList(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TRMHtmlList(void) : Classes::TList() { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------
extern PACKAGE Set<char, 0, 255>  RMBreakChars;
extern PACKAGE AnsiString RMChineseBreakChars[36];
extern PACKAGE AnsiString RMChinereEndChars[12];
extern PACKAGE bool __fastcall RMWideCharIn(WideChar aChar, const Sysutils::TSysCharSet &aSysCharSet);
extern PACKAGE Variant __fastcall RMO2V(System::TObject* O);
extern PACKAGE Graphics::TFontStyles __fastcall RMSetFontStyle(int Style);
extern PACKAGE int __fastcall RMGetFontStyle(Graphics::TFontStyles Style);
extern PACKAGE AnsiString __fastcall RMReadAnsiMemo(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMReadMemo(Classes::TStream* aStream, Classes::TStrings* aStrings);
extern PACKAGE void __fastcall RMWriteMemo(Classes::TStream* aStream, Classes::TStrings* aStrings);
extern PACKAGE AnsiString __fastcall RMReadString(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMWriteString(Classes::TStream* aStream, const AnsiString s);
extern PACKAGE WideString __fastcall RMReadWideString(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMWriteWideString(Classes::TStream* aStream, const WideString s);
extern PACKAGE void __fastcall RMReadWideMemo(Classes::TStream* aStream, Rm_jclwidestrings::TWStrings* aStrings);
extern PACKAGE void __fastcall RMWriteWideMemo(Classes::TStream* aStream, Rm_jclwidestrings::TWStrings* aStrings);
extern PACKAGE bool __fastcall RMReadBoolean(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMWriteBoolean(Classes::TStream* aStream, bool Value);
extern PACKAGE Byte __fastcall RMReadByte(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMWriteByte(Classes::TStream* aStream, Byte Value);
extern PACKAGE Word __fastcall RMReadWord(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMWriteWord(Classes::TStream* aStream, Word Value);
extern PACKAGE int __fastcall RMReadInt32(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMWriteInt32(Classes::TStream* aStream, int Value);
extern PACKAGE unsigned __fastcall RMReadLongWord(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMWriteLongWord(Classes::TStream* aStream, unsigned Value);
extern PACKAGE float __fastcall RMReadFloat(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMWriteFloat(Classes::TStream* aStream, float Value);
extern PACKAGE void __fastcall RMReadFont(Classes::TStream* aStream, Graphics::TFont* Font);
extern PACKAGE void __fastcall RMWriteFont(Classes::TStream* aStream, Graphics::TFont* Font);
extern PACKAGE Types::TRect __fastcall RMReadRect(Classes::TStream* aStream);
extern PACKAGE void __fastcall RMWriteRect(Classes::TStream* aStream, const Types::TRect &aRect);
extern PACKAGE void __fastcall RMWriteObjToStream(Classes::TStream* aStream, Classes::TPersistent* aObj);
extern PACKAGE void __fastcall RMReadObjFromStream(Classes::TStream* aStream, Classes::TPersistent* aObj);
extern PACKAGE void __fastcall RMReadObjFromFile(Classes::TPersistent* aObj, const AnsiString aFileName);
extern PACKAGE void __fastcall RMWriteObjToFile(Classes::TPersistent* aObj, const AnsiString aFilename);
extern PACKAGE void __fastcall RMEnableControls(Controls::TControl* * c, const int c_Size, bool e);
extern PACKAGE Classes::TComponent* __fastcall RMFindComponent(Classes::TComponent* aOwner, const AnsiString aComponentName);
extern PACKAGE void __fastcall RMGetComponents(Classes::TComponent* aOwner, TMetaClass* aClassRef, Classes::TStrings* aList, Classes::TComponent* aSkip);
extern PACKAGE WideString __fastcall RMRemoveQuotes(const WideString aStr);
extern PACKAGE void __fastcall RMSetCommaText(AnsiString Text, Classes::TStringList* sl);
extern PACKAGE tagSIZE __fastcall RMWideCanvasTextExtent(Graphics::TCanvas* aCanvas, const WideString aText);
extern PACKAGE int __fastcall RMWideCanvasTextWidth(Graphics::TCanvas* aCanvas, const WideString aText);
extern PACKAGE int __fastcall RMWideCanvasTextHeight(Graphics::TCanvas* aCanvas, const WideString aText);
extern PACKAGE int __fastcall RMCanvasWidth(const AnsiString aStr, Graphics::TFont* aFont);
extern PACKAGE int __fastcall RMCanvasHeight(const AnsiString aStr, Graphics::TFont* aFont);
extern PACKAGE int __fastcall RMWrapStrings(const Rm_jclwidestrings::TWStringList* aSrcLines, Rm_jclwidestrings::TWStringList* aDstLines, Graphics::TCanvas* aCanvas, int aWidth, const int aLineSpacing, bool aWordBreak, bool aCharWrap, bool aAllowHtmlTag, bool aWidthFlag, bool aAddChar);
extern PACKAGE AnsiString __fastcall RMCurrToBIGNum(System::Currency Value);
extern PACKAGE AnsiString __fastcall RMChineseNumber(const AnsiString jnum);
extern PACKAGE AnsiString __fastcall RMSmallToBig(AnsiString curs);
extern PACKAGE void __fastcall RMSetFontSize(Stdctrls::TComboBox* aComboBox, int aFontHeight, int aFontSize);
extern PACKAGE void __fastcall RMSetFontSize1(Stdctrls::TListBox* aListBox, int aFontSize);
extern PACKAGE int __fastcall RMGetFontSize(Stdctrls::TComboBox* aComboBox);
extern PACKAGE int __fastcall RMGetFontSize1(int aIndex, AnsiString aText);
extern PACKAGE Graphics::TBitmap* __fastcall RMCreateBitmap(const AnsiString ResName);
extern PACKAGE void __fastcall RMSetStrProp(System::TObject* aObject, const AnsiString aPropName, int ID);
extern PACKAGE Variant __fastcall RMGetPropValue(Rm_class::TRMReport* aReport, const AnsiString aObjectName, const AnsiString aPropName);
extern PACKAGE Extended __fastcall RMRound(Extended x, int dicNum);
extern PACKAGE AnsiString __fastcall RMMakeFileName(AnsiString AFileName, AnsiString AFileExtension, int ANumber);
extern PACKAGE AnsiString __fastcall RMAppendTrailingBackslash(const AnsiString S);
extern PACKAGE AnsiString __fastcall RMColorBGRToRGB(Graphics::TColor AColor);
extern PACKAGE AnsiString __fastcall RMMakeImgFileName(AnsiString AFileName, AnsiString AFileExtension, int ANumber);
extern PACKAGE void __fastcall RMSetControlsEnable(Controls::TWinControl* AControl, bool AState);
extern PACKAGE void __fastcall RMSaveFormPosition(AnsiString aParentKey, Forms::TForm* aForm);
extern PACKAGE void __fastcall RMRestoreFormPosition(AnsiString aParentKey, Forms::TForm* aForm);
extern PACKAGE void __fastcall RMGetBitmapPixels(Graphics::TGraphic* aGraphic, int &x, int &y);
extern PACKAGE AnsiString __fastcall RMGetWindowsVersion();
extern PACKAGE AnsiString __fastcall RMGetTmpFileName()/* overload */;
extern PACKAGE AnsiString __fastcall RMGetTmpFileName(AnsiString aExt)/* overload */;
extern PACKAGE AnsiString __fastcall RMMonth_EnglishShort(int aMonth);
extern PACKAGE AnsiString __fastcall RMMonth_EnglishLong(int aMonth);
extern PACKAGE AnsiString __fastcall RMNumToBig(int Value);
extern PACKAGE AnsiString __fastcall RMSinglNumToBig(Extended Value, int Digit);
extern PACKAGE AnsiString __fastcall RMStream2TXT(Classes::TStream* aStream);
extern PACKAGE bool __fastcall RMTXT2Stream(AnsiString inStr, Classes::TStream* OutStream);
extern PACKAGE AnsiString __fastcall RMLoadStr(int aResID);
extern PACKAGE double __fastcall RMStrToFloat(AnsiString aStr);
extern PACKAGE bool __fastcall RMIsValidFloat(AnsiString aStr);
extern PACKAGE bool __fastcall RMisNumeric(AnsiString aStr);
extern PACKAGE void __fastcall RMPrintGraphic(const Graphics::TCanvas* aCanvas, const Types::TRect &aDestRect, const Graphics::TGraphic* aGraphic, bool aIsPrinting, bool aDirectDraw, bool aTransparent);
extern PACKAGE AnsiString __fastcall RMStrGetToken(AnsiString s, AnsiString delimeter, int &APos);
extern PACKAGE AnsiString __fastcall RMExtractField(const AnsiString aStr, int aFieldNo);
extern PACKAGE void __fastcall RMSetNullValue(Variant &aValue1, Variant &aValue2);
extern PACKAGE AnsiString __fastcall RMDeleteNoNumberChar(AnsiString s);
extern PACKAGE AnsiString __fastcall RMNumToLetters(double Number);
extern PACKAGE AnsiString __fastcall RMTrim(AnsiString aStr);
extern PACKAGE void __fastcall RMHtmlAnalyseElement(WideString aSourceStr, TRMHtmlList* &aHtmlElements);
extern PACKAGE void __fastcall RMHtmlSetFont(Graphics::TFont* aFont, PRMHtmlElement aHtmlElement, TRMHtmlFontStack* aFontStack, Rm_class::TRMDocMode aDocMode, double aFactorY, Rm_jclwidestrings::TWStringList* aList);
extern PACKAGE void __fastcall RMSetControlsEnabled(Controls::TWinControl* aControl, bool aEnabled);
extern PACKAGE int __fastcall RMPosEx(const WideString SubStr, const WideString S, unsigned Offset = (unsigned)(0x1));
extern PACKAGE void __fastcall GetMethodDefinition(Typinfo::PTypeInfo ATypeInfo, Classes::TStrings* AStrings)/* overload */;
extern PACKAGE AnsiString __fastcall GetMethodDefinition(Typinfo::PTypeInfo ATypeInfo)/* overload */;
extern PACKAGE AnsiString __fastcall GetFullMethodDefinition(Classes::TComponent* Instance, const AnsiString PropName);

}	/* namespace Rm_utils */
using namespace Rm_utils;
#pragma pack(pop)
#pragma option pop

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