You've already forked lazarus-ccr
* Make BorderStyle default to bsSingle
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1050 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@@ -3442,7 +3442,7 @@ type
|
|||||||
//property BevelKind;
|
//property BevelKind;
|
||||||
//property BevelWidth;
|
//property BevelWidth;
|
||||||
property BorderSpacing;
|
property BorderSpacing;
|
||||||
property BorderStyle;
|
property BorderStyle default bsSingle;
|
||||||
property BottomSpace;
|
property BottomSpace;
|
||||||
property ButtonFillMode;
|
property ButtonFillMode;
|
||||||
property ButtonStyle;
|
property ButtonStyle;
|
||||||
@@ -3690,7 +3690,7 @@ type
|
|||||||
//property BevelKind;
|
//property BevelKind;
|
||||||
// property BevelWidth;
|
// property BevelWidth;
|
||||||
property BorderSpacing;
|
property BorderSpacing;
|
||||||
property BorderStyle;
|
property BorderStyle default bsSingle;
|
||||||
property BottomSpace;
|
property BottomSpace;
|
||||||
property ButtonFillMode;
|
property ButtonFillMode;
|
||||||
property ButtonStyle;
|
property ButtonStyle;
|
||||||
@@ -11953,7 +11953,7 @@ begin
|
|||||||
FHotPlusBM := TBitmap.Create;
|
FHotPlusBM := TBitmap.Create;
|
||||||
FMinusBM := TBitmap.Create;
|
FMinusBM := TBitmap.Create;
|
||||||
FHotMinusBM := TBitmap.Create;
|
FHotMinusBM := TBitmap.Create;
|
||||||
//FBorderStyle := bsSingle;
|
BorderStyle := bsSingle;
|
||||||
FButtonStyle := bsRectangle;
|
FButtonStyle := bsRectangle;
|
||||||
FButtonFillMode := fmTreeColor;
|
FButtonFillMode := fmTreeColor;
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user