Changeset 32 for trunk/Packages/Common


Ignore:
Timestamp:
Jul 26, 2016, 9:01:46 AM (8 years ago)
Author:
chronos
Message:
  • Fixed: Use corret system locale on Linux.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Packages/Common/UXMLUtils.pas

    r15 r32  
    9999      if Pos('Z', XMLDateTime) > 0 then
    100100        LeftCutString(XMLDateTime, Part, 'Z');
    101       SecondFraction := StrToFloat('0.' + Part);
     101      SecondFraction := StrToFloat('0' + DecimalSeparator + Part);
    102102      Millisecond := Trunc(SecondFraction * 1000);
    103103    end else begin
Note: See TracChangeset for help on using the changeset viewer.