求delphi 单资料升级源码
求delphi 单文件升级源码
网上看到一个程序升级步骤是这样的:
软件第一次运行,估计是后台检查http上有无更新文件;不管有没有更新文件,此次运行 不出现如何升级提示。
第二次运行时该软件时 软件在任务栏中自动更新到最新版后再自动打开软件。
单文件升级,请告知源码!
谢谢,新人第一个帖子,希望能有高人指点!
------解决方案--------------------
在主程序中A检测是否有新版本,如果有就打开升级程序B并关闭A,下载并替换主程序,打开A主程序并关闭自己B。
主要就用下面的语句了。
ShellExecute(handle, 'Open', PChar(fileName), nil, nil, SW_NORMAL);
------解决方案--------------------
替换可以参考自杀程序...
简单的方案
在你关闭的时候 运行一个 bat
比如
ping 127.0.0.1
copy a.tmp a.exe
用 SW_HIDE 模式
这样就会自动替换掉了.
网上看到一个程序升级步骤是这样的:
软件第一次运行,估计是后台检查http上有无更新文件;不管有没有更新文件,此次运行 不出现如何升级提示。
第二次运行时该软件时 软件在任务栏中自动更新到最新版后再自动打开软件。
单文件升级,请告知源码!
谢谢,新人第一个帖子,希望能有高人指点!
------解决方案--------------------
在主程序中A检测是否有新版本,如果有就打开升级程序B并关闭A,下载并替换主程序,打开A主程序并关闭自己B。
主要就用下面的语句了。
ShellExecute(handle, 'Open', PChar(fileName), nil, nil, SW_NORMAL);
------解决方案--------------------
替换可以参考自杀程序...
简单的方案
在你关闭的时候 运行一个 bat
比如
ping 127.0.0.1
copy a.tmp a.exe
用 SW_HIDE 模式
这样就会自动替换掉了.