paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-05-29 22:22:47 +02:00
Code Issues Packages Projects Releases Wiki Activity

TCustomCheckBox.AllowGray defaults to false.

Browse Source 
git-svn-id: trunk@6540 -
This commit is contained in:
vincents 2005-01-11 13:25:23 +00:00
parent 70b4d7f37a
commit 73ba16e348
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/include/customcheckbox.inc
View File

@ -101,7 +101,7 @@ begin
Inherited Create(TheOwner); Inherited Create(TheOwner);
fCompStyle := csCheckbox; fCompStyle := csCheckbox;
FState := cbUnchecked; FState := cbUnchecked;
FAllowGrayed := True; FAllowGrayed := false;
TabStop := true; TabStop := true;
SetInitialBounds(0,0,90,23); SetInitialBounds(0,0,90,23);
AutoSize:=true; AutoSize:=true;
@ -227,6 +227,9 @@ end;
{ {
$Log$ $Log$
Revision 1.29 2005/01/11 13:25:23 vincents
TCustomCheckBox.AllowGray defaults to false.
Revision 1.28 2005/01/01 19:36:40 mattias Revision 1.28 2005/01/01 19:36:40 mattias
fixed loading TRadioButton.Checked fixed loading TRadioButton.Checked

5
lcl/stdctrls.pp
View File

@ -857,7 +857,7 @@ type
constructor Create(TheOwner: TComponent); override; constructor Create(TheOwner: TComponent); override;
public public
property AutoSize default true; property AutoSize default true;
property AllowGrayed: Boolean read FAllowGrayed write FAllowGrayed default True; property AllowGrayed: Boolean read FAllowGrayed write FAllowGrayed default false;
property State: TCheckBoxState read GetState write SetState; property State: TCheckBoxState read GetState write SetState;
property TabStop default true; property TabStop default true;
property UseOnChange; property UseOnChange;
@ -1216,6 +1216,9 @@ end.
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.182 2005/01/11 13:25:23 vincents
TCustomCheckBox.AllowGray defaults to false.
Revision 1.181 2005/01/08 22:13:21 vincents Revision 1.181 2005/01/08 22:13:21 vincents
TLabel.ShowAccelChar default value is True TLabel.ShowAccelChar default value is True