paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-05 15:37:50 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: fixed wrong activation message. issue #41561

Browse Source
This commit is contained in:
zeljan1 2025-04-02 17:14:26 +02:00
parent f796680ac6
commit 441180f7e0
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/mainbar.pas
View File

@ -613,7 +613,7 @@ end;
procedure TMainIDEBar.WndProc(var Message: TLMessage); procedure TMainIDEBar.WndProc(var Message: TLMessage);
begin begin
inherited WndProc(Message); inherited WndProc(Message);
if (Message.Msg=LM_ACTIVATE) and (Message.Result=0) then if (Message.Msg=LM_ACTIVATE) and (Message.Result=0) and (Lo(Message.WParam) <> WA_INACTIVE) then
DoActive; DoActive;
end; end;