I was initialising a TJSONArray as: jsonArray := xeroResponse.JSONValue as TJSONArray; but I had forgotten to free the TRESTResponse. Now that I'm doing that, the jsonArray is being freed as well. I use the jsonArray throughout the Form to run…
Usually one would set it like this at runtime: Label1.Caption := 'First line' + #13#10 + 'SecondLine'; but for some reason, this does not seem to work even if you turn WordWrap on or off. What is the solution to…
I'm trying to get this done on TMS Web Core via Delphi code using. procedure TForm1.WebFormCreate(Sender: TObject); begin pnlPersonalInfo.Margins.Left := 15; pnlPersonalInfo.Margins.Top := 15; pnlPersonalInfo.Margins.Right := 15; pnlPersonalInfo.Margins.Bottom := 15; phone.HTML.Text := GetBootstrapIcon('telephone-fill', 24, '#576A33'); email.HTML.Text := GetBootstrapIcon('envelope-fill', 24, '#576A33');…
I am migrating some projects from Delphi 10.4 to Delphi 11.3. I am facing some problems with the JSON library: See the following codes: First case: function TestCreate; var LValue: Variant; LJSON: TJSONNumber; begin LValue := 100; LJSON := TJSONNumber.Create(LValue);…