请教关于webbrowser的方法和属性(50分)

  • 主题发起人 主题发起人 godelphibbs
  • 开始时间 开始时间
G

godelphibbs

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大虾们,大家好.本人现在正在做一个关于网页方面的问题,但用到webbrowser这个控件
时,其中的具体方法和属性还不太明白,希望有过此经验的大虾们指点一下,主要是webbrowser的方法和属性...
谢谢...
 
http://www.codesearch.com.cn
中国最大得源代码搜索引擎
 
楼上的,做广告不要在别人的需求贴子中乱回复,你这样做让人十分反感,你列出的网址已经被很多人列入黑名单中了[:(!][:(!][:(!]
 
procedure TForm1.Button1Click(Sender: TObject);
var
TmpStr : string;
begin

if Edit1.Text = '' then

begin

Application.MessageBox('请输入网址!','提示',Mb_ok or Mb_iconwarning);
Edit1.SetFocus;
Exit;
end;

TmpStr := Edit1.Text;
WebBrowser1.Navigate(TmpStr);
//打开网址
WebBrowser1.GoBack;//向后
WebBrowser1.GoForward;//向前
WebBrowser1.GoHome;//到主页
WebBrowser1.Refresh;//刷新网页
WebBrowser1.GoSearch;//搜索网页
end;
 
procedure TForm1.Button1Click(Sender: TObject);
var
TmpStr : string;
begin

if Edit1.Text = '' then

begin

Application.MessageBox('请输入网址!','提示',Mb_ok or Mb_iconwarning);
Edit1.SetFocus;
Exit;
end;

TmpStr := Edit1.Text;
WebBrowser1.Navigate(TmpStr);
//打开网址
WebBrowser1.GoBack;//向后
WebBrowser1.GoForward;//向前
WebBrowser1.GoHome;//到主页
WebBrowser1.Refresh;//刷新网页
WebBrowser1.GoSearch;//搜索网页

end;
 
楼上基本正确,细化可用
 
建议用EmbeddedWB,有demo
 
去下载一个30多M的DELPHI6组件大全,就可以看到DELPHI6里所有组件的各种属性和方法了。
 
下一个大富翁离线数据包,想怎么搜就怎么搜.比如搜webbrowser这个关键词,估计够你看几天的.
 
后退
顶部