04-03-2019, Saat: 09:16
Thread içerisinde kullandığım serviste işim biten TJSON nesnesini boşaltmak isteğimde kendimi burada buluyorum sebebi ne olabilir ?
Destroy ve FreeAndNil yaparken kendimi aşağıdaki kod bloğunda buluyorum.
var errors :TJSONObject; items: TJSONArray; begin if Assigned(Body.Values['errors']) then begin items := TJSONObject.ParseJSONValue(TEncoding.UTF8.GetBytes(Body.GetValue('errors').ToString),0) as TJSONArray; errors := items.Get(0) as TJSONObject; raise Exception.Create(errors.GetValue('faultMessage').Value); end; *** bla bla bla
Destroy ve FreeAndNil yaparken kendimi aşağıdaki kod bloğunda buluyorum.