mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-11 20:19:14 +02:00
win32: allow interception of LM_SYSCOMMAND (issue #0013442)
git-svn-id: trunk@25123 -
This commit is contained in:
parent
340c30848d
commit
0b8c73b16e
@ -2064,6 +2064,9 @@ begin
|
||||
WM_SYSCOMMAND:
|
||||
begin
|
||||
HandleSysCommand;
|
||||
LMessage.Msg := Msg;
|
||||
LMessage.WParam := WParam;
|
||||
LMessage.LParam := LParam;
|
||||
end;
|
||||
WM_SYSKEYDOWN:
|
||||
begin
|
||||
|
Loading…
Reference in New Issue
Block a user