wwcheckbox.hpp

胜天进销存源码,国产优秀的进销存

	__property Visible  = {default=1};
	__property OnClick ;
	__property OnContextPopup ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDock ;
	__property OnEndDrag ;
	__property OnEnter ;
	__property OnExit ;
	__property OnKeyDown ;
	__property OnKeyPress ;
	__property OnKeyUp ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnMouseEnter ;
	__property OnMouseLeave ;
	__property OnStartDock ;
	__property OnStartDrag ;
	__property bool ReadOnly = {read=GetReadOnly, write=SetReadOnly, default=0};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TwwDBCustomCheckBox(HWND ParentWindow) : TwwCustomCheckBox(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TwwCheckBox;
class PASCALIMPLEMENTATION TwwCheckBox : public TwwDBCustomCheckBox 
{
	typedef TwwDBCustomCheckBox inherited;
	
__published:
	__property Controller ;
	__property DisableThemes ;
	__property AlwaysTransparent ;
	__property Frame ;
	__property DynamicCaption  = {default=0};
	__property ValueChecked ;
	__property ValueUnchecked ;
	__property DisplayValueChecked ;
	__property DisplayValueUnchecked ;
	__property ShowFocusRect  = {default=1};
	__property NullAndBlankState ;
	__property Indents ;
	__property Action ;
	__property Alignment  = {default=1};
	__property AllowGrayed  = {default=0};
	__property Anchors  = {default=3};
	__property BiDiMode ;
	__property Caption ;
	__property Checked  = {default=0};
	__property Color ;
	__property Constraints ;
	__property CenterTextVertically  = {default=1};
	__property Ctl3D ;
	__property DataField ;
	__property DataSource ;
	__property DragCursor  = {default=-12};
	__property DragKind  = {default=0};
	__property DragMode  = {default=0};
	__property Enabled  = {default=1};
	__property Font ;
	__property Images ;
	__property ParentBiDiMode  = {default=1};
	__property ParentColor  = {default=1};
	__property ParentCtl3D  = {default=1};
	__property ParentFont  = {default=1};
	__property ParentShowHint  = {default=1};
	__property PopupMenu ;
	__property ShowHint ;
	__property ShowText  = {default=1};
	__property State  = {default=0};
	__property TabOrder  = {default=-1};
	__property TabStop  = {default=1};
	__property Visible  = {default=1};
	__property OnClick ;
	__property OnContextPopup ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDock ;
	__property OnEndDrag ;
	__property OnEnter ;
	__property OnExit ;
	__property OnKeyDown ;
	__property OnKeyPress ;
	__property OnKeyUp ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnMouseEnter ;
	__property OnMouseLeave ;
	__property OnStartDock ;
	__property OnStartDrag ;
	__property ReadOnly  = {default=0};
public:
	#pragma option push -w-inl
	/* TwwDBCustomCheckBox.Create */ inline __fastcall virtual TwwCheckBox(Classes::TComponent* AOwner) : TwwDBCustomCheckBox(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TwwDBCustomCheckBox.Destroy */ inline __fastcall virtual ~TwwCheckBox(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TwwCheckBox(HWND ParentWindow) : TwwDBCustomCheckBox(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TwwExpandGridIndents;
class PASCALIMPLEMENTATION TwwExpandGridIndents : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	Controls::TWinControl* FWinControl;
	int FIndentX;
	int FIndentY;
	
public:
	__fastcall TwwExpandGridIndents(Classes::TComponent* AOwner);
	
__published:
	__property int X = {read=FIndentX, write=FIndentX, default=0};
	__property int Y = {read=FIndentY, write=FIndentY, default=0};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TwwExpandGridIndents(void) { }
	#pragma option pop
	
};


class DELPHICLASS TwwExpandButton;
typedef void __fastcall (__closure *TwwCheckVisibleButton)(TwwExpandButton* Sender, Db::TDataSet* DataSet, bool &AShowExpand);

class PASCALIMPLEMENTATION TwwExpandButton : public TwwDBCustomCheckBox 
{
	typedef TwwDBCustomCheckBox inherited;
	
private:
	Classes::TAlignment FButtonAlignment;
	Controls::TWinControl* FGrid;
	Controls::TImageList* FExpandImages;
	bool FAutoShrink;
	Classes::TNotifyEvent FOnBeforeExpand;
	Classes::TNotifyEvent FOnBeforeCollapse;
	Classes::TNotifyEvent FOnAfterExpand;
	Classes::TNotifyEvent FOnAfterCollapse;
	bool FAutoHideExpand;
	bool InClickEvent;
	TwwExpandGridIndents* FGridIndents;
	TwwCheckVisibleButton FOnCheckVisibleButton;
	int BeforeExpandHeightOfParentGrid;
	int BeforeExpandRowHeight;
	HIDESBASE MESSAGE void __fastcall BMSetCheck(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall CMExit(Messages::TWMNoParams &Message);
	HIDESBASE MESSAGE void __fastcall CMShowingChanged(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Messages::TWMEraseBkgnd &Message);
	HIDESBASE MESSAGE void __fastcall WMKillFocus(Messages::TWMKillFocus &Message);
	HIDESBASE MESSAGE void __fastcall WMLButtonUp(Messages::TWMMouse &Message);
	void __fastcall SetGrid(Controls::TWinControl* value);
	void __fastcall SetExpanded(bool val);
	bool __fastcall GetExpanded(void);
	
protected:
	int OriginalHeight;
	virtual void __fastcall WndProc(Messages::TMessage &Message);
	virtual Classes::TAlignment __fastcall GetAlignment(void);
	virtual AnsiString __fastcall GetDisplayText();
	virtual int __fastcall GetExtraIndentX(void);
	virtual Controls::TImageList* __fastcall GetImageList(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	virtual void __fastcall Toggle(void);
	virtual void __fastcall DataChange(System::TObject* Sender);
	virtual Stdctrls::TCheckBoxState __fastcall GetFieldState(void);
	virtual bool __fastcall FillBackground(void);
	virtual void __fastcall DoBeforeExpand(void);
	virtual void __fastcall DoBeforeCollapse(void);
	virtual void __fastcall DoAfterExpand(void);
	virtual void __fastcall DoAfterCollapse(void);
	virtual bool __fastcall HideExpand(void);
	virtual int __fastcall GetDrawFlags(void);
	
public:
	bool PaintAsExpanded;
	int DesiredRow;
	int ExpandedGridRow;
	bool InRefreshCalcField;
	bool InToggle;
	__fastcall virtual TwwExpandButton(Classes::TComponent* AOwner);
	__fastcall virtual ~TwwExpandButton(void);
	void __fastcall ResetHeight(void);
	DYNAMIC void __fastcall Click(void);
	__property bool Expanded = {read=GetExpanded, write=SetExpanded, nodefault};
	void __fastcall RefreshCalcField(void);
	void __fastcall ExpandAfterDelay(void);
	
__published:
	__property DisableThemes ;
	__property Controls::TWinControl* Grid = {read=FGrid, write=SetGrid};
	__property bool AutoShrink = {read=FAutoShrink, write=FAutoShrink, default=1};
	__property TextAlignment  = {default=0};
	__property bool AutoHideExpand = {read=FAutoHideExpand, write=FAutoHideExpand, default=0};
	__property ShowFocusRect  = {default=1};
	__property Classes::TNotifyEvent OnBeforeExpand = {read=FOnBeforeExpand, write=FOnBeforeExpand};
	__property Classes::TNotifyEvent OnBeforeCollapse = {read=FOnBeforeCollapse, write=FOnBeforeCollapse};
	__property Classes::TNotifyEvent OnAfterExpand = {read=FOnAfterExpand, write=FOnAfterExpand};
	__property Classes::TNotifyEvent OnAfterCollapse = {read=FOnAfterCollapse, write=FOnAfterCollapse};
	__property TwwCheckVisibleButton OnCheckVisibleButton = {read=FOnCheckVisibleButton, write=FOnCheckVisibleButton};
	__property TwwExpandGridIndents* GridIndents = {read=FGridIndents, write=FGridIndents};
	__property BiDiMode ;
	__property Caption ;
	__property Color ;
	__property Constraints ;
	__property DataField ;
	__property DataSource ;
	__property Enabled  = {default=1};
	__property Font ;
	__property Images ;
	__property ParentBiDiMode  = {default=1};
	__property ParentColor  = {default=1};
	__property Indents ;
	__property ShowAsButton  = {default=0};
	__property ShowText  = {default=0};
	__property ParentFont  = {default=1};
	__property ParentShowHint  = {default=1};
	__property PopupMenu ;
	__property ShowHint ;
	__property TabOrder  = {default=-1};
	__property TabStop  = {default=1};
	__property Visible  = {default=1};
	__property Classes::TAlignment ButtonAlignment = {read=FButtonAlignment, write=FButtonAlignment, default=0};
	__property OnContextPopup ;
	__property OnEnter ;
	__property OnExit ;
	__property OnKeyDown ;
	__property OnKeyPress ;
	__property OnKeyUp ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnMouseEnter ;
	__property OnMouseLeave ;
	__property ReadOnly  = {default=0};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TwwExpandButton(HWND ParentWindow) : TwwDBCustomCheckBox(ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------

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

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