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

mbColorLib: Rename internal FGradientBmp to FBufferBmp

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5501 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2016-12-15 09:05:53 +00:00
parent 9d70cf2465
commit b956e84c19
16 changed files with 81 additions and 78 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/mbColorLib/HexaColorPicker.pas
View File

@@ -333,7 +333,7 @@ begin
with OffScreen.Canvas do
begin
Pen.Style := psClear;
// draw color comb from FColorCombs array
// draw color combs from FColorCombs array
XOffs := FRadius + FColorCombRect.Left;
YOffs := FRadius + FColorCombRect.Top;
// draw the combs
@@ -375,7 +375,7 @@ begin
Brush.Color := FBWCombs[I].Color;
if I in [0, High(FBWCombs)] then
begin
if Pen.Color = clWhite then
if Pen.Color = clWhite then // "white" needs a border if background is white as well
Pen.Color := clGray;
DrawComb(OffScreen.Canvas, FBWCombs[I].Position.X + XOffs, FBWCombs[I].Position.Y + YOffs, 2 * FCombSize)
end else