delphi浏览器:用Delphi制作以浏览器为界面的应用程序

  很多人想把自己编写应用做成以浏览器为界面通过打开浏览器方式来使用应用其实在delphi中实现起来很简单我们以用delphi6.0为例把实现完整步骤写出如下:

  1、选择"file\\other"于 items对话框中选择activex选项在其中选择建立activex form此时会弹出个对话框用于输入你所建立activex组件名称、object pascal单元名称、项目名称等还有些activex包含版本控制编号等可选项可以按缺省设置直接点击ok即可

  2、现在你可以在打开工程中来设计你这里和应用设计可以根据自己需要来创建区别form来实现自己功能但需要注意是各form的间不能用form.showmodal来实现了需要动态form来实现如以下定义过程:


Procedure Tform1.ShowForm(AFormClass:TFormClass);
Begin
With AFormClass.Create(Self) do
try
ShowModal;
finally
Free;
end;
End;  

  form2可以用:showform(Tform2)设计完成后保存单元文件和工程文件到相应目录下假设保存在"c:\my documents"

  3、设计完成的后可以准备生成你所想要应用但这里不是点击运行而是首先选择"project\web deployment options" 在project选项中"Target dir"中添入".\" "Target URL"中添入"./" "HTML dir"中添入".\"来设置些文件存放路径最后选择"project\web deploy"点击"yes to all"即可

  此时打开 "c:\my documents"会看到已生成htm文件打开htm文件你会看到你所设计应用已经可以在浏览器中使用了你可以用网页编辑器来修改所生成htm文件使它更符合你要求至此完整实现过程结束实际上Delphi是把编写应用编译成了activex组件在浏览器中activex组件所以只适用于些小应用
Tags:  浏览器应用程序错误 delphi浏览器源码 delphi打开浏览器 delphi浏览器

延伸阅读

最新评论

发表评论