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

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

View File

@@ -44,22 +44,11 @@ type
property Layout default lyVertical;
end;
procedure Register;
implementation
{$IFDEF FPC}
{$R YColorPicker.dcr}
{$ENDIF}
uses
mbUtils;
procedure Register;
begin
RegisterComponents('mbColor Lib', [TYColorPicker]);
end;
{TYColorPicker}
constructor TYColorPicker.Create(AOwner: TComponent);
@@ -67,15 +56,13 @@ begin
inherited;
FGradientWidth := 255;
FGradientHeight := 12;
Width := 22;
Height := 267;
Layout := lyVertical;
FYellow := 255;
FMagenta := 0;
FCyan := 0;
FBlack := 0;
FArrowPos := ArrowPosFromYellow(255);
FChange := false;
Layout := lyVertical;
SetYellow(255);
HintFormat := 'Yellow: %value';
FManual := false;