rm_jvtypes.hpp

这是一个功能强大

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

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

#ifndef Rm_jvtypesHPP
#define Rm_jvtypesHPP

#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 <Classes.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Rm_jvconsts.hpp>	// Pascal unit
#include <Rm_jvresources.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------
#ifndef TDate
#define TDate Controls::TDate
#define TTime Controls::TTime
#endif

namespace Rm_jvtypes
{
//-- type declarations -------------------------------------------------------
typedef void *TBytes;

typedef void *IntPtr;

typedef char *PCaptionChar;

#pragma pack(push,1)
struct TCMButtonPressed
{
	
public:
	unsigned Msg;
	int Index;
	Controls::TControl* Control;
	int Result;
} ;
#pragma pack(pop)

typedef AnsiString THintString;

typedef TStringList THintStringList;
;

#pragma option push -b-
enum TInputKey { ikAll, ikArrows, ikChars, ikButton, ikTabs, ikEdit, ikNative };
#pragma option pop

typedef Set<TInputKey, ikAll, ikNative>  TInputKeys;

#pragma pack(push,1)
struct TJvRGBTriple
{
	
public:
	Byte rgbBlue;
	Byte rgbGreen;
	Byte rgbRed;
} ;
#pragma pack(pop)

typedef void __fastcall (*TTimerProc)(unsigned hwnd, unsigned Msg, unsigned idEvent, unsigned dwTime);

class DELPHICLASS TJvPersistent;
class PASCALIMPLEMENTATION TJvPersistent : public Classes::TComponent 
{
	typedef Classes::TComponent inherited;
	
public:
	__fastcall virtual TJvPersistent(Classes::TComponent* AOwner);
public:
	#pragma option push -w-inl
	/* TComponent.Destroy */ inline __fastcall virtual ~TJvPersistent(void) { }
	#pragma option pop
	
};


typedef void __fastcall (__closure *TJvPropertyChangeEvent)(System::TObject* Sender, const AnsiString PropName);

class DELPHICLASS TJvPersistentProperty;
class PASCALIMPLEMENTATION TJvPersistentProperty : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	int FUpdateCount;
	Classes::TNotifyEvent FOnChanging;
	Classes::TNotifyEvent FOnChange;
	TJvPropertyChangeEvent FOnChangingProperty;
	TJvPropertyChangeEvent FOnChangeProperty;
	
protected:
	virtual void __fastcall Changed(void);
	virtual void __fastcall Changing(void);
	virtual void __fastcall ChangedProperty(const AnsiString PropName);
	virtual void __fastcall ChangingProperty(const AnsiString PropName);
	virtual void __fastcall SetUpdateState(bool Updating);
	__property int UpdateCount = {read=FUpdateCount, nodefault};
	
public:
	virtual void __fastcall BeginUpdate(void);
	virtual void __fastcall EndUpdate(void);
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property Classes::TNotifyEvent OnChanging = {read=FOnChanging, write=FOnChanging};
	__property TJvPropertyChangeEvent OnChangeProperty = {read=FOnChangeProperty, write=FOnChangeProperty};
	__property TJvPropertyChangeEvent OnChangingProperty = {read=FOnChangingProperty, write=FOnChangingProperty};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TJvPersistentProperty(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TJvPersistentProperty(void) : Classes::TPersistent() { }
	#pragma option pop
	
};


#pragma option push -b-
enum TJvRegKey { hkClassesRoot, hkCurrentUser, hkLocalMachine, hkUsers, hkPerformanceData, hkCurrentConfig, hkDynData };
#pragma option pop

typedef Set<TJvRegKey, hkClassesRoot, hkDynData>  TJvRegKeys;

class DELPHICLASS EJVCLException;
class PASCALIMPLEMENTATION EJVCLException : public Sysutils::Exception 
{
	typedef Sysutils::Exception inherited;
	
public:
	#pragma option push -w-inl
	/* Exception.Create */ inline __fastcall EJVCLException(const AnsiString Msg) : Sysutils::Exception(Msg) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateFmt */ inline __fastcall EJVCLException(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 EJVCLException(int Ident)/* overload */ : Sysutils::Exception(Ident) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmt */ inline __fastcall EJVCLException(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 EJVCLException(const AnsiString Msg, int AHelpContext) : Sysutils::Exception(Msg, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateFmtHelp */ inline __fastcall EJVCLException(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 EJVCLException(int Ident, int AHelpContext)/* overload */ : Sysutils::Exception(Ident, AHelpContext) { }
	#pragma option pop
	#pragma option push -w-inl
	/* Exception.CreateResFmtHelp */ inline __fastcall EJVCLException(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 ~EJVCLException(void) { }
	#pragma option pop
	
};


typedef void __fastcall (__closure *TJvLinkClickEvent)(System::TObject* Sender, AnsiString Link);

#pragma option push -b-
enum TJvOutputMode { omFile, omStream };
#pragma option pop

typedef void __fastcall (__closure *TJvDoneFileEvent)(System::TObject* Sender, AnsiString FileName, int FileSize, AnsiString Url);

typedef void __fastcall (__closure *TJvDoneStreamEvent)(System::TObject* Sender, Classes::TStream* Stream, int StreamSize, AnsiString Url);

typedef void __fastcall (__closure *TJvHTTPProgressEvent)(System::TObject* Sender, int UserData, int Position, int TotalSize, AnsiString Url, bool &Continue);

typedef void __fastcall (__closure *TJvFTPProgressEvent)(System::TObject* Sender, int Position, AnsiString Url);

#pragma option push -b-
enum TJvClipboardCommand { caCopy, caCut, caPaste, caClear, caUndo };
#pragma option pop

typedef Set<TJvClipboardCommand, caCopy, caUndo>  TJvClipboardCommands;

struct TCMForceSize
{
	
public:
	unsigned Msg;
	#pragma pack(push,1)
	Types::TSmallPoint NewSize;
	#pragma pack(pop)
	Controls::TControl* Sender;
	int Result;
} ;

typedef TJvRGBTriple TJvRGBArray[32768];

typedef TJvRGBArray *PJvRGBArray;

typedef tagRGBQUAD TRGBQuadArray[32768];

typedef TRGBQuadArray *PRGBQuadArray;

typedef tagRGBQUAD TRGBPalette[256];

typedef TRGBPalette *PRGBPalette;

typedef void __fastcall (__closure *TJvErrorEvent)(System::TObject* Sender, AnsiString ErrorMsg);

#pragma option push -b-
enum TJvWaveLocation { frFile, frResource, frRAM };
#pragma option pop

#pragma option push -b-
enum TJvPopupPosition { ppNone, ppForm, ppApplication };
#pragma option pop

typedef void __fastcall (__closure *TJvProgressEvent)(System::TObject* Sender, int Current, int Total);

typedef void __fastcall (__closure *TJvNextPageEvent)(System::TObject* Sender, int PageNumber);

#pragma option push -b-
enum TJvBitmapStyle { bsNormal, bsCentered, bsStretched };
#pragma option pop

#pragma option push -b-
enum TJvGradientStyle { grFilled, grEllipse, grHorizontal, grVertical, grPyramid, grMount };
#pragma option pop

typedef void __fastcall (__closure *TJvParentEvent)(System::TObject* Sender, unsigned ParentWindow);

#pragma option push -b-
enum TJvDiskRes { dsSuccess, dsCancel, dsSkipfile, dsError };
#pragma option pop

#pragma option push -b-
enum TJvDiskStyle { idfCheckFirst, idfNoBeep, idfNoBrowse, idfNoCompressed, idfNoDetails, idfNoForeground, idfNoSkip, idfOemDisk, idfWarnIfSkip };
#pragma option pop

typedef Set<TJvDiskStyle, idfCheckFirst, idfWarnIfSkip>  TJvDiskStyles;

#pragma option push -b-
enum TJvDeleteStyle { idNoBeep, idNoForeground };
#pragma option pop

typedef Set<TJvDeleteStyle, idNoBeep, idNoForeground>  TJvDeleteStyles;

typedef void __fastcall (__closure *TJvNotifyParamsEvent)(System::TObject* Sender, void * Params);

struct TJvFileInfoRec
{
	
public:
	unsigned Attributes;
	AnsiString DisplayName;
	int ExeType;
	HICON Icon;
	AnsiString Location;
	AnsiString TypeName;
	int SysIconIndex;
} ;

#pragma option push -b-
enum TJvAnimation { anLeftRight, anRightLeft, anRightAndLeft, anLeftVumeter, anRightVumeter };
#pragma option pop

typedef Set<TJvAnimation, anLeftRight, anRightVumeter>  TJvAnimations;

#pragma option push -b-
enum TJvTriggerKind { tkOneShot, tkEachSecond, tkEachMinute, tkEachHour, tkEachDay, tkEachMonth, tkEachYear };
#pragma option pop

typedef char TJvFourCC[4];

struct TJvAniTag;
typedef TJvAniTag *PJvAniTag;

#pragma pack(push,1)
struct TJvAniTag
{
	
public:
	char ckID[4];
	int ckSize;
} ;
#pragma pack(pop)

#pragma pack(push,1)
struct TJvAniHeader
{
	
public:
	int dwSizeof;
	int dwFrames;
	int dwSteps;
	int dwCX;
	int dwCY;
	int dwBitCount;
	int dwPlanes;
	int dwJIFRate;
	int dwFlags;