(Delphi DLL) Example: Http.ClearHeaders method

Demonstrates how to call the ClearHeaders method.

Also see: Chilkat Http Default and Auto-Filled Headers

Chilkat for Delphi Downloads Chilkat non-ActiveX DLL for Delphi Chilkat ActiveX DLL for Delphi * The examples here use the non-ActiveX DLL.

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Http;

...

procedure TForm1.Button1Click(Sender: TObject);
var
success: Boolean;
http: HCkHttp;
responseBody: PWideChar;

begin
success := False;

http := CkHttp_Create();

// Add a request header.
CkHttp_SetRequestHeader(http,'X-Something','1234');
CkHttp_SetRequestHeader(http,'X-Example','5678');

responseBody := CkHttp__quickGetStr(http,'https://chilkatsoft.com/helloWorld.txt');
// Examine the request header we just sent..
Memo1.Lines.Add(CkHttp__lastHeader(http));
Memo1.Lines.Add('----');

// Output:

// GET /helloWorld.txt HTTP/1.1
// Host: chilkatsoft.com
// Accept: */*
// Accept-Encoding: gzip
// X-Something: 1234
// X-Example: 5678

// Remove the request headers we previously added:
CkHttp_ClearHeaders(http);

responseBody := CkHttp__quickGetStr(http,'https://chilkatsoft.com/helloWorld.txt');
Memo1.Lines.Add(CkHttp__lastHeader(http));

// Output:

// GET /helloWorld.txt HTTP/1.1
// Host: chilkatsoft.com
// Accept: */*
// Accept-Encoding: gzip

CkHttp_Dispose(http);

end;