Procedure PageBuilder;
begin
  MyFile := 'd:\test\test.pdf';
  Buffer := LoadFileToString(MyFile);

  ccHTTPResultHandler.ContentText := Buffer;
  ccHTTPResultHandler.ContentType := 'application/pdf';

  ccHTTPResultHandler.SetHTTPHeaderParameter('Content-Disposition: attachment; filename="'+ExtractFileName(MyFile)+'"');
end;

begin
  PageBuilder;
end;

Procedure PageBuilder;
begin
  ccHTTPResultHandler.ContentText := 'Hello World!';
  ccHTTPResultHandler.ContentType := 'text/plain';

  ccHTTPResultHandler.SetHTTPHeaderParameter('Content-Disposition: attachment; filename="example.txt"');
end;

begin
  PageBuilder;
end;