用delphi创建浏览器启动时显示默认网页的一段代码
procedureTForm1.FormCreate(Sender:TObject);begingotopage(extractfilepath(application....
procedure TForm1.FormCreate(Sender: TObject);
begin
gotopage(extractfilepath(application.ExeName)+'default.htm');
end;
gotopage是功能为打开网页的函数
请问 该程序是怎么起到打开默认网页的要求的 其中)+'default.htm' 这是什么? 展开
begin
gotopage(extractfilepath(application.ExeName)+'default.htm');
end;
gotopage是功能为打开网页的函数
请问 该程序是怎么起到打开默认网页的要求的 其中)+'default.htm' 这是什么? 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询