Beispiel - PORTAL Datei-Download

Erläuterung

In diesem Beispiel zeigen wir, wie dynamischer Content als Datei-Download im Browser über den CLARC PORTAL Server bereitgestellt werden kann.

Skript

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;