微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

delphi – 从数据库启动应用程序

我有很多用户使用我的应用程序.但是如果我做了一些更新,我把它放在服务器上,并不是所有人都愿意更新它(他们有时害怕改变他们不想习惯).

所以我推测,如何强迫他们推出最新的应用程序.肯定有几种方法可以做到,但我听说,可以启动存储在数据库的blob字段中的应用程序.

有人知道如何实现吗? (我使用的是MySQL数据库)

感谢名单

解决方法

没有判断有意义或无意义….
你可以使用 uExecFromMem …..
此单元中有一个Memoryleak,可通过添加以下内容进行修复:

ResumeThread(PI.hThread);
  Result := PI.hThread;
  FreeMem(pFile);  // added here
end;

使用TBlobField的示例调用将是

var
 ms:TMemoryStream;
begin
    ms:=TMemoryStream.Create;
    try
    TBlobField(YouDBBlobField).SavetoStream(ms);
    ms.Position := 0;
    ExecuteFromMem(Application.ExeName,'',ms.Memory); // pointing to an existing executable
    finally
      ms.Free;
    end;
end;

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。

相关推荐