pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

fix RxDateEdit

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1203 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2010-04-23 16:32:38 +00:00
parent dd05680bf4
commit d402565a9a
3 changed files with 31 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
components/rx/rxtoolbar.pas
View File

@@ -235,7 +235,7 @@ type
property ToolBarStyle:TToolBarStyle read FToolBarStyle write SetToolBarStyle default tbsStandart;
property Options:TToolPanelOptions read FOptions write SetOptions;
property Version: Integer read FVersion write FVersion default 0;
property ButtonAllign:TToolButtonAllign read FButtonAllign write SetButtonAllign;
property ButtonAllign:TToolButtonAllign read FButtonAllign write SetButtonAllign default tbaLeft;
property Align;
property Alignment;
@@ -1156,6 +1156,7 @@ begin
inherited Create(AOwner);
FArrowBmp:=CreateArrowBitmap;
AutoSize:=false;
FButtonAllign:=tbaLeft;
FToolbarItems:=TToolbarItems.Create(Self);
if Assigned(AOwner) and not (csLoading in AOwner.ComponentState) then
Align:=alTop;