GitHub-Mirror/x2utils
1
0
Fork 0
mirror of synced 2024-09-16 16:46:09 +00:00
Code Issues Projects Releases Wiki Activity

Delphi 2007 compatibility

Browse Source
This commit is contained in:
Mark van Renswoude 2016-04-18 11:46:27 +00:00
parent e9f864d150
commit 1af5bae544
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
XMLDataBindingUtils.pas
View File

@ -201,10 +201,10 @@ function InDSTSpan(ADate: TDateTime; ATimeZoneInfo: TTimeZoneInformation): boole
var
lowerDayLight: TDateTime;
upperDayLight: TDateTime;
day: TDate;
day: TDateTime;
days: Integer;
function GetDay(AYear, AMonth, ADay, ADayOfWeek: Integer): TDate;
function GetDay(AYear, AMonth, ADay, ADayOfWeek: Integer): TDateTime;
var
I, Counter : Integer;
begin