Einzelnen Beitrag anzeigen

lxo

Registriert seit: 30. Nov 2017
260 Beiträge
 
Delphi 12 Athens
 
#1

Delphi 12 - System.JSON.FloatToJson - verschlimmbessert - Workaround?

  Alt 17. Jan 2024, 07:40
Hallo,

mir ist aufgefallen das ich sporadisch eine Exception bekommen wenn ich Rest.JSON.pas TJson.ObjectToJsonString verwende.
Ursache, in Delphi 12 wurde die System.JSON.FloatToJson Funktion angepasst.

Angepasst wurde diese vermutlich aufgrund des Tickets: https://quality.embarcadero.com/browse/RSP-38387
Dabei wurde aber nicht beachtet das ein Float auch 1E-8, INF oder NAN sein kann.
Durch die Änderung wird am Ende einfach .0 hinzugefügt wenn kein . gefunden wird.
https://quality.embarcadero.com/browse/RSP-43463

Ist das bereits jemandem aufgefallen und hat jemand dafür evtl. ein passendes Workaround?
  Mit Zitat antworten Zitat