mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-30 23:30:30 +02:00
LCL: application: add ShowHintWindow To-Do
git-svn-id: trunk@53195 -
This commit is contained in:
parent
1185f73701
commit
6719f2a689
@ -766,7 +766,7 @@ procedure TApplication.ShowHintWindow(const Info: THintInfoAtMouse);
|
|||||||
|
|
||||||
function GetCursorHeightMargin: integer;
|
function GetCursorHeightMargin: integer;
|
||||||
begin
|
begin
|
||||||
Result:=25;
|
Result:=25; // To-Do: better height margin (DPI or cursor aware).
|
||||||
end;
|
end;
|
||||||
|
|
||||||
var
|
var
|
||||||
|
Loading…
Reference in New Issue
Block a user