delphi怎么向html传递参数 rt 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 比如:用一个HttpCli控件代码初始化 HttpCliPress := THttpCli.Create(nil); HttpCliPress.LocalAddr := '0.0.0.0'; HttpCliPress.Accept := 'image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, */*'; HttpCliPress.Agent := 'Mozilla/3.0 (compatible)'; HttpCliPress.ContentTypePost := 'application/x-www-form-urlencoded'; HttpCliPress.MultiThreaded := False; HttpCliPress.NoCache := False;---------执行procedure TFormPress.ButtonStartClick(Sender: TObject);var DataOut,DataIn,TmpData: TMemoryStream; TxtFileName: string;begin DataIn := TMemoryStream.Create; DataOut := TMemoryStream.Create; TmpData := TMemoryStream.Create; DataOut.Write(PostStr[1], Length(PostStr));//PostStr为参数,比如'flag=query' DataOut.Seek(0, soFromBeginning); HttpCliPress.SendStream := DataOut; HttpCliPress.RcvdStream := DataIn; HttpCliPress.URL := Url; //网页地址 try HttpCliPress.Post; except on E: exception do begin DataIn.Free; DataOut.Free; Application.MessageBox('Post失败!','错误',MB_ICONERROR + MB_OK); Exit; end; end; 我在form中需要嵌入一张html(应该是xml+xsl [*.xml]),用的是webbrowser控件在form左边的treeview中显示的产品分类树中选中一个产品前缀后,把这个产品的id要传给这个xml让他显示所有符合前缀的产品列表,我现在只是在xml中放了个标记再用id去替换他,虽然也可以,但我希望能当做网页参数一样传进去而不要去替换标记太麻烦另外还有个问题:在产品表中点了个具体产品后要调用这个产品的详细信息的xml,而这个xml就没办法用替换标记的办法了,因为这个时候delphi已经无法控制了,delphi无法知道我点了哪个产品所以就是delphi->xml的参数传递?xml->xml的参数传递? 错了,应该是delphi->xsl的参数传递?xsl->xsl的参数传递? to soundbug(兼职乞丐) 虽然不清楚能否完全满足我的要求,不过哪里有下载?谢谢 VB转DELPHI不习惯请教一个小问题,过程怎么调用? 非常感谢您能在百忙之中帮我解决几个问题! 高手参与---如何自动监测 CreateObject() 事件? 请问:在Memo1里有多行字符串,怎样只读第一行或指定行的字符串 这样的两个label,如何获得对方的标题? 【简单问题】如何动态设置字体? reportmachine报表教材 各位兄弟们,进来帮一帮忙,分现在只能给怎么多,但我以后会给分的。。。 文件的拷贝 嘻嘻,这个问题不会解。怎么判断sql语句成功查找??? 怎样在广域网上进行c/s开发,用dcomdatamodule可以吗?各位大下给点建议! 如何在游戏里弹出自己的窗体?
代码
初始化
HttpCliPress := THttpCli.Create(nil);
HttpCliPress.LocalAddr := '0.0.0.0';
HttpCliPress.Accept := 'image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, */*';
HttpCliPress.Agent := 'Mozilla/3.0 (compatible)';
HttpCliPress.ContentTypePost := 'application/x-www-form-urlencoded';
HttpCliPress.MultiThreaded := False;
HttpCliPress.NoCache := False;
---------
执行
procedure TFormPress.ButtonStartClick(Sender: TObject);
var
DataOut,DataIn,TmpData: TMemoryStream;
TxtFileName: string;
begin
DataIn := TMemoryStream.Create;
DataOut := TMemoryStream.Create;
TmpData := TMemoryStream.Create;
DataOut.Write(PostStr[1], Length(PostStr));//PostStr为参数,比如'flag=query' DataOut.Seek(0, soFromBeginning);
HttpCliPress.SendStream := DataOut;
HttpCliPress.RcvdStream := DataIn;
HttpCliPress.URL := Url; //网页地址
try
HttpCliPress.Post;
except
on E: exception do
begin
DataIn.Free;
DataOut.Free; Application.MessageBox('Post失败!','错误',MB_ICONERROR + MB_OK);
Exit;
end;
end;
在form左边的treeview中显示的产品分类树中选中一个产品前缀后,把这个产品的id要传给这个xml让他显示所有符合前缀的产品列表,我现在只是在xml中放了个标记再用id去替换他,虽然也可以,但我希望能当做网页参数一样传进去而不要去替换标记太麻烦
另外还有个问题:在产品表中点了个具体产品后要调用这个产品的详细信息的xml,而这个xml就没办法用替换标记的办法了,因为这个时候delphi已经无法控制了,delphi无法知道我点了哪个产品所以就是
delphi->xml的参数传递?
xml->xml的参数传递?
delphi->xsl的参数传递?
xsl->xsl的参数传递?