From a48a3574217e727cc1a10768aebe88ca182204ac Mon Sep 17 00:00:00 2001 From: Alexandru Ciobanu Date: Mon, 17 Aug 2020 12:07:47 +0100 Subject: [PATCH] feat: bump version --- dist/TZDB.dproj | 14 +-- dist/TZDB.pas | 152 ++++++++++++++++++++-------- src/TZCompile/TZCompile.dproj | 8 +- src/TZDBLIB/TZDBLIB.dproj | 8 +- src/TZDBPK/TZDB.pas | 2 +- src/TZDBPK/TZDBPK.dproj | 14 +-- src/TZTest/TZTest.dproj | 10 +- src/TZVisualizer/TZVisualizer.dproj | 18 ++-- 8 files changed, 149 insertions(+), 77 deletions(-) diff --git a/dist/TZDB.dproj b/dist/TZDB.dproj index afbdac1..5a5971f 100644 --- a/dist/TZDB.dproj +++ b/dist/TZDB.dproj @@ -43,9 +43,9 @@ bin\$(Config)\$(Platform);$(DCC_UnitSearchPath) - 125 + 126 1033 - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= true 1 Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) @@ -67,7 +67,7 @@ TZDB.ico Bde;$(DCC_Namespace) - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) $(BDS)\bin\default_app.manifest true @@ -80,7 +80,7 @@ 3 - CompanyName=Alexandru Ciobanu;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName) + CompanyName=Alexandru Ciobanu;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName) false @@ -89,7 +89,7 @@ 0 - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) IANA Time Zone Database for Delphi Package @@ -126,7 +126,7 @@ 2 1 0 - 125 + 126 False False False @@ -138,7 +138,7 @@ Alexandru Ciobanu Olson Time Zone Database for Delphi - 2.1.0.125 + 2.1.0.126 IANA Time Zone Database for Delphi Alexandru Ciobanu diff --git a/dist/TZDB.pas b/dist/TZDB.pas index 2bac54c..e79c2d0 100644 --- a/dist/TZDB.pas +++ b/dist/TZDB.pas @@ -54,18 +54,22 @@ interface uses - {$IFDEF DELPHI}System.{$ENDIF}SysUtils, - {$IFDEF DELPHI}System.{$ENDIF}DateUtils, - {$IFDEF DELPHI}System.{$ENDIF}Types, {$IFDEF DELPHI} + System.SysUtils, + System.DateUtils, + System.Types, System.TimeSpan, Generics.Collections, Generics.Defaults, + System.Classes; {$ELSE} + SysUtils, + DateUtils, + Types, FGL, SyncObjs, + Classes; {$ENDIF} - {$IFDEF DELPHI}System.{$ENDIF}Classes; type {$IFNDEF DELPHI} @@ -109,6 +113,8 @@ TYearSegment = record function GetUtcOffset: {$IFDEF DELPHI}TTimeSpan{$ELSE}Int64{$ENDIF}; inline; function GetStartsAt: TDateTime; function GetEndsAt: TDateTime; + + function UtcTimeInSegment(const AUtcTime: TPreciseTime; out ANoBias: Boolean): Boolean; public /// The date/time when the segment starts. /// A date/time value representing the start of the segment. @@ -153,6 +159,7 @@ TBundledTimeZone = class {$ENDIF} FSegmentsByYear: {$IFDEF DELPHI}TDictionary{$ELSE}TFPGMap{$ENDIF}; + function GetSpillOverYearBreakdown(const AYear: Word): TYearSegmentArray; function GetSegment(const AYear: Word; const APreciseTime: TPreciseTime; const AForceDaylight: Boolean; const AFailOnInvalid: Boolean): TYearSegment; function GetSegmentUtc(const AYear: Word; const APreciseTime: TPreciseTime): TYearSegment; @@ -375,7 +382,7 @@ implementation SInvalidLocalTime = 'Local date/time value %s is invalid (does not exist in the time zone).'; const - CComponentVersion = '2.1.0.125'; + CComponentVersion = '2.1.0.126'; type { Day type. Specifies the "relative" day in a month } @@ -11633,6 +11640,63 @@ function TYearSegment.GetUtcOffset: {$IFDEF DELPHI}TTimeSpan{$ELSE}Int64{$ENDIF} Result := {$IFDEF DELPHI}TTimeSpan.FromSeconds(FPeriodOffset + FBias){$ELSE}FPeriodOffset + FBias{$ENDIF}; end; +function TYearSegment.UtcTimeInSegment(const AUtcTime: TPreciseTime; out ANoBias: Boolean): Boolean; +var + FStartsAtUtc, FEndAtUtc: TPreciseTime; +begin + if FType = lttAmbiguous then + begin + { Check for pre-switch } + FStartsAtUtc := IncSecond(FStartsAt, -FPeriodOffset); + FEndAtUtc := IncSecond(FEndsAt, -FPeriodOffset); + + if (ComparePreciseTime(AUtcTime, FStartsAtUtc) >= 0) and + (ComparePreciseTime(AUtcTime, FEndAtUtc) <= 0) then + begin + ANoBias := true; + Exit(true); + end; + + { Check for post-switch } + FStartsAtUtc := IncSecond(FStartsAt, -(FPeriodOffset + FBias)); + FEndAtUtc := IncSecond(FEndsAt, -(FPeriodOffset + FBias)); + + if (ComparePreciseTime(AUtcTime, FStartsAtUtc) >= 0) and + (ComparePreciseTime(AUtcTime, FEndAtUtc) <= 0) then + begin + ANoBias := false; + Exit(true); + end; + + end else if FType = lttStandard then + begin + FStartsAtUtc := IncSecond(FStartsAt, -FPeriodOffset); + FEndAtUtc := IncSecond(FEndsAt, -FPeriodOffset); + + if (ComparePreciseTime(AUtcTime, FStartsAtUtc) >= 0) and + (ComparePreciseTime(AUtcTime, FEndAtUtc) <= 0) then + begin + ANoBias := true; + Exit(true); + end; + + end else if FType = lttDaylight then + begin + FStartsAtUtc := IncSecond(FStartsAt, -(FPeriodOffset + FBias)); + FEndAtUtc := IncSecond(FEndsAt, -(FPeriodOffset + FBias)); + + if (ComparePreciseTime(AUtcTime, FStartsAtUtc) >= 0) and + (ComparePreciseTime(AUtcTime, FEndAtUtc) <= 0) then + begin + ANoBias := true; + Exit(true); + end; + end; + + ANoBias := false; + Result := false; +end; + {$IFDEF FPC} class operator TYearSegment.Equal(const ALeft, ARight: TYearSegment): Boolean; begin @@ -11982,48 +12046,23 @@ function TBundledTimeZone.GetSegment( function TBundledTimeZone.GetSegmentUtc(const AYear: Word; const APreciseTime: TPreciseTime): TYearSegment; var + LSegments: TYearSegmentArray; LSegment: TYearSegment; - LLocal: TPreciseTime; + LNoBias: Boolean; begin - for LSegment in GetYearBreakdown(AYear) do + LSegments := GetSpillOverYearBreakdown(AYear); + for LSegment in LSegments do begin - - if LSegment.FType = lttAmbiguous then + if LSegment.UtcTimeInSegment(APreciseTime, LNoBias) then begin - { Check with both period offset only } - LLocal := IncSecond(APreciseTime, LSegment.FPeriodOffset); + Result := LSegment; - if YearOf(LLocal) <> AYear then - begin - { Crossed the year threshold. Pass on to next year. } - Exit(GetSegmentUtc(YearOf(LLocal), APreciseTime)); - end; + { Special case when non-biased Ambiguous found - erase it. } + if (LSegment.FType = lttAmbiguous) and LNoBias then + Result.FBias := 0; - if (ComparePreciseTime(LSegment.FStartsAt, LLocal) <= 0) and - (ComparePreciseTime(LSegment.FEndsAt, LLocal) >= 0) then - begin - { Special case when non-biased Ambiguous found - erase it. } - Result := LSegment; - Result.FBias := 0; - Exit; - end; + Exit; end; - - if LSegment.FType <> lttInvalid then - begin - { Check for normal segments. } - LLocal := IncSecond(APreciseTime, LSegment.FPeriodOffset + LSegment.FBias); - if YearOf(LLocal) <> AYear then - begin - { Crossed the year threshold. Pass on to next year. } - Exit(GetSegmentUtc(YearOf(LLocal), APreciseTime)); - end; - - if (ComparePreciseTime(LSegment.FStartsAt, LLocal) <= 0) and - (ComparePreciseTime(LSegment.FEndsAt, LLocal) >= 0) then - Exit(LSegment); - end; - end; { Catch all issue. } @@ -12031,6 +12070,39 @@ function TBundledTimeZone.GetSegmentUtc(const AYear: Word; const APreciseTime: T [PreciseTimeToStr(APreciseTime), DoGetID()]); end; +function TBundledTimeZone.GetSpillOverYearBreakdown(const AYear: Word): TYearSegmentArray; +var + LPrev, LCurr, LNext: TYearSegmentArray; + I, T: Integer; +begin + { Pull previous year but allow for error to be eaten. } + try + LPrev := GetYearBreakdown(AYear - 1); + except on EUnknownTimeZoneYear do; + end; + + LCurr := GetYearBreakdown(AYear); + + { Pull next year but allow for error to be eaten. } + try + LNext := GetYearBreakdown(AYear + 1); + except on EUnknownTimeZoneYear do; + end; + + { Merge all arrays } + SetLength(Result, Length(LPrev) + Length(LCurr) + Length(LNext)); + for I := 0 to Length(LPrev) - 1 do + Result[I] := LPrev[I]; + + T := Length(LPrev); + for I := 0 to Length(LCurr) - 1 do + Result[I + T] := LCurr[I]; + + T := T + Length(LCurr); + for I := 0 to Length(LNext) - 1 do + Result[I + T] := LNext[I]; +end; + class function TBundledTimeZone.GetTimeZone(const ATimeZoneID: string): TBundledTimeZone; var LOut: TBundledTimeZone; diff --git a/src/TZCompile/TZCompile.dproj b/src/TZCompile/TZCompile.dproj index ddd62b2..d0af216 100644 --- a/src/TZCompile/TZCompile.dproj +++ b/src/TZCompile/TZCompile.dproj @@ -39,13 +39,13 @@ 1 true true - 125 + 126 ..\..\bin\$(Config)\$(Platform) ..\..\bin\$(Config)\$(Platform) None ..\..\bin\$(Config)\$(Platform);$(DCC_UnitSearchPath) 1033 - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZCompile;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZCompile;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 00400000 ..\..\bin\$(Config)\$(Platform) @@ -113,7 +113,7 @@ 2 1 0 - 125 + 126 False False False @@ -125,7 +125,7 @@ - 2.1.0.125 + 2.1.0.126 diff --git a/src/TZDBLIB/TZDBLIB.dproj b/src/TZDBLIB/TZDBLIB.dproj index 3482c60..183af0e 100644 --- a/src/TZDBLIB/TZDBLIB.dproj +++ b/src/TZDBLIB/TZDBLIB.dproj @@ -35,7 +35,7 @@ true - 125 + 126 1 ..\..\bin\$(Config)\$(Platform) None @@ -44,7 +44,7 @@ ..\..\bin\$(Config)\$(Platform);$(DCC_UnitSearchPath) true 1033 - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBLIB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBLIB;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) true ..\..\bin\$(Config)\$(Platform) @@ -118,7 +118,7 @@ 2 1 0 - 125 + 126 False False False @@ -130,7 +130,7 @@ - 2.1.0.125 + 2.1.0.126 diff --git a/src/TZDBPK/TZDB.pas b/src/TZDBPK/TZDB.pas index 0890004..9a855e8 100644 --- a/src/TZDBPK/TZDB.pas +++ b/src/TZDBPK/TZDB.pas @@ -361,7 +361,7 @@ implementation SInvalidLocalTime = 'Local date/time value %s is invalid (does not exist in the time zone).'; const - CComponentVersion = '2.1.0.125'; + CComponentVersion = '2.1.0.126'; type { Day type. Specifies the "relative" day in a month } diff --git a/src/TZDBPK/TZDBPK.dproj b/src/TZDBPK/TZDBPK.dproj index 3e83c51..8f4cff2 100644 --- a/src/TZDBPK/TZDBPK.dproj +++ b/src/TZDBPK/TZDBPK.dproj @@ -45,9 +45,9 @@ ..\..\bin\$(Config)\$(Platform) ..\..\bin\$(Config)\$(Platform) ..\..\bin\$(Config)\$(Platform);$(DCC_UnitSearchPath) - 125 + 126 1033 - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBPK;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBPK;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= true 1 Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) @@ -68,7 +68,7 @@ ..\..\media\logo-64x64.ico Bde;$(DCC_Namespace) - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBPK;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBPK;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) D:\Projects\TimeZoneDB\bin\TZTest.exe $(BDS)\bin\default_app.manifest true @@ -82,7 +82,7 @@ 3 - CompanyName=Alexandru Ciobanu;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBPK;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName) + CompanyName=Alexandru Ciobanu;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBPK;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName);FileDescription=$(MSBuildProjectName) 2 @@ -92,7 +92,7 @@ 0 - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBPK;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZDBPK;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) @@ -130,7 +130,7 @@ 2 1 0 - 125 + 126 False False False @@ -142,7 +142,7 @@ Alexandru Ciobanu Olson Time Zone Database for Delphi - 2.1.0.125 + 2.1.0.126 IANA Time Zone Database for Delphi Alexandru Ciobanu diff --git a/src/TZTest/TZTest.dproj b/src/TZTest/TZTest.dproj index ede6610..b6d212e 100644 --- a/src/TZTest/TZTest.dproj +++ b/src/TZTest/TZTest.dproj @@ -50,8 +50,8 @@ true Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace) 1 - 125 - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZTest;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= + 126 + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZTest;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= 1033 ..\..\bin\$(Config)\$(Platform);$(BDS)\Source\DUnit\src;$(DCC_UnitSearchPath) _CONSOLE_TESTRUNNER;$(DCC_Define) @@ -90,7 +90,7 @@ $(BDS)\bin\default_app.manifest Debug - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZTest;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZTest;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) true 2 ..\..\media\logo-64x64.ico @@ -130,7 +130,7 @@ 2 1 0 - 125 + 126 False False False @@ -142,7 +142,7 @@ Alexandru Ciobanu Olson Time Zone Database for Delphi - 2.1.0.125 + 2.1.0.126 IANA Time Zone Database for Delphi Alexandru Ciobanu diff --git a/src/TZVisualizer/TZVisualizer.dproj b/src/TZVisualizer/TZVisualizer.dproj index 67e206a..7923e42 100644 --- a/src/TZVisualizer/TZVisualizer.dproj +++ b/src/TZVisualizer/TZVisualizer.dproj @@ -49,8 +49,8 @@ ..\..\bin\$(Config)\$(Platform);$(DCC_UnitSearchPath) 1033 true - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZVisualizer;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= - 125 + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZVisualizer;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments= + 126 Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;Winapi;$(DCC_Namespace) 1 true @@ -66,10 +66,10 @@ TZVisualizer - 125 + 126 System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) $(BDS)\bin\default_app.manifest - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZVisualizer;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZVisualizer;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) true $(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png $(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png @@ -84,7 +84,7 @@ 3 $(BDS)\bin\default_app.manifest - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZVisualizer;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZVisualizer;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) true Debug 2 @@ -97,8 +97,8 @@ 0 - 125 - CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.125;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZVisualizer;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) + 126 + CompanyName=Alexandru Ciobanu;FileDescription=IANA Time Zone Database for Delphi;FileVersion=2.1.0.126;InternalName=IANA Time Zone Database for Delphi;LegalCopyright=Alexandru Ciobanu;LegalTrademarks=;OriginalFilename=TZVisualizer;ProductName=IANA Time Zone Database for Delphi;ProductVersion=2.1;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName) $(BDS)\bin\default_app.manifest true @@ -138,7 +138,7 @@ 2 1 0 - 125 + 126 False False False @@ -150,7 +150,7 @@ Alexandru Ciobanu IANA Time Zone Database for Delphi - 2.1.0.125 + 2.1.0.126 IANA Time Zone Database for Delphi Alexandru Ciobanu