在delphi应用程序中从网站获取XML

时间:2014-11-27 12:21:58

标签: xml delphi

我们有一个桌面应用程序(Delphi)。在这个应用程序中,我们通过Shellexecute创建一个网站。

客户填写网站上的表单并单击按钮以生成XML。

他想要的是在delphi应用程序中接收XML。我们如何将XML从网站推送到delphi deskptop应用程序。我们不希望用户将xml保存在电脑上,因为他们不知道资源管理器是如何工作的。

如何点击按钮从网站获取XML?

1 个答案:

答案 0 :(得分:4)

最好不要在网站上输入表单,最好在应用程序中创建表单供用户填写,然后将数据发送到网站,然后在TIdHTTP组件的帮助下返回xml。

您可以使用以下步骤填写表单参数:

procedure AddFormParam(FormParams: TStringList; const Name, Value: string);
begin
  FormParams.Add(Name + '=' + Value);
end;

例如,如果cgi需要名称为:Name,Address,Message的字段,您将填写如下参数:

AddFormParam(FormParams, 'Name', NameValueString);
AddFormParam(FormParams, 'Address', AddressValueString);
AddFormParam(FormParams, 'Message', MessageValueString);

然后将其发送到服务器cgi:

function GetXML(HTTP: TIdHTTP; const FormCgiURL: string; FormParams: TStringList): string;
begin 
  Result := HTTP.Post(FormCgiURL, FormParams);
end;