Send a REST Request with a Text Body

See more REST Examples

Demonstrates Rest.FullRequestString, a convenience method that sends a complete request whose text body (such as JSON, XML, or plain text) is supplied directly, then reads and returns the response body as text.

var
success: Integer;
rest: TChilkatRest;
bTls: Integer;
bAutoReconnect: Integer;
jsonBody: WideString;
responseText: WideString;

begin
success := 0;

rest := TChilkatRest.Create(Self);
bTls := 1;
bAutoReconnect := 1;
success := rest.Connect('example.com',443,bTls,bAutoReconnect);
if (success = 0) then
  begin
    Memo1.Lines.Add(rest.LastErrorText);
    Exit;
  end;

//  Send a complete request whose text body is supplied directly, such as JSON.  The response body is
//  read as text and returned.  The 1st argument is the HTTP verb, the 2nd is the URI path, and the
//  3rd is the request body.
rest.AddHeader('Content-Type','application/json');

jsonBody := '{ "name": "example", "active": true }';
responseText := rest.FullRequestString('POST','/api/items',jsonBody);
if (rest.LastMethodSuccess = 0) then
  begin
    Memo1.Lines.Add(rest.LastErrorText);
    Exit;
  end;
Memo1.Lines.Add(responseText);