我们有一个桌面应用程序(Delphi)。在这个应用程序中,我们通过Shellexecute创建一个网站。
客户填写网站上的表单并单击按钮以生成XML。
他想要的是在delphi应用程序中接收XML。我们如何将XML从网站推送到delphi deskptop应用程序。我们不希望用户将xml保存在电脑上,因为他们不知道资源管理器是如何工作的。
如何点击按钮从网站获取XML?
答案 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;