paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-05-31 01:43:55 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ Fixed getlocaltime incompatibility (bug 2075)

Browse Source
This commit is contained in:
michael 2002-10-11 09:37:40 +00:00
parent 364d023a60
commit c0a3affff0
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
rtl/win32/wininc/func.inc
View File

@ -238,6 +238,7 @@ procedure GetSystemTime(lpSystemTime:LPSYSTEMTIME); external 'kernel32' name 'Ge
procedure GetSystemTime(var lpSystemTime:SYSTEMTIME); external 'kernel32' name 'GetSystemTime';
function SetSystemTime(var lpSystemTime:SYSTEMTIME):WINBOOL; external 'kernel32' name 'SetSystemTime';
procedure GetLocalTime(lpSystemTime:LPSYSTEMTIME); external 'kernel32' name 'GetLocalTime';
procedure GetLocalTime(var SystemTime: SYSTEMTIME); external 'kernel32' name 'GetLocalTime';
function SetLocalTime(var lpSystemTime:SYSTEMTIME):WINBOOL; external 'kernel32' name 'SetLocalTime';
procedure GetSystemInfo(lpSystemInfo:LPSYSTEM_INFO); external 'kernel32' name 'GetSystemInfo';
procedure GetSystemInfo(var SystemInfo:SYSTEM_INFO); external 'kernel32' name 'GetSystemInfo';
@ -2301,7 +2302,10 @@ end;
{
$Log$
Revision 1.12 2002-10-02 19:30:52 florian
Revision 1.13 2002-10-11 09:37:40 michael
+ Fixed getlocaltime incompatibility (bug 2075)
Revision 1.12 2002/10/02 19:30:52 florian
+ GetSystemTime with var parameter added
Revision 1.11 2002/09/26 10:38:10 florian