From 34d205b40b9adab0f10ad62bf08e6999fe339348 Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Sat, 20 Jun 2015 14:41:18 +0000
Subject: MS_DB_TIME_* removed from pascal headers too

git-svn-id: http://svn.miranda-ng.org/main/trunk@14289 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/ImportTXT/ImportTU.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'plugins/ImportTXT/ImportTU.pas')

diff --git a/plugins/ImportTXT/ImportTU.pas b/plugins/ImportTXT/ImportTU.pas
index b81a21167d..2fac66ad55 100644
--- a/plugins/ImportTXT/ImportTU.pas
+++ b/plugins/ImportTXT/ImportTU.pas
@@ -60,7 +60,7 @@ begin
   DT := (D * 24 * 60 * 60) + (Hour * 3600 + Min * 60 + Sec);
   // Приводим к GMT...судя по всему миранда хранит таймштампы в GMT
   if toGMT then
-    Result := DT - (Longword(CallService(MS_DB_TIME_TIMESTAMPTOLOCAL, DT, 0)) - DT)
+    Result := DT - (Longword(TimeZone_ToLocal(DT)) - DT)
   else
     Result := DT;
 end;
@@ -69,7 +69,7 @@ function DateTimeToTimeStamp(const DateTime: TDateTime; toGMT: Boolean = true):
 begin
   Result := Round((DateTime - UnixDateDelta) * SecsPerDay);
   if toGMT then
-    Result := Result - (Dword(CallService(MS_DB_TIME_TIMESTAMPTOLOCAL, Result, 0)) - Result);
+    Result := Result - (Dword(TimeZone_ToLocal(Result)) - Result);
 end;
 
 function ChangeUnicode(str: PWideChar): PWideChar;
-- 
cgit v1.2.3