Lazarus Pascal

HTTP Request Boundary Property

Explains and demonstrates the HTTP request Boundary property. For multipart HTTP requests, Chilkat auto-generates a boundary string when the Boundary property is left unset (or empty). For example:

POST /something HTTP/1.1
Content-Type: multipart/form-data; boundary=------------090207000006060206010508
Host: domain
Content-Length: 378

--------------090207000006060206010508
Content-Disposition: form-data; name="fileA"; filename="fileA.txt"
Content-Type: text/plain

This is the contents of file A
--------------090207000006060206010508
Content-Disposition: form-data; name="fileB"; filename="fileB.txt"
Content-Type: text/plain

This is the contents of file B
--------------090207000006060206010508--

If the Boundary property is set, then Chilkat uses it. For example, if the Boundary property is set to "ABC123HELLOWORLD"

POST /something HTTP/1.1
Content-Type: multipart/form-data; boundary=ABC123HELLOWORLD
Host: domain
Content-Length: 318

--ABC123HELLOWORLD
Content-Disposition: form-data; name="fileA"; filename="fileA.txt"
Content-Type: text/plain

This is the contents of file A
--ABC123HELLOWORLD
Content-Disposition: form-data; name="fileB"; filename="fileB.txt"
Content-Type: text/plain

This is the contents of file B
--ABC123HELLOWORLD--

Lazarus Pascal

program ChilkatDemo;

// Demonstrates using the Chilkat Pascal wrapper via the C bridge DLL.
// Builds as a console application under Lazarus (FPC) or Delphi.

{$IFDEF FPC}
  {$MODE DELPHI}
{$ENDIF}
{$APPTYPE CONSOLE}

uses
  {$IFDEF UNIX}
  cthreads,
  {$ENDIF}
  SysUtils,
  CkDllLoader,
  Chilkat.HttpRequest;

// ---------------------------------------------------------------------------

procedure RunDemo;
var
  req: THttpRequest;

begin
  req := THttpRequest.Create;

  req.HttpVerb := 'POST';
  req.Path := '/something';
  req.ContentType := 'multipart/form-data';

  req.AddStringForUpload('fileA','fileA.txt','This is the contents of file A','utf-8');
  req.AddStringForUpload('fileB','fileB.txt','This is the contents of file B','utf-8');

  //  When the Boundary property is empty (has not yet been set)
  //  Chilkat auto-generates a random boundary for the request.
  //  This should almost always be sufficient.
  //  For example, one can see the generated boundary here:
  WriteLn(req.GenerateRequestText());

  //  If the Boundary property is set to a specific string, then the
  //  request will use it:
  req.Boundary := 'ABC123HELLOWORLD';
  WriteLn(req.GenerateRequestText());


  req.Free;

end;

// ---------------------------------------------------------------------------

begin

  try
    RunDemo;
  except
    on E: Exception do
      WriteLn('Unhandled exception: ', E.ClassName, ': ', E.Message);
  end;

  WriteLn;
  {$IFDEF MSWINDOWS}
  WriteLn('Press Enter to exit...');
  ReadLn;
  {$ENDIF}
end.