摘要: Delphi:界面美化,用网页做界面用TWebBrowser控件设置显示的网页,如果在本地则写全路径,放到窗体的create或show事件中123456var str:string;begin str:=ExtractFilePath(Application.ExeName)+test.html ; //程序目录下的test.html页 webbrowser1.Navigate(str);End;假设网页中有一个链接控件的OnBeforeNavigate2事件12345678910procedure TFmain.WebBrowser1BeforeNavigate2(Sender: TObje 阅读全文
posted @ 2011-03-04 00:03 阳光不远 阅读(1136) 评论(0) 推荐(0) 编辑