delphi 关于网页框架里的表单提交

如题!
框架代码:
<frameset rows="127,*" cols="*" frameborder="no" border="2" framespacing="0">
  <frame src="top.html" name="top" scrolling="No" noresize="noresize" id="topFrame" title="topFrame">
  <frameset rows="*" cols="207,*" framespacing="0" frameborder="no" border="0">
    <frame src="left.html" name="leftF" scrolling="No" noresize="noresize" id="leftFrame" title="leftFrame">
    <frame src="right.html" name="right" id="mainFrame" title="mainFrame">
  </frameset>
</frameset>其中RIGHT里有两个表单框
<body>
<form action="login.php" name="login_FORM" method="post">
<input name="uu" type="text" >
<input  type="password" name="pp" >
<input  type="submit" value="登 录" name='sub' >
</body>我现在想用DELPHI操作框架里RIGHT里的表单!!请问大人们我应该怎么实现??? 我是新手!!

解决方案 »

  1.   

    lz 用的webbrowser组件 还是用的idhttp？
    方法不一的。
      

  2.   

    关于问题的补充!同2楼wsine朋友说的一样我想自动填写框架里的表单并提交回3楼kfcoffe朋友,我想用WebBrowser来实现! 如果能有更简单的方法也可!!我是新手,我找过相关的代码,能填写是单个网页(不带框架)的网页表单!但是对网页框架里的表单填写
    我搜了很多信息,没有能用得上的!希望能得到大人们的点播!!
      

  3.   


    procedure TForm1.Button2Click(Sender: TObject);
    var
      doc:ihtmldocument2;
      Name,Password:IHTMLInputElement;
      tem : Olevariant;
    begin  if WebBrowser1.Busy then
        self.WebBrowser1.Stop;
       WebBrowser1.Navigate('http://www.xxxx.com/login.php');
       while webbrowser1.ReadyState<>READYSTATE_COMPLETE do
        Application.ProcessMessages;
      if assigned(WebBrowser1) then
      begin
        doc := WebBrowser1.Document as ihtmldocument2;
        Name := doc.all.item('pwuser',0) as IHTMLInputElement;
        password := doc.all.item('pwpwd',0) as IHTMLInputElement;
        if EdtName.Text <> '' then
          Name.value := EdtName.Text
        else
          EdtName.SetFocus;
        if EdtPwd.Text <> '' then
          Password.value := EdtPwd.Text
        else
          EdtPwd.SetFocus;    tem := doc.all.item('submit',0);
        sleep(30);
        tem.click;
    end;
    end;
      

  4.   

    嗨!! 可以结贴了! 但还是要感谢KCOFFE朋友这么热心的帮助!!