通过继承实现不同的CheckBox风格

VCL中的TCheckBox控件在选中时显示的是个“√”，但有的时候需要显示为“×”，下面这段代码是cker写的，实现了这个效果。
// 通过继承实现不同的CheckBox风格
// 代码作者：cker
//---------------------------------------------------------------------------
class TXCheckBox : public TCustomControl
{
private:
bool FDown;
TCheckBoxState FState;
bool FFocused;
TColor FCheckColor;
public:
__fastcall TXCheckBox(TComponent* AOwner);
protected:
void __fastcall Paint();

DYNAMIC void __fastcall MouseDown(TMouseButton Button, TShiftState Shift, int X, int Y);
DYNAMIC void __fastcall MouseUp(TMouseButton Button, TShiftState Shift, int X, int Y);
DYNAMIC void __fastcall MouseMove(TShiftState Shift, int X, int Y);

DYNAMIC void __fastcall KeyDown(Word &Key, TShiftState Shift);
DYNAMIC void __fastcall KeyUp(Word &Key, TShiftState Shift);

void __fastcall SetDown(bool Value);
void __fastcall SetState(TCheckBoxState Value);
void __fastcall SetChecked(bool Value);
bool __fastcall GetChecked();
void __fastcall SetCheckColor(TColor Value);
void __fastcall SetCaption(const TCaption& Value);
TCaption __fastcall GetCaption();

DYNAMIC void __fastcall DoEnter(void);
DYNAMIC void __fastcall DoExit(void);

__published:
__property TCaption Caption = {read=GetCaption, write=SetCaption};
__property TColor CheckColor = {read=FCheckColor, write=SetCheckColor, default=clBlack};
__property bool Checked = {read=GetChecked, write=SetChecked, default=false};
__property bool Down = {read=FDown, write=SetDown, default=false};
__property DragCursor;
__property DragMode;
__property Enabled;
__property Font;
__property ParentFont;
__property PopupMenu;
__property ShowHint;
__property TCheckBoxState State = {read=FState, write=SetState, default=cbUnchecked};
__property TabOrder;
__property TabStop;
__property OnClick;
__property OnDragDrop;
__property OnDragOver;
__property OnEndDrag;
__property OnKeyDown;
__property OnKeyPress;
__property OnKeyUp;
__property OnMouseDown;
__property OnMouseMove;
__property OnMouseUp;
};

__fastcall TXCheckBox::TXCheckBox(TComponent* AOwner):TCustomControl(AOwner)

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有