Hallo,
der Compiler meckert hier immer beim TJSON.Format Aufruf weil der deprecated ist.
Mag ja sein, nur verstehe ich die dort angegebene Alternative TJSONAncestor.Format nicht,
weil die ganz andere Parameter hat. Und die Hilfe ist da auch mal wieder sehr hilfreich...
Delphi-Quellcode:
procedure TTSEStatus.RESTRequestAfterExecute(const Sender: TCustomRESTRequest);
var
Obj : TJSONValue;
begin
Obj := TJSONObject.ParseJSONValue(Sender.Response.Content);
if Assigned(Obj) then
try
Log.Send(LevelBlue, cCategory, 'RequestType1: ' + TJSON.Format(Obj));
finally
Obj.Free;
end;
end;
Kann mir jemand sagen, wie ich den TJSON.Format Aufruf ersetzen müsste?
Grüße
TurboMagic