Memo und HTTP Server

[arbu man]

Delphi-Quellcode:

procedure TForm1.HTTPServerCommandGet(AContext: TIdContext;
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);

begin
    AResponseInfo.ContentText:=Memo1.Text;
end;

Wäre die einfachst Möglichkeit auch wenn der Server dann nichts anderes kann...