procedure TFm_Main.onCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);  

begin  

  AResponseInfo.ContentType := 'text/html';  

  AResponseInfo.CharSet := 'UTF-8';  

  AResponseInfo.ContentText := '我是中文';  

end;