delphi - 替换当前exe的建议

Question

我需要用一种快速而肮脏的方式来升级我的应用程序。

目前我每个版本都有一个 exe。

如果 exe 错误，我会显示一条消息“在 db 上找到 relase X，你正在使用 exe 来发布 Y，请下载正确的版本”。

我将每个 exe 都放在固定地址，例如:http://myip.com/exes/N/Project.exe(其中 N 是版本号)

所以我的想法不是上面的消息，而是提示用户“将下载正确的 exe，按确定继续”。

我的想法是在OK之后:

1) 使用 ShellExecute 运行另一个负责下载和替换的 exe(我们称之为 id Update.exe)(这个 exe 可以存储在 exe 资源中)

2) 关闭应用

2) Update.exe 将从互联网下载正确的 exe 并将其保存到临时文件夹

4) Update.exe会删除Project.exe并替换为下载的

5) Update.exe 将运行新的 Project.exe

因此将运行正确的 exe，用户将在与旧 exe 相同的位置拥有新的 exe。这将是一个非 hortodox 升级(不使用 Windows 更新，但相信我，我需要这个。我不使用 WIndows 更新)。

您能评论一下这种方法吗？或者建议类似的技巧？

Answer 1

我会采取稍微不同的方法。我不会使用单独的 exe 进行下载，而是让主 exe 在后台线程中进行下载，或者使用 Windows BITS 服务(它接受 HTTP url)。这样，应用程序可以在下载过程中保持运行，并且可以在用户空闲时重新启动。每当主 exe 启动时，它会检查临时文件夹中是否存在完整的更新文件，如果找到，则提取加载程序 exe，运行它，然后退出。然后加载程序等待主 exe 完成退出，移动/重命名更新文件，然后运行它。