acsbutils.hpp

I mComputermaster programmisDelphi+pascal

// Borland C++ Builder
// Copyright (c) 1995, 2002 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'acSBUtils.pas' rev: 6.00

#ifndef acSBUtilsHPP
#define acSBUtilsHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <TypInfo.hpp>	// Pascal unit
#include <sConst.hpp>	// Pascal unit
#include <StdCtrls.hpp>	// Pascal unit
#include <ComCtrls.hpp>	// Pascal unit
#include <Types.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <ExtCtrls.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <sSkinManager.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <sCommonData.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

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

namespace Acsbutils
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TDropMarkMode { dmmNone, dmmLeft, dmmRight };
#pragma option pop

#pragma pack(push, 4)
struct THeaderPaintInfo
{
	Graphics::TCanvas* TargetCanvas;
	Classes::TCollectionItem* Column;
	Types::TRect PaintRectangle;
	Types::TRect TextRectangle;
	bool IsHoverIndex;
	bool IsDownIndex;
	bool IsEnabled;
	bool ShowHeaderGlyph;
	bool ShowSortGlyph;
	bool ShowRightBorder;
	TDropMarkMode DropMark;
	Types::TPoint GlyphPos;
	Types::TPoint SortGlyphPos;
} ;
#pragma pack(pop)

#pragma option push -b-
enum acSBUtils__1 { hpeBackground, hpeDropMark, hpeHeaderGlyph, hpeSortGlyph, hpeText };
#pragma option pop

typedef Set<acSBUtils__1, hpeBackground, hpeText>  THeaderPaintElements;

typedef void __fastcall (__closure *TAdvancedHeaderPaintEvent)(Classes::TPersistent* Sender, THeaderPaintInfo &PaintInfo, const THeaderPaintElements Elements);

typedef void __fastcall (__closure *THeaderPaintQueryElementsEvent)(Classes::TPersistent* Sender, THeaderPaintInfo &PaintInfo, THeaderPaintElements &Elements);

class DELPHICLASS TacScrollBar;
class DELPHICLASS TacScrollWnd;
class DELPHICLASS TacMainWnd;
class PASCALIMPLEMENTATION TacMainWnd : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	bool DlgMode;
	AnsiString Caption;
	#pragma pack(push, 1)
	Types::TRect WndRect;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	tagSIZE WndSize;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TPoint WndPos;
	#pragma pack(pop)
	
	#pragma pack(push, 1)
	Types::TRect ParentRect;
	#pragma pack(pop)
	
	HWND ParentWnd;
	Classes::TWndMethod OldWndProc;
	void *OldProc;
	HWND CtrlHandle;
	Sskinmanager::TsSkinManager* SkinManager;
	Scommondata::TsCommonData* SkinData;
	bool DontRepaint;
	bool ParamsChanged;
	Graphics::TColor StdColor;
	Graphics::TColor StdFontColor;
	bool Destroyed;
	bool OwnSkinData;
	void *NewWndProcInstance;
	__fastcall virtual TacMainWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint);
	virtual void __fastcall SaveStdParams(void);
	virtual void __fastcall RestoreStdParams(void);
	virtual void __fastcall SetSkinParams(void);
	__fastcall virtual ~TacMainWnd(void);
	int __fastcall CallPrevWndProc(HWND Handle, int Msg, int WParam, int &LParam);
	virtual void __fastcall acWndProc(Messages::TMessage &Message);
};


class PASCALIMPLEMENTATION TacScrollWnd : public TacMainWnd 
{
	typedef TacMainWnd inherited;
	
public:
	Word bars;
	TacScrollBar* sBarHorz;
	TacScrollBar* sBarVert;
	bool fThumbTracking;
	bool fLeftScrollbar;
	int cxLeftEdge;
	int cxRightEdge;
	int cyTopEdge;
	int cyBottomEdge;
	bool bPreventStyleChange;
	__fastcall virtual ~TacScrollWnd(void);
	virtual void __fastcall acWndProc(Messages::TMessage &Message);
public:
	#pragma option push -w-inl
	/* TacMainWnd.Create */ inline __fastcall virtual TacScrollWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint) : TacMainWnd(AHandle, ASkinData, ASkinManager, SkinSection, Repaint) { }
	#pragma option pop
	
};


class PASCALIMPLEMENTATION TacScrollBar : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	Word fScrollFlags;
	bool fScrollVisible;
	#pragma pack(push, 1)
	tagSCROLLINFO ScrollInfo;
	#pragma pack(pop)
	
	int nArrowLength;
	int nArrowWidth;
	int nButSizeBefore;
	int nButSizeAfter;
	bool fButVisibleBefore;
	bool fButVisibleAfter;
	Word nBarType;
	Word fFlatScrollbar;
	int nMinThumbSize;
	TacScrollWnd* sw;
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TacScrollBar(void) : System::TObject() { }
	#pragma option pop
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TacScrollBar(void) { }
	#pragma option pop
	
};


class DELPHICLASS TacStaticWnd;
class PASCALIMPLEMENTATION TacStaticWnd : public TacMainWnd 
{
	typedef TacMainWnd inherited;
	
public:
	void __fastcall AC_WMPaint(Messages::TWMPaint &Message);
	virtual void __fastcall PaintText(void);
	virtual void __fastcall acWndProc(Messages::TMessage &Message);
public:
	#pragma option push -w-inl
	/* TacMainWnd.Create */ inline __fastcall virtual TacStaticWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint) : TacMainWnd(AHandle, ASkinData, ASkinManager, SkinSection, Repaint) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TacMainWnd.Destroy */ inline __fastcall virtual ~TacStaticWnd(void) { }
	#pragma option pop
	
};


class DELPHICLASS TacIconWnd;
class PASCALIMPLEMENTATION TacIconWnd : public TacStaticWnd 
{
	typedef TacStaticWnd inherited;
	
public:
	virtual void __fastcall PaintText(void);
public:
	#pragma option push -w-inl
	/* TacMainWnd.Create */ inline __fastcall virtual TacIconWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint) : TacStaticWnd(AHandle, ASkinData, ASkinManager, SkinSection, Repaint) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TacMainWnd.Destroy */ inline __fastcall virtual ~TacIconWnd(void) { }
	#pragma option pop
	
};


class DELPHICLASS TacDlgPanelWnd;
class PASCALIMPLEMENTATION TacDlgPanelWnd : public TacMainWnd 
{
	typedef TacMainWnd inherited;
	
public:
	Extctrls::TPanel* Panel;
	__fastcall virtual TacDlgPanelWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint);
	DYNAMIC void __fastcall PrepareCache(void);
	void __fastcall AC_WMNCPaint(HDC aDC);
	void __fastcall AC_WMPaint(HDC aDC);
	virtual void __fastcall acWndProc(Messages::TMessage &Message);
	virtual void __fastcall SetSkinParams(void);
public:
	#pragma option push -w-inl
	/* TacMainWnd.Destroy */ inline __fastcall virtual ~TacDlgPanelWnd(void) { }
	#pragma option pop
	
};


class DELPHICLASS TacLinkWnd;
class PASCALIMPLEMENTATION TacLinkWnd : public TacStaticWnd 
{
	typedef TacStaticWnd inherited;
	
public:
	virtual void __fastcall PaintText(void);
public:
	#pragma option push -w-inl
	/* TacMainWnd.Create */ inline __fastcall virtual TacLinkWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint) : TacStaticWnd(AHandle, ASkinData, ASkinManager, SkinSection, Repaint) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TacMainWnd.Destroy */ inline __fastcall virtual ~TacLinkWnd(void) { }
	#pragma option pop
	
};


class DELPHICLASS TacBtnWnd;
class PASCALIMPLEMENTATION TacBtnWnd : public TacMainWnd 
{
	typedef TacMainWnd inherited;
	
public:
	unsigned __fastcall CtrlStyle(void);
	bool __fastcall Down(void);
	int __fastcall CurrentState(void);
	DYNAMIC void __fastcall DrawCaption(void);
	DYNAMIC void __fastcall DrawGlyph(void);
	DYNAMIC tagSIZE __fastcall GlyphSize();
	DYNAMIC void __fastcall DoDrawText(Types::TRect &Rect, int Flags);
	DYNAMIC Types::TRect __fastcall CaptionRect();
	DYNAMIC int __fastcall MaxCaptionWidth(void);
	DYNAMIC tagSIZE __fastcall TextRectSize();
	DYNAMIC void __fastcall PrepareCache(void);
	void __fastcall AC_WMPaint(const Messages::TWMPaint &Message);
	virtual void __fastcall acWndProc(Messages::TMessage &Message);
	virtual void __fastcall RestoreStdParams(void);
	virtual void __fastcall SetSkinParams(void);
public:
	#pragma option push -w-inl
	/* TacMainWnd.Create */ inline __fastcall virtual TacBtnWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint) : TacMainWnd(AHandle, ASkinData, ASkinManager, SkinSection, Repaint) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TacMainWnd.Destroy */ inline __fastcall virtual ~TacBtnWnd(void) { }
	#pragma option pop
	
};


class DELPHICLASS TacBitBtnWnd;
class PASCALIMPLEMENTATION TacBitBtnWnd : public TacBtnWnd 
{
	typedef TacBtnWnd inherited;
	
public:
	HBITMAP hBmp;
	HICON hIco;
	DYNAMIC Types::TRect __fastcall CaptionRect();
	Types::TRect __fastcall GlyphRect();
	DYNAMIC tagSIZE __fastcall GlyphSize();
	DYNAMIC void __fastcall DrawGlyph(void);
	DYNAMIC int __fastcall MaxCaptionWidth(void);
public:
	#pragma option push -w-inl
	/* TacMainWnd.Create */ inline __fastcall virtual TacBitBtnWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint) : TacBtnWnd(AHandle, ASkinData, ASkinManager, SkinSection, Repaint) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TacMainWnd.Destroy */ inline __fastcall virtual ~TacBitBtnWnd(void) { }
	#pragma option pop
	
};


class DELPHICLASS TacSizerWnd;
class PASCALIMPLEMENTATION TacSizerWnd : public TacMainWnd 
{
	typedef TacMainWnd inherited;
	
public:
	void __fastcall AC_WMPaint(const Messages::TWMPaint &Message);
	virtual void __fastcall acWndProc(Messages::TMessage &Message);
public:
	#pragma option push -w-inl
	/* TacMainWnd.Create */ inline __fastcall virtual TacSizerWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint) : TacMainWnd(AHandle, ASkinData, ASkinManager, SkinSection, Repaint) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TacMainWnd.Destroy */ inline __fastcall virtual ~TacSizerWnd(void) { }
	#pragma option pop
	
};


class DELPHICLASS TacSpinWnd;
class PASCALIMPLEMENTATION TacSpinWnd : public TacMainWnd 
{
	typedef TacMainWnd inherited;
	
public:
	int lOffset;
	bool bMousePressed;
	int Btn1State;
	int Btn2State;
	virtual bool __fastcall IsVertical(void);
	__fastcall virtual TacSpinWnd(HWND AHandle, Scommondata::TsCommonData* ASkinData, Sskinmanager::TsSkinManager* ASkinManager, const AnsiString SkinSection, bool Repaint);
	void __fastcall PrepareCache(void);
	void __fastcall AC_WMPaint(const Messages::TWMPaint &Message);
	virtual void __fastcall acWndProc(Messages::TMessage &Message);
public:
	#pragma option push -w-inl