winsubclass.hpp

delphi皮肤控件,很好的.我正在使用当中

	void __fastcall SetPosition(Controls::TWinControl* aObj);
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TWMediaPlayer(HWND ParentWindow) : Extctrls::TCustomPanel(
		ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TSkinMP;
class PASCALIMPLEMENTATION TSkinMP : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	TWMediaPlayer* mp;
	virtual void __fastcall Unsubclass(void);
	virtual void __fastcall AfterProc(Messages::TMessage &Message);
	
public:
	virtual void __fastcall Init(Classes::TComponent* sf, Winskindata::TSkinData* sd, Graphics::TCanvas* 
		acanvas, bool acolor);
public:
	#pragma option push -w-inl
	/* TSkinControl.Create */ inline __fastcall virtual TSkinMP(Classes::TComponent* AOwner) : TSkinControl(
		AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TSkinControl.Destroy */ inline __fastcall virtual ~TSkinMP(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSkinMenuButton;
class PASCALIMPLEMENTATION TSkinMenuButton : public TSkinButton 
{
	typedef TSkinButton inherited;
	
public:
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
public:
	#pragma option push -w-inl
	/* TSkinButton.Create */ inline __fastcall virtual TSkinMenuButton(Classes::TComponent* AOwner) : TSkinButton(
		AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TSkinButton.Destroy */ inline __fastcall virtual ~TSkinMenuButton(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSkinSpeedButton;
class PASCALIMPLEMENTATION TSkinSpeedButton : public TSkinBitButton 
{
	typedef TSkinBitButton inherited;
	
protected:
	bool FReentr;
	
public:
	Graphics::TCanvas* gcanvas;
	__fastcall virtual TSkinSpeedButton(Classes::TComponent* AOwner);
	__fastcall virtual ~TSkinSpeedButton(void);
	void __fastcall DrawSpeedbtn(Graphics::TCanvas* acanvas, const Windows::TRect &rc);
	void __fastcall InitGraphicControl(Classes::TComponent* sf, Winskindata::TSkinData* sd, Graphics::TCanvas* 
		acanvas);
	virtual void __fastcall AfterProc(Messages::TMessage &Message);
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	virtual void __fastcall PaintControl(HDC adc);
	void __fastcall WMPaintSpeed(Messages::TMessage &Message);
};


class DELPHICLASS TSkinCheckBox;
class PASCALIMPLEMENTATION TSkinCheckBox : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	int state;
	bool trans;
	
public:
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	virtual void __fastcall AfterProc(Messages::TMessage &Message);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
	virtual void __fastcall Init(Classes::TComponent* sf, Winskindata::TSkinData* sd, Graphics::TCanvas* 
		acanvas, bool acolor);
public:
	#pragma option push -w-inl
	/* TSkinControl.Create */ inline __fastcall virtual TSkinCheckBox(Classes::TComponent* AOwner) : TSkinControl(
		AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TSkinControl.Destroy */ inline __fastcall virtual ~TSkinCheckBox(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSkinComBox;
class DELPHICLASS TSkinScrollbarH;
class PASCALIMPLEMENTATION TSkinScrollbarH : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	virtual void __fastcall AfterProc(Messages::TMessage &Message);
	void __fastcall SetScrollbarPos(const Messages::TMessage &message);
	virtual void __fastcall Unsubclass(void);
	
public:
	TWScrollbar* hb;
	TWScrollbar* vb;
	int postype;
	__fastcall virtual TSkinScrollbarH(Classes::TComponent* AOwner);
	__fastcall virtual ~TSkinScrollbarH(void);
	virtual void __fastcall Inithwnd(unsigned ahwnd, Winskindata::TSkinData* sd, Graphics::TCanvas* acanvas
		, Classes::TComponent* sf);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
};


class DELPHICLASS TComboxScrollBar;
class PASCALIMPLEMENTATION TComboxScrollBar : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	bool nobe;
	int cw;
	int len;
	int scrollpos;
	int thumbtop;
	int thumbBottom;
	Windows::TPoint OffsetSC;
	Windows::TPoint trackp;
	int trackthumb;
	bool fdown;
	int sbDir;
	virtual void __fastcall AfterProc(Messages::TMessage &Message);
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	void __fastcall PaintScrollbar(HDC dc, const Windows::TRect &rc, int sbtype);
	virtual void __fastcall Unsubclass(void);
	void __fastcall GetThumb(const Windows::TRect &rc);
	bool __fastcall WMNCPaint(Messages::TMessage &message);
	bool __fastcall NCLButtonDown(Messages::TMessage &Message);
	
public:
	int postype;
	bool painted;
	bool border;
	__fastcall virtual TComboxScrollBar(Classes::TComponent* AOwner);
	__fastcall virtual ~TComboxScrollBar(void);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
};


class PASCALIMPLEMENTATION TSkinComBox : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	unsigned dwStyle;
	unsigned ExStyle;
	unsigned hlist;
	unsigned hbtn;
	bool isDrop;
	void *FBtnObjectInst;
	void *FBtnPrevWndProc;
	TSkinScrollbarH* vb;
	TComboxScrollBar* db;
	#pragma pack(push, 1)
	tagCOMBOBOXINFO info;
	#pragma pack(pop)
	
	Windows::TRect rBtn;
	void __fastcall FindBtn(void);
	HIDESBASE void __fastcall DrawSkinMap3(HDC dc, const Windows::TRect &rc, Graphics::TBitmap* bmp, int 
		I, int N);
	void __fastcall DrawControl1(HDC dc, const Windows::TRect &rc);
	void __fastcall ButtonProc(Messages::TMessage &Message);
	void __fastcall CNCommand(Messages::TWMCommand &Message);
	virtual void __fastcall Unsubclass(void);
	void __fastcall DrawEdit(HDC dc, const Windows::TRect &rc);
	void __fastcall SkinDropList(void);
	void __fastcall DeleteDropList(void);
	
public:
	__fastcall virtual TSkinComBox(Classes::TComponent* AOwner);
	__fastcall virtual ~TSkinComBox(void);
	virtual void __fastcall AfterProc(Messages::TMessage &Message);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
	virtual void __fastcall Init(Classes::TComponent* sf, Winskindata::TSkinData* sd, Graphics::TCanvas* 
		acanvas, bool acolor);
	virtual void __fastcall Inithwnd(unsigned ahwnd, Winskindata::TSkinData* sd, Graphics::TCanvas* acanvas
		, Classes::TComponent* sf);
};


class DELPHICLASS TSkinRadioButton;
class PASCALIMPLEMENTATION TSkinRadioButton : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	bool trans;
	
public:
	virtual void __fastcall Init(Classes::TComponent* sf, Winskindata::TSkinData* sd, Graphics::TCanvas* 
		acanvas, bool acolor);
	virtual void __fastcall AfterProc(Messages::TMessage &Message);
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
public:
	#pragma option push -w-inl
	/* TSkinControl.Create */ inline __fastcall virtual TSkinRadioButton(Classes::TComponent* AOwner) : 
		TSkinControl(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TSkinControl.Destroy */ inline __fastcall virtual ~TSkinRadioButton(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSkinStatusBar;
class PASCALIMPLEMENTATION TSkinStatusBar : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	void __fastcall Defaultpaint(Graphics::TCanvas* acanvas, const Windows::TRect &rc, int I, WideString 
		text, Classes::TAlignment Align);
	void __fastcall drawitem(HDC dc, const Windows::TRect &rc, int I, WideString text, Classes::TAlignment 
		Align);
	
public:
	bool SizeGrip;
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
public:
	#pragma option push -w-inl
	/* TSkinControl.Create */ inline __fastcall virtual TSkinStatusBar(Classes::TComponent* AOwner) : TSkinControl(
		AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TSkinControl.Destroy */ inline __fastcall virtual ~TSkinStatusBar(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSkinBox;
class PASCALIMPLEMENTATION TSkinBox : public TSkinControl 
{
	typedef TSkinControl inherited;
	
public:
	int border;
	virtual void __fastcall AfterProc(Messages::TMessage &Message);
	virtual void __fastcall Init(Classes::TComponent* sf, Winskindata::TSkinData* sd, Graphics::TCanvas* 
		acanvas, bool acolor);
	virtual void __fastcall Unsubclass(void);
public:
	#pragma option push -w-inl
	/* TSkinControl.Create */ inline __fastcall virtual TSkinBox(Classes::TComponent* AOwner) : TSkinControl(
		AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TSkinControl.Destroy */ inline __fastcall virtual ~TSkinBox(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSkinGroupBox;
class PASCALIMPLEMENTATION TSkinGroupBox : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	void __fastcall DefaultDraw(HDC dc, const Windows::TRect &rc);
	
public:
	int border;
	virtual void __fastcall Init(Classes::TComponent* sf, Winskindata::TSkinData* sd, Graphics::TCanvas* 
		acanvas, bool acolor);
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
public:
	#pragma option push -w-inl
	/* TSkinControl.Create */ inline __fastcall virtual TSkinGroupBox(Classes::TComponent* AOwner) : TSkinControl(
		AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TSkinControl.Destroy */ inline __fastcall virtual ~TSkinGroupBox(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSkinUpDown;
class PASCALIMPLEMENTATION TSkinUpDown : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	void __fastcall DrawButton(Graphics::TCanvas* acanvas, const Windows::TRect &rc, int n, int ar);
	void __fastcall DrawSkinButton(HDC dc, const Windows::TRect &rc, int n, int ar);
	void __fastcall DrawBackGround(const Messages::TMessage &msg);
	
public:
	bool inedit;
	int dir;
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
public:
	#pragma option push -w-inl
	/* TSkinControl.Create */ inline __fastcall virtual TSkinUpDown(Classes::TComponent* AOwner) : TSkinControl(
		AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TSkinControl.Destroy */ inline __fastcall virtual ~TSkinUpDown(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TSkinTabPosition { StTop, Stbottom, Stleft, Stright };
#pragma option pop

typedef DynamicArray<Windows::TRect >  WinSubClass__32;

class DELPHICLASS TSkinTab;
class PASCALIMPLEMENTATION TSkinTab : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	DynamicArray<Windows::TRect >  CloseRect;
	TSkinTabPosition Position;
	bool unicode;
	void __fastcall Drawitem(HDC dc, const Windows::TRect &rc, int I);
	void __fastcall ERASEBKGND(HDC dc);
	void __fastcall GetPosition(void);
	void __fastcall ClipUpdown(HDC dc, const Windows::TRect &rc);
	bool __fastcall FindScroll(void);
	void __fastcall DrawTabBorder(HDC adc);
	void __fastcall drawCloseBtn(const Windows::TRect &rc, int i);
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	bool __fastcall ClickClose(Messages::TMessage &Message);
	
public:
	Graphics::TBitmap* tabbmp;
	Graphics::TBitmap* borderbmp;
	Graphics::TBitmap* Drawtemp;
	TSkinUpDown* updown;
	bool showclose;
	__fastcall virtual TSkinTab(Classes::TComponent* AOwner);
	__fastcall virtual ~TSkinTab(void);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
	virtual void __fastcall Init(Classes::TComponent* sf, Winskindata::TSkinData* sd, Graphics::TCanvas* 
		acanvas, bool acolor);
	virtual void __fastcall Inithwnd(unsigned ahwnd, Winskindata::TSkinData* sd, Graphics::TCanvas* acanvas
		, Classes::TComponent* sf);
	void __fastcall inittab(void);
	virtual void __fastcall SkinChange(void);
};


class DELPHICLASS TSkinTab31;
class PASCALIMPLEMENTATION TSkinTab31 : public TSkinControl 
{
	typedef TSkinControl inherited;
	
protected:
	Graphics::TBitmap* tabbmp;
	TSkinUpDown* updown;
	Controls::TWinControl* scroller;
	
public:
	__fastcall virtual TSkinTab31(Classes::TComponent* AOwner);
	__fastcall virtual ~TSkinTab31(void);
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
	virtual void __fastcall Init(Classes::TComponent* sf, Winskindata::TSkinData* sd, Graphics::TCanvas* 
		acanvas, bool acolor);
	void __fastcall inittab(void);
	virtual void __fastcall SkinChange(void);
};


class DELPHICLASS TSkinTabBtn;
class PASCALIMPLEMENTATION TSkinTabBtn : public TSkinControl 
{
	typedef TSkinControl inherited;
	
public:
	virtual bool __fastcall BeforeProc(Messages::TMessage &Message);
	virtual void __fastcall DrawControl(HDC dc, const Windows::TRect &rc);
public:
	#pragma option push -w-inl
	/* TSkinControl.Create */ inline __fastcall virtual TSkinTabBtn(Classes::TComponent* AOwner) : TSkinControl(
		AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TSkinControl.Destroy */ inline __fastcall virtual ~TSkinTabBtn(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSkinTransObj;