请问如何用网站提供的搜索引擎，知道查找关键字，我用的是WebBrowser1，100分呀

Question

请问如何用网站提供的搜索引擎，知道查找关键字，我用的是WebBrowser1（要求查找结果在WebBrowser1显示）

Answer 1

看看查询后IE的地址栏,这时表单一般是用GET方式提交的那就用WebBrowser打开同样的地址咯,TWebBrowser就是相关COM接口的封装,当做IE一样

Answer 2

看看对你有帮助吗？procedure TForm1.Button1Click(Sender: TObject);
begin
    //WebBrowser1:=WebBrowser1.create(self);
    if ComboBox1.ItemIndex<0 then
    begin
        showmessage('请选择搜索引擎:');
        exit;
    end;
    case ComboBox1.Itemindex of
        0:begin
            WebBrowser1.Navigate('http://psearch.163.com/Psearch?lang=gb&q='+trim(edit1.Text));
          end;
        1:begin
            webbrowser1.Navigate('http://page.search.sohu.com/cgi-bin/pagesearch.cgi?tn=sohu&si=gi&word='+trim(edit1.text)+'&ct=0&cl=2&lm=0');
          end;
        2:begin
            webbrowser1.Navigate('http://search.sina.com.cn/cgi-bin/search/search.cgi?_searchkey='+trim(edit1.Text)+'&_ss=sina&enter=%CB%D1%CB%F7');
          end;
        3:begin
            webbrowser1.Navigate('http://cn.search.yahoo.com/search/cn?p='+trim(edit1.text)+'&u=B');
          end;
        4:begin
             webbrowser1.Navigate('http://www.google.com/search?q='+trim(edit1.Text)+'&ie=GB2312&hl=zh-CN&btnG=Google%CB%D1%CB%F7&lr=lang_zh-CN%7Clang_zh-TW');
          end;
    end;