TIACheckControl v 1.0

This component is for replacing of standart TCheckBox and TRadioButton with a number of original/user styles multiline/3D and so one...

Content:

1. Installation

Delphi 4

Enter component directory and open file checkcontrol.dpk and click install and after that save button

Delphi 5
Installing so easy as at Delphi 4 except at opening the *.dpk file you will asked for package conversion at new format, SO please press ok to that question.

Enter component directory and open file checkcontrol.dpk and click install and after that save button

2. Shot description

Component Provide next:

Coulld be used as CheckBox or RadioButton
Supports Group Indexes - so no need in group boxies
Multiline Text Supporting with 3 alining styles
Vertical and horizontal 8 types of aligning of text/check fields
4 original styles + User Bitmap style by TImageList using
Any Angle of Text Field Supports
Supports Mouse and Keyboard/checking/focusing
Any Colors
Could be transparent

3. Full description

Property	Value	Description
ControlType	TIACheckControlType	Type of Control - CheckBox or RadioButton
TextAngle	0	Ange of text field
TextLines	TStringList	Lines of Text
GroupIndex	0	Group Index for RadioButton Type
Checked	Boolean	Is selector checked?
Style	TIACheckControlStyle	One of original or user Style
ImageList	TImageList	Image List with 4 Bitmaps /not checked/checked/disabled/disabled checked
TextAlign	TIACheckControlTextHAlign	Text Alining
TextFieldVerticalAlign	TIACheckControlTextVAlign	Text and Bitmap fields vertical aligning
TextFieldHorizontalAlign	TIACheckControlTextHAlign	Text and Bitmap fields horizontal aligning
CheckFieldColor1	TColor	One of user colors
CheckFieldColor2	TColor	Second user color
GapTextToImage	4	-Gap from text field to Bitmap field-
Transparent	TRUE	is the control transparent?
ShowFocus	TRUE	Show or no the focus
Text3DStyle	TIACheckControlText3DStyle	3D text Style

Events

property OnChangeState : TIACheckControlChangeStateProcedure read FOnChangeState write SetOnChangeState;
TIACheckControlChangeStateProcedure = procedure(ASender : TPersistent;ANewStateSelected : Boolean) of object;
On Change of Selection State

At begin

4. License

Free for non-commerce aims. At other case please ask author for permission.