jvcllaz: Less hints and warnings.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7466 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2020-05-23 08:13:16 +00:00
parent 50b17876b0
commit 3f5a223715
18 changed files with 40 additions and 64 deletions

View File

@@ -329,7 +329,7 @@ begin
inherited Create;
Self.Msg.Msg := AMsg;
Self.Msg.WParam := WParam;
Self.Msg.LParam := PtrInt(@LParam);
Self.Msg.LParam := {%H-}PtrInt(@LParam);
Self.Msg.Result := 0;
end;