paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-22 13:31:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed msghandler declarations

Browse Source
This commit is contained in:
peter 2003-04-23 11:22:12 +00:00
parent 128f4c117f
commit 4ac96d61d6
2 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
rtl/win32/wincrt.pp
View File

@ -140,8 +140,7 @@ unit wincrt;
ctrlkey : boolean = false;
shiftkey : boolean = false;
function msghandler(Window: hwnd; AMessage, WParam,
LParam: Longint): Longint;
function msghandler(Window: hwnd; AMessage, WParam: Longword; LParam: Longint): Longint;
begin
case amessage of
@ -226,7 +225,10 @@ begin
end.
{
$Log$
Revision 1.3 2002-09-07 16:01:29 peter
Revision 1.4 2003-04-23 11:22:12 peter
* fixed msghandler declarations
Revision 1.3 2002/09/07 16:01:29 peter
* old logs removed and tabs fixed
}

8
rtl/win32/winmouse.pp
View File

@ -126,8 +126,7 @@ unit winmouse;
Windows.ShowCursor(false);
end;
function msghandler(Window: hwnd; AMessage, WParam,
LParam: Longint): Longint;
function msghandler(Window: hwnd; AMessage, WParam: Longword; LParam: Longint): Longint;
begin
{ we catch the double click messages here too, }
@ -200,7 +199,10 @@ unit winmouse;
end.
{
$Log$
Revision 1.4 2002-09-07 16:01:29 peter
Revision 1.5 2003-04-23 11:22:12 peter
* fixed msghandler declarations
Revision 1.4 2002/09/07 16:01:29 peter
* old logs removed and tabs fixed
}