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

TRxDateEdit - publish property Spacing (from lazarus rev. 51277)

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4423 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2016-01-15 11:58:38 +00:00
parent cd836a393b
commit 38f29ba1b9
2 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
components/rx/trunk/rxlookup.pas
View File

@ -131,6 +131,8 @@ type
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
published
property Spacing default 0;
end;
TRxLookupEdit = class(TRxCustomDBLookupEdit)
@ -614,6 +616,7 @@ var
P:TBitmap;
begin
inherited Create(AOwner);
Spacing:=0;
FLocateObject:=CreateLocate(nil);
//Lookup

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

@ -198,6 +198,7 @@ type
property WeekendColor;
property Weekends;
property YearDigits;
property Spacing default 0;
property OnAcceptDate;
property OnChange;
@ -376,6 +377,7 @@ end;
constructor TRxDateEdit.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
Spacing:=0;
UpdateMask;
end;