paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-13 15:39:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: remove redundant assignment in LCLSendActivateMsg(). Reported on forum by lagprogramming.

Browse Source
This commit is contained in:
Bart 2023-05-22 22:18:16 +02:00
parent 6f4b900b40
commit 0d14433fe7
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/lclmessageglue.pas
View File

@ -163,7 +163,6 @@ function LCLSendActivateMsg(const Target: TControl; Active: Word; Minimized: Boo
var
Mess: TLMActivate;
begin
Result := 0;
FillChar(Mess, SizeOf(Mess), 0);
Mess.Msg := LM_ACTIVATE;
Mess.Active := Active;