You've already forked lazarus-ccr
jvcllaz: Fix Linux issues (CommCtrl)
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5448 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -207,6 +207,9 @@ const
|
||||
|
||||
DT_PATH_ELLIPSIS = $4000;
|
||||
|
||||
COLORONCOLOR = 3;
|
||||
STRETCH_DELETESCANS = COLORONCOLOR;
|
||||
|
||||
|
||||
const
|
||||
KeyboardShiftStates = [ssShift, ssAlt, ssCtrl];
|
||||
|
@ -855,11 +855,11 @@ function ReplaceImageListReference(This: TComponent; NewReference: TCustomImageL
|
||||
implementation
|
||||
|
||||
uses
|
||||
sysutils, LCLIntf,
|
||||
sysutils, LCLIntf, GraphType, Math, Forms,
|
||||
{$IFDEF MSWINDOWS}
|
||||
CommCtrl,
|
||||
{$ENDIF}
|
||||
math, JvConsts, JvJCLUtils;
|
||||
JvConsts, JvJCLUtils;
|
||||
(********************
|
||||
SysConst,
|
||||
Consts,
|
||||
@ -2057,7 +2057,7 @@ begin
|
||||
{$IFDEF MSWINDOWS}
|
||||
ImageList_Draw(Images.Handle, Index, Handle, 0, 0, ILD_MASK);
|
||||
{$ELSE}
|
||||
ImageList_Draw ????
|
||||
Images.GetBitmap(Index, Bmp, gdeDisabled); // to do: test this
|
||||
{$ENDIF}
|
||||
end;
|
||||
Bmp.Monochrome := True;
|
||||
|
Reference in New Issue
Block a user