Unigui服务器绿色发布

在ServerModule单元里

1、在Uses中添加IOUtils；

2、在on BeforeInit中添加：

 //发布时使用，将extjs相关目录放到执行文件相同的目录

if DirectoryExists(TPath.GetDirectoryName(ParamStr(0))+'\ext-6.5.3') then
begin
Self.UniRoot :='uni-1.50.0.1479';      //随版本改变
Self.ExtRoot :='ext-6.5.3'
end;

转载于:https://www.cnblogs.com/mascgh/p/9764964.html