lcl: fix 64bit compilation

git-svn-id: trunk@20827 -
This commit is contained in:
paul 2009-07-11 09:50:10 +00:00
parent fa55843c1f
commit 922c8cc1c7

View File

@ -414,7 +414,7 @@ begin
end;
end;
function TApplication.HelpCommand(Command: Word; Data: Longint): Boolean;
function TApplication.HelpCommand(Command: Word; Data: PtrInt): Boolean;
var
CallHelp: Boolean;
begin