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

mbColorLib: Use single registration file (instead of one for each component). Facilitate usage of Layout for trackbars. Reformat code.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5462 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2016-12-11 22:56:25 +00:00
parent 8b1a85037f
commit 1accce10f1
37 changed files with 2193 additions and 1878 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
components/mbColorLib/SColorPicker.pas
View File

@ -40,22 +40,12 @@ type
property SelectedColor: TColor read GetSelectedColor write SetSelectedColor default clRed;
end;
procedure Register;
implementation
{$IFDEF FPC}
{$R SColorPicker.dcr}
{$ENDIF}
uses
mbUtils;
procedure Register;
begin
RegisterComponents('mbColor Lib', [TSColorPicker]);
end;
{ TSColorPicker }
constructor TSColorPicker.Create(AOwner: TComponent);
@ -63,8 +53,6 @@ begin
inherited;
FGradientWidth := 256;
FGradientHeight := 12;
Width := 267;
Height := 22;
FHue := 0;
FVal := 255;
FArrowPos := ArrowPosFromSat(0);