Ich entwickele auf einem Android 4.1 Gerät
Der Fehler wird auf dem Smartphone von einem kollegen ausgegeben...
Ich warte noch auf ein neueres Smartphone....um das selbst debuggen zu können.
Bis jetzt steht fest: der Fehler kommt aus dieser Zeile
Delphi-Quellcode:
function DateTimeToXMLTime(Value: TDateTime; ApplyLocalBias: Boolean = True): InvString;
const
Neg:
array[Boolean]
of string= ('
+', '
-');
var
Bias: Integer;
tz:TTimeZone;
begin
Result := FormatDateTime('
yyyy''
-''
mm''
-''
dd''
T''
hh''
:''
nn''
:''
ss''
.''
zzz', Value);
{ Do not localize }
tz := TTimeZone.
Local;
Bias := Trunc(tz.GetUTCOffset(Value).Negate.TotalMinutes);
//<-------------HIER KOMMT DIE EXCEPTION HER
if (Bias <> 0)
and ApplyLocalBias
then
begin
Result := Format('
%s%s%.2d:%.2d', [Result, Neg[Bias > 0],
{ Do not localize }
Abs(Bias)
div MinsPerHour,
Abs(Bias)
mod MinsPerHour]);
end else
Result := Result + '
Z';
{ Do not localize }
end;
Dank Delphi 10.3 bekomme ich dann irgendwann(hoffentlich in kürze)ein neues Entwicklungshandy, dann kann ich dem auf den Grund gehen...auch wenn ich davon ausgehe, dass es sinnlos ist, da Embarcadero es ja wieder so hinbiegen sollte, dass es funktioniert wie vorher, oder zumindest auf allen Plattformen gleich funktioniert.