paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-16 06:29:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

* use far pointers in the declaration of MessageBox

Browse Source 
git-svn-id: trunk@31563 -
This commit is contained in:
nickysn 2015-09-06 22:46:51 +00:00
parent 297c17d4f0
commit e62c276672
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/win16/system.pp
View File

@ -90,7 +90,7 @@ const
{$endif RTLLITE} {$endif RTLLITE}
procedure MessageBox(hWnd: word; lpText, lpCaption: PChar; uType: word);external 'USER'; procedure MessageBox(hWnd: word; lpText, lpCaption: LPSTR; uType: word);external 'USER';
implementation implementation