Procházet zdrojové kódy

+ Fixed getlocaltime incompatibility (bug 2075)

michael před 23 roky
rodič
revize
c0a3affff0
1 změnil soubory, kde provedl 5 přidání a 1 odebrání
  1. 5 1
      rtl/win32/wininc/func.inc

+ 5 - 1
rtl/win32/wininc/func.inc

@@ -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