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

lazbarcodes: Publish some inherited properties.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6139 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2018-01-16 11:25:47 +00:00
parent 022167f11e
commit 8a83458360
3 changed files with 28 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
components/lazbarcodes/src/ubarcodes.pas
View File

@ -48,6 +48,26 @@ published
property ForegroundColor: TColor read GetForegroundColor write SetForegroundColor default clBlack;
property Width default 88;
property Height default 88;
property OnPaint;
property OnResize;
property OnShowHint;
property OnClick;
property OnDblClick;
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
property OnMouseEnter;
property OnMouseLeave;
property OnMouseWheel;
property OnMouseWheelDown;
property OnMouseWheelUp;
property OnDragDrop;
property OnDragOver;
property OnEndDock;
property OnEndDrag;
property OnStartDock;
property OnStartDrag;
end;
{ TLazBarcodeCustomText }
@ -287,8 +307,7 @@ begin
FBackgroundColor:=clWhite;
FForegroundColor:=clBlack;
FStrictSize:=true;
Width := 88;
Height := 88;
SetInitialBounds(0,0,88,88);
end;
destructor TLazBarcodeCustomBase.Destroy;