[Jcl-checkins-diff] SF.net SVN: jcl:[2960] trunk/jcl/source/windows/JclTimeZones.pas

[<ou...@us...>]

Revision: 2960
          http://jcl.svn.sourceforge.net/jcl/?rev=2960&view=rev
Author:   outchy
Date:     2009-08-22 15:17:35 +0000 (Sat, 22 Aug 2009)

Log Message:
-----------
Fix for Delphi 6/C++Builder 6.

Modified Paths:
--------------
    trunk/jcl/source/windows/JclTimeZones.pas

Modified: trunk/jcl/source/windows/JclTimeZones.pas
===================================================================
--- trunk/jcl/source/windows/JclTimeZones.pas	2009-08-22 12:26:22 UTC (rev 2959)
+++ trunk/jcl/source/windows/JclTimeZones.pas	2009-08-22 15:17:35 UTC (rev 2960)
@@ -164,7 +164,7 @@
 function GetCurrentTimeZoneUTCBias: Integer;
 
 // Misc UTC related functions
-function GetWMIScheduledJobUTCTime(Time: TTime): string;
+function GetWMIScheduledJobUTCTime(Time: TDateTime): string;
 function UTCNow: TDateTime;
 
 {$IFDEF UNITVERSIONING}
@@ -498,7 +498,7 @@
 // like Windows does something a bit odd with remote scheduled jobs, it's not
 // handling the time correctly at all.  So much for UTC.
 
-function GetWMIScheduledJobUTCTime(Time: TTime): string;
+function GetWMIScheduledJobUTCTime(Time: TDateTime): string;
 var
   TimeBias: Integer;
   Hour, Min, Sec, MSec: Word;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.