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

RxDBGrid - RxColumn.Footer.DisplayText make public

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3246 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2014-06-27 07:50:55 +00:00
parent 37ab39c47d
commit 8a1b12a9ec
2 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
components/rx/trunk/rxdaterangeeditunit.pas
View File

@ -209,6 +209,7 @@ begin
FEditYear:=TSpinEdit.Create(Self);
FEditMonth:=TComboBox.Create(Self);
FEditMonth.Style:=csDropDownList;
FEditMonth.DropDownCount:=12;
FEditYear.Width:=70;
FEditMonth.Width:=80;

2
components/rx/trunk/rxdbgrid.pas
View File

@ -267,7 +267,6 @@ type
procedure SetLayout(const AValue: TTextLayout);
procedure SetValue(const AValue: string);
procedure SetValueType(const AValue: TFooterValueType);
function DisplayText: string;
function GetFieldValue: string;
function GetRecordsCount: string;
function GetRecNo: string;
@ -284,6 +283,7 @@ type
constructor Create(Owner: TRxColumn);
property Owner: TRxColumn read FOwner;
property NumericValue: double read FTestValue;
function DisplayText: string;
published
property Alignment: TAlignment read FAlignment write SetAlignment default
taLeftJustify;