You've already forked lazarus-ccr
* Remove ifdef for Get/SetBkColor since is already implemented in LCL
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1322 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -22589,16 +22589,11 @@ begin
|
|||||||
// Classical selection rectangle using dotted borderlines.
|
// Classical selection rectangle using dotted borderlines.
|
||||||
TextColorBackup := GetTextColor(Target.Handle);
|
TextColorBackup := GetTextColor(Target.Handle);
|
||||||
SetTextColor(Target.Handle, $FFFFFF);
|
SetTextColor(Target.Handle, $FFFFFF);
|
||||||
//todo: implement in LCL
|
|
||||||
{$ifndef INCOMPLETE_WINAPI}
|
|
||||||
BackColorBackup := GetBkColor(Target.Handle);
|
BackColorBackup := GetBkColor(Target.Handle);
|
||||||
SetBkColor(Target.Handle, 0);
|
SetBkColor(Target.Handle, 0);
|
||||||
{$endif}
|
|
||||||
Target.DrawFocusRect(SelectionRect);
|
Target.DrawFocusRect(SelectionRect);
|
||||||
SetTextColor(Target.Handle, TextColorBackup);
|
SetTextColor(Target.Handle, TextColorBackup);
|
||||||
{$ifndef INCOMPLETE_WINAPI}
|
|
||||||
SetBkColor(Target.Handle, BackColorBackup);
|
SetBkColor(Target.Handle, BackColorBackup);
|
||||||
{$endif}
|
|
||||||
end
|
end
|
||||||
else
|
else
|
||||||
begin
|
begin
|
||||||
@ -22820,11 +22815,8 @@ begin
|
|||||||
begin
|
begin
|
||||||
TextColorBackup := GetTextColor(Handle);
|
TextColorBackup := GetTextColor(Handle);
|
||||||
SetTextColor(Handle, $FFFFFF);
|
SetTextColor(Handle, $FFFFFF);
|
||||||
//todo: implement in LCL
|
|
||||||
{$ifndef INCOMPLETE_WINAPI}
|
|
||||||
BackColorBackup := GetBkColor(Handle);
|
BackColorBackup := GetBkColor(Handle);
|
||||||
SetBkColor(Handle, 0);
|
SetBkColor(Handle, 0);
|
||||||
{$endif}
|
|
||||||
|
|
||||||
{$ifdef ThemeSupport}
|
{$ifdef ThemeSupport}
|
||||||
//todo
|
//todo
|
||||||
@ -22850,9 +22842,7 @@ begin
|
|||||||
|
|
||||||
LCLIntf.DrawFocusRect(Handle, FocusRect);
|
LCLIntf.DrawFocusRect(Handle, FocusRect);
|
||||||
SetTextColor(Handle, TextColorBackup);
|
SetTextColor(Handle, TextColorBackup);
|
||||||
{$ifndef INCOMPLETE_WINAPI}
|
|
||||||
SetBkColor(Handle, BackColorBackup);
|
SetBkColor(Handle, BackColorBackup);
|
||||||
{$endif}
|
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
Reference in New Issue
Block a user