mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-17 18:19:34 +02:00
lm_setcursor deprecated, use `lcl\' way of cursor management
git-svn-id: trunk@5397 -
This commit is contained in:
parent
5c6cbc475a
commit
d6d3a9ea40
@ -1397,7 +1397,7 @@ begin
|
||||
end;
|
||||
if ACursor<>LastFormCursor then begin
|
||||
LastFormCursor:=ACursor;
|
||||
CNSendMessage(LM_SETCURSOR, Form, Pointer(Integer(ACursor)));
|
||||
Form.Cursor:=ACursor;
|
||||
end;
|
||||
|
||||
exit;
|
||||
|
Loading…
Reference in New Issue
Block a user