mxoutlookbarpro.~hpp

可以在C++中实现OutLook界面和windows资源管理器的效果。

	__property TmxExplorerMethod ExplorerMethod = {read=FExplorerMethod, write=SetExplorerMethod, default=1
		};
	__property bool Flat = {read=FFlat, write=SetFlat, default=1};
	__property TmxHeaders* Headers = {read=GetHeaders, write=SetHeaders};
	__property TmxHeaderImages* HeaderImages = {read=FHeaderImages, write=FHeaderImages};
	__property TmxInplaceEditor* InplaceEditor = {read=FEditor, write=SetInplaceEditor};
	__property Byte HeaderScrollAcceleration = {read=FHeaderScrollAcceleration, write=SetHeaderScrollAcceleration
		, default=5};
	__property Word ScrollChange = {read=FScrollChange, write=SetScrollChange, default=50};
	__property TmxHeaderScrollType HeaderScrollType = {read=FHeaderScrollType, write=SetHeaderScrollType
		, default=2};
	__property Byte HeaderScrollValue = {read=FHeaderScrollValue, write=SetHeaderScrollValue, default=20
		};
	__property TmxPreSet PreSet = {read=FPreSet, write=SetPreSet, stored=false, default=0};
	__property Word ScrollBoxSize = {read=FScrollBoxSize, write=SetScrollBoxSize, default=15};
	__property TmxBarSettings* Settings = {read=FSettings, write=FSettings};
	__property TmxScrollView ScrollView = {read=FScrollView, write=SetScrollView, default=0};
	__property TmxBarOptions Options = {read=FOptions, write=SetOptions, nodefault};
	__property AnsiString Version = {read=GetVersion, write=SetVersion};
	__property TmxViewStyle ViewStyle = {read=FViewStyle, write=SetViewStyle, default=1};
	__property TmxEventDrawHeader OnDrawCloseHeader = {read=GetOnDrawCloseHeader, write=SetOnDrawCloseHeader
		};
	__property TmxEventDrawHeader OnAfterDrawCloseHeader = {read=GetOnAfterDrawCloseHeader, write=SetOnAfterDrawCloseHeader
		};
	__property TmxEventHeaderChange OnChange = {read=FOnChange, write=FOnChange};
	__property TmxEventCanChangeHeader OnCanChange = {read=FOnCanChange, write=FOnCanChange};
	__property TmxEventDrawButton OnDrawCloseButton = {read=FOnDrawCloseButton, write=FOnDrawCloseButton
		};
	__property TmxEventDrawHeaderButtons OnDrawHeaderButtons = {read=FOnDrawHeaderButtons, write=FOnDrawHeaderButtons
		};
	__property TmxEventDrawHeaderButtons OnAfterDrawHeaderButtons = {read=FOnAfterDrawHeaderButtons, write=
		FOnAfterDrawHeaderButtons};
	__property TmxEventChangeViewStyle OnChangeViewStyle = {read=FOnChangeViewStyle, write=FOnChangeViewStyle
		};
	__property Classes::TNotifyEvent OnHide = {read=FOnHide, write=FOnHide};
	__property Classes::TNotifyEvent OnShow = {read=FOnShow, write=FOnShow};
	__property Classes::TNotifyEvent OnClose = {read=GetOnClose, write=SetOnClose};
	__property TmxEventAfterChangeStyle OnAfterChangeStyle = {read=FOnAfterChangeStyle, write=FOnAfterChangeStyle
		};
	__property Controls::TContextPopupEvent OnContextPopup = {read=FOnContextPopup, write=FOnContextPopup
		};
	__property Controls::TContextPopupEvent OnEditorContextPopup = {read=FOnEditorContextPopup, write=FOnEditorContextPopup
		};
	__property TmxEventDragAllowed OnDragAllowed = {read=FOnDragAllowed, write=FOnDragAllowed};
	__property TmxEventDragOver OnDragOver = {read=FOnDragOver, write=FOnDragOver};
	__property TmxEventDragEnter OnDragEnter = {read=FOnDragEnter, write=FOnDragEnter};
	__property TmxEventDragDrop OnDragDrop = {read=FOnDragDrop, write=FOnDragDrop};
	__property Align ;
	__property Anchors ;
	__property BorderWidth  = {read=GetBorderWidth, write=SetBorderWidth, default=0};
	__property Constraints ;
	__property Ctl3D ;
	__property Cursor ;
	__property Enabled ;
	__property PopupMenu ;
	__property TabStop ;
	__property TabOrder ;
	__property Visible ;
	__property OnClick ;
	__property OnDblClick ;
	__property DockSite ;
	__property DragCursor ;
	__property DragKind ;
	__property DragMode ;
	__property ShowHint ;
	__property ParentShowHint ;
	__property BiDiMode ;
	__property ParentBiDiMode ;
	__property OnDockDrop ;
	__property OnEndDock ;
	__property OnEndDrag ;
	__property OnGetSiteInfo ;
	__property OnStartDock ;
	__property OnUnDock ;
	__property OnCanResize ;
	__property OnEnter ;
	__property OnExit ;
	__property OnKeyDown ;
	__property OnKeyPress ;
	__property OnKeyUp ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnMouseWheel ;
	__property OnMouseWheelDown ;
	__property OnMouseWheelUp ;
	__property OnResize ;
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TmxOutlookBarPro(HWND ParentWindow) : Controls::TCustomControl(
		ParentWindow) { }
	#pragma option pop
	
};


struct TmxReference
{
	unsigned Process;
	TmxOutlookBarPro* Bar;
} ;

typedef void __fastcall (__closure *TmxEventDrawStatusButton)(System::TObject* Sender, Graphics::TCanvas* 
	ACanvas, const Windows::TRect &ARect, TmxHeaderState AState);

typedef void __fastcall (__closure *TmxEventCheckScroll)(System::TObject* Sender, bool &ScrollUpNeed
	, bool &ScrollDownNeed, bool &Automatic);

class DELPHICLASS TmxEnumFormatEtc;
class PASCALIMPLEMENTATION TmxEnumFormatEtc : public System::TInterfacedObject 
{
	typedef System::TInterfacedObject inherited;
	
protected:
	TmxFormatEtcList* FFormatEtcList;
	int FCurrentIndex;
	
public:
	__fastcall TmxEnumFormatEtc(TmxFormatEtcList* FormatEtcList);
	__fastcall virtual ~TmxEnumFormatEtc(void);
	HRESULT __stdcall Next(int Celt, /* out */ void *Elt, Windows::PLongint PCeltFetched);
	HRESULT __stdcall Skip(int Celt);
	HRESULT __stdcall Reset(void);
	HRESULT __stdcall Clone(/* out */ _di_IEnumFORMATETC &Enum);
private:
	void *__IEnumFORMATETC;	/* IEnumFORMATETC */
	
public:
	operator IEnumFORMATETC*(void) { return (IEnumFORMATETC*)&__IEnumFORMATETC; }
	
};


class DELPHICLASS TmxButtonActionLink;
class PASCALIMPLEMENTATION TmxButtonActionLink : public Controls::TControlActionLink 
{
	typedef Controls::TControlActionLink inherited;
	
protected:
	TmxButton* FClient;
	virtual void __fastcall AssignClient(System::TObject* AClient);
	virtual bool __fastcall IsCaptionLinked(void);
	virtual bool __fastcall IsEnabledLinked(void);
	virtual bool __fastcall IsHelpContextLinked(void);
	virtual bool __fastcall IsHintLinked(void);
	virtual bool __fastcall IsImageIndexLinked(void);
	virtual bool __fastcall IsVisibleLinked(void);
	virtual bool __fastcall IsOnExecuteLinked(void);
	virtual void __fastcall SetCaption(const AnsiString AValue);
	virtual void __fastcall SetEnabled(bool AValue);
	virtual void __fastcall SetHelpContext(Classes::THelpContext AValue);
	virtual void __fastcall SetHint(const AnsiString AValue);
	virtual void __fastcall SetImageIndex(int AValue);
	virtual void __fastcall SetVisible(bool AValue);
	virtual void __fastcall SetOnExecute(Classes::TNotifyEvent AValue);
public:
	#pragma option push -w-inl
	/* TBasicActionLink.Create */ inline __fastcall virtual TmxButtonActionLink(System::TObject* AClient
		) : Controls::TControlActionLink(AClient) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TBasicActionLink.Destroy */ inline __fastcall virtual ~TmxButtonActionLink(void) { }
	#pragma option pop
	
};


typedef TMetaClass*TmxButtonActionLinkClass;

class PASCALIMPLEMENTATION TmxButtonImages : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	Imglist::TCustomImageList* FHot;
	Imglist::TChangeLink* FHotChangeLink;
	Imglist::TCustomImageList* FHotSmall;
	Imglist::TChangeLink* FHotSmallChangeLink;
	Imglist::TCustomImageList* FDisabled;
	Imglist::TChangeLink* FDisabledChangeLink;
	Imglist::TCustomImageList* FDisabledSmall;
	Imglist::TChangeLink* FDisabledSmallChangeLink;
	Imglist::TCustomImageList* FNormal;
	Imglist::TChangeLink* FNormalChangeLink;
	Imglist::TCustomImageList* FSmall;
	Imglist::TChangeLink* FSmallChangeLink;
	Classes::TComponent* FOwnerComponent;
	Classes::TNotifyEvent FOnChangeParameter;
	void __fastcall SetImages(int Index, Imglist::TCustomImageList* AValue);
	void __fastcall ImageListChange(System::TObject* Sender);
	
protected:
	DYNAMIC void __fastcall Change(void);
	
public:
	__fastcall virtual TmxButtonImages(Classes::TComponent* AOwner);
	__fastcall virtual ~TmxButtonImages(void);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	virtual void __fastcall AssignTo(Classes::TPersistent* Destination);
	
__published:
	__property Imglist::TCustomImageList* Hot = {read=FHot, write=SetImages, index=2};
	__property Imglist::TCustomImageList* HotSmall = {read=FHotSmall, write=SetImages, index=4};
	__property Imglist::TCustomImageList* Normal = {read=FNormal, write=SetImages, index=1};
	__property Imglist::TCustomImageList* Small = {read=FSmall, write=SetImages, index=3};
	__property Imglist::TCustomImageList* Disabled = {read=FDisabled, write=SetImages, index=5};
	__property Imglist::TCustomImageList* DisabledSmall = {read=FDisabledSmall, write=SetImages, index=6
		};
	__property Classes::TNotifyEvent OnChangeParameter = {read=FOnChangeParameter, write=FOnChangeParameter
		};
};


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


class DELPHICLASS TmxGlyph;
class PASCALIMPLEMENTATION TmxGlyph : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	TmxGlyphPosition FPosition;
	Graphics::TBitmap* FBitmap;
	bool FDrawing;
	bool FTransparent;
	bool FVisible;
	Classes::TNotifyEvent FOnChangeParameter;
	void __fastcall SetTransparent(bool AValue);
	void __fastcall SetVisible(bool AValue);
	void __fastcall SetPosition(TmxGlyphPosition AValue);
	void __fastcall SetBitmap(Graphics::TBitmap* AValue);
	void __fastcall SetOnChangeParameter(Classes::TNotifyEvent AValue);
	
protected:
	virtual void __fastcall Change(void);
	
public:
	__fastcall virtual TmxGlyph(void);
	__fastcall virtual ~TmxGlyph(void);
	void __fastcall DrawGlyph(Graphics::TBitmap* DrawBitmap, const Windows::TRect &ARect);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	virtual void __fastcall AssignTo(Classes::TPersistent* Destination);
	
__published:
	__property TmxGlyphPosition Position = {read=FPosition, write=SetPosition, default=3};
	__property Graphics::TBitmap* Bitmap = {read=FBitmap, write=SetBitmap};
	__property bool Transparent = {read=FTransparent, write=SetTransparent, default=1};
	__property bool Visible = {read=FVisible, write=SetVisible, default=1};
	__property Classes::TNotifyEvent OnChangeParameter = {read=FOnChangeParameter, write=SetOnChangeParameter
		};
};


class DELPHICLASS TmxStatusButton;
class PASCALIMPLEMENTATION TmxStatusButton : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	Graphics::TColor FArrowColor;
	Graphics::TColor FBackground;
	Graphics::TColor FBorderColor;
	bool FTransparent;
	Classes::TNotifyEvent FOnChangeParameter;
	void __fastcall SetTransparent(bool AValue);
	void __fastcall SetColor(int Index, Graphics::TColor AValue);
	Graphics::TColor __fastcall GetColor(int Index);
	
protected:
	DYNAMIC void __fastcall Change(void);
	
public:
	__fastcall virtual TmxStatusButton(void);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	virtual void __fastcall AssignTo(Classes::TPersistent* Destination);
	
__published:
	__property Graphics::TColor ArrowColor = {read=GetColor, write=SetColor, index=1, nodefault};
	__property Graphics::TColor Background = {read=GetColor, write=SetColor, index=2, nodefault};
	__property Graphics::TColor BorderColor = {read=GetColor, write=SetColor, index=3, nodefault};
	__property bool Transparent = {read=FTransparent, write=SetTransparent, default=0};
	__property Classes::TNotifyEvent OnChangeParameter = {read=FOnChangeParameter, write=FOnChangeParameter
		};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TmxStatusButton(void) { }
	#pragma optio