- 热门文章:
- · 【Borland】Octane和Delphi Q&A(2003-10-7)-- Simon Thornhill
- · QQ尾巴病毒的发送原理分析
- · Delphi Open Tools Api实例研究(一)
- · 浅谈控件(组件)制作方法一(附带一delphi导出数据到Excel的组件实例)(原创)
- · Delphi for .net中Singleton模式的实现
- · 定制远程登陆窗口
- · 子类化窗口辅助类NativeWindow
- · Delphi使用VB编写的ActiveX控件全攻略
- · Delphi组件属性
- · 例用AdoQuery分页
- · Delphi捉妖记之AutoHint
- · 2003-11-03 Borland 发布 Delphi 8 for .NET
解决ActiveForm无法自动更新
ActiveForm Updates
ActiveForms are a quick way to create a browser-based application and still be able to use all of Delphi´s visual components and design-time support. If you have an existing Win32 GUI application and want to move to the web with it, then ActiveForms are certainly an option to consider (although you must be aware of the downsides: it only runs natively inside Internet Explorer, and really requires Win32 as client operating system). And apart from the code signing (security!) issue, which can take some time to setup, ActiveForms are really a quick solution to put a first version of your app in the browser. Until you want to deploy an updated version, that is, at which time you may find that the client (running Internet Explorer) not always automatically uses the new version of the ActiveForm. In fact, the current way Delphi generated ActiveForm deployment files and Internet Explorer "interact", it would be a miracle if your real-world ActiveForm would be automatically updated even once at the client side. Fortunately, I´ve found an easy workaround, but let´s take a closer look at the cause of this problem first...
Before we start looking at the problem, I assume you´ve all started an ActiveForm with the "include version information" enabled, as well as all other "auto-increment build number" and "auto-increment release number" options inside the Project Options and Deployment options dialogs. If you don´t include version information with your ActiveForm, then you don´t even need to read the remainder of this little article, as there will be no way where-ever that Internet Explorer on the client will be able to determine that a new version of the ActiveForm exists. Which means clients need to stick with the original version (unless you can instruct them to either manually delete either the old one, or download and install the new one - yeah, right, and maybe Borland will buy Microsoft to fix these miscommunication problems next time).
Anyway, when deploying an ActiveForm, Delphi (and C++Builder) generates a number of files. If you do not use .CAB file compression and also do not deploy any packages or additional files, then Delphi generates a single .HTM file and a single .OCX files (both with filenames equal to your projectname). The .HTM file will contain a section that identifies the ActiveForm to be loaded, which also includes the version number, as follows:
<OBJECT
classid="clsid:42424242-4242-4242-4242-424242424242"
codebase="./DrBob42X.ocx#version=1,0,0,0"
width=640
height=480
align=center
hspace=0
vspace=0
>
Now, if you either specify that you want to use .CAB file compression (always a good idea) or you need to deploy packages or additional files, then Delphi will generate an .HTM file that will not directly specify the ActiveForm with a version number, but rather an .INF file (without a version number - that´s the problem). This .INF file will in its turn contain the specifications of the ActiveForm and all other deployed files, including detailed version information, for example as follows: [Add.Code]
DrBob42X.ocx=DrBob42X.ocx
VCL50.bpl=VCL50.bpl
[DrBob42X.ocx]
file=./DrBob42X.cab
clsid={42424242-4242-4242-4242-424242424242}
RegisterServer=yes
FileVersion=1,0,4,2
[VCL50.bpl]
file=./VCL50.cab
FileVersion=5,0,6,18
DestDir=11
The problem when using an .INF file (which you get - again - even if only using .CAB file compression), is that Internet Explorer only looks at the version information inside the HTM file in order to determine whether or not to download a new set of files from the server. Even if we supply a new INF file with higher version numbers, Internet Explorer will not check these version numbers and download a new ActiveForm. This has been a problem for a long while now, and a potential showstopper for real-world applications using ActiveForms.
Fortunately, there´s an easy workaround I discovered: just specify the version number inside the HTM file again. When using an INF file, the HTM file will originally contain the following snippet:
<OBJECT
classid="clsid:42424242-4242-4242-4242-424242424242"
codebase="./DrBob42X.inf"
width=640
height=480
align=center
hspace=0
vspace=0
>
As soon as you enter a version number to this ./DrBob42.inf file, then Internet Explorer will be triggered to compare it to the local version, and download a new ActiveForm (and if needed packages and additionally deployed files as well). In short, the "working" OBJECT code snippet would look as follows (for the same 1.0.4.2. version number inside the DrBob42.inf file): <OBJECT
classid="clsid:42424242-4242-4242-4242-424242424242"
codebase="./DrBob42X.inf#version=1,0,4,2"
width=640
height=480
align=center
hspace=0
vspace=0
>
The only downside is that you need to manually adjust the HTM file everytime you deploy your ActiveForm. But that´s not really a problem, since I doubt you´d want to use the HTM file generated by Delphi (or C++Builder) in a real-world situation anyway. It only means you need to look into the .INF file to find out the actual version number (which in my case increases after every build and every deployment) and modify the HTM file to reflect that new version. And that will make sure all my clients will get the right new version of the ActiveForm next time they load Internet Explorer, as they should.
One final word of caution: if you´ve selected the "auto-increment build number" and "auto-increment release number" options, then you should know that the release number will be auto-incremented right after you´ve deployed the ActiveForm. In other words: right after you´ve deployed it for the first time, the ActiveForm version on disk (and on the server) will be 1,0,0,0. However, the file version information in your current project will then show 1,0,1,0 - i.e. the release number (third number of the series) in the IDE will always be one higher than the release number of the actually deployed ActiveForm. This is not so with build numbers (fourth number of the series) - these will always be in sync. Remember this when you client calls and specifies the version number (and it might also be a good idea to have the ActiveForm display the version number somewhere in a lower-left corner, for example)...
那位大虾有空翻译下 ^_^.
其实说白了就一句话,修改delphi自动产生(当然你也可以手工做一个)的测试ActiveForm的html文件,在原codebase所在行追加一句"#version=1,0,4,2",此版本号ocx文件的版本号
- · TWebBrowser的基本应用
- · DELPHI的异常及事务保护的常见问题浅析
- · 簡單的Windows API示例
- · 于破解过招,保护你的共享软件
- · Delphi Informant杂志 2003年度读者选择大奖名单
- · 状态栏显示进度条
- · 回调函数与Delphi的事件模型
- · 源代码的学习(如何学习)
- · QQ尾巴病毒的另一种实现
- · 如何用编程实现TDateTimePicker的24小时制到12小时制的转换?
- · 一个实际的OLE服务器的开发和使用
- · VCL源码分析方法论
- · DELPHI实现activex控件的限制
- · Delphi中的线程类--之(1)
- · Delphi中的线程类--之(2)
- · Delphi中的线程类--之(3)
- · Delphi中的线程类--之(4)
- · Delphi中的线程类--之(5,大结局)
- · 办公之星控件在Delphi里的使用
- · 一个新算法的表达式求值的函数
- · 走进Borland!
- · C++Builder/Delphi中透明Panel及透明窗口的实现方法
- · 制作QQ消息炸弹
- · 图像放大漫游攻略
- · 字符画软件的四个关键技术
- · 开发设计图文并茂的报表的组件
- · 用DELPHI实现NT环境下的绝对磁盘读写
- · 拦截其它程序的网络数据封包
- · delphi读取ini文件
- · Delphi Open Tools Api实例研究(二)
- · 一个DELPHI的MemoryManager
- · Delphi 8 for .net 第一时间 之 预览篇
- · 做一个返回数组的函数(例子)
- · Delphi 8 for .net 第一时间 之 分析篇
- · 最好的数据导出组件SMExport
- · delphi7从入门到精通之(一)
- · Delphi 7从入门到精通之二
- · delphi7从入门到精通之三
