论坛风格切换切换到宽版
  • 1891阅读
  • 7回复

求助虎版,如果增加我补丁的记录 [复制链接]

上一主题 下一主题
离线373723699
 

发帖
38
金钱
380
威望
38
只看楼主 倒序阅读 0 发表于: 2016-03-18
虎版你好,我做了几个补丁包,都是对同一款软件上用的,有的是补丁1,有的是补丁2。
现在的需求是装了几个补丁,就在软件目录下有相应的记录,我每个补丁会有一个记事本文件来记录更新内容。
有没有什么好的解决办法呢?难道我装3个补丁,要再目录下生成3个txt文件?这个对用户来说有点不方便,能不能集中一个文件。
求好办法指教一下
离线gnatix

发帖
7696
金钱
-8279
威望
-828
只看该作者 1 发表于: 2016-03-18
你当然可以直接修改现有的(如果存在)的某个文本文件。你最好给个具体的例子,你想记录什么内容。直接在原有文件的后面附加一段新的文字,这个非常简单,但是你想要的效果估计要复杂一些。
离线373723699

发帖
38
金钱
380
威望
38
只看该作者 2 发表于: 2016-03-18
回 1楼(gnatix) 的帖子
虎版,是这样的,我补丁包的内容会附带一个叫做 “更新说明”的txt,这个txt内容就是
V1.0.0  补丁内容
1:增加XXX
2:修改了XXXbug

而我另一个补丁比如是V1.0.1

V1.0.1  补丁内容
1:增加XXX
2:修改了XXXbug

假设用户连续安装了两个补丁,那不是会出现两个txt嘛?其实没必要,我的目的想让他们在一个txt里面就好。

V1.0.0  补丁内容
1:增加XXX
2:修改了XXXbug

V1.0.1  补丁内容
1:增加XXX
2:修改了XXXbug

PS:用户可能只安装了V1.0.1 的补丁,那么1.0.0的补丁信息他就没必要看到。



离线gnatix

发帖
7696
金钱
-8279
威望
-828
只看该作者 3 发表于: 2016-03-20
在你的补丁安装程序中增加下面的内容

procedure CurStepChanged(CurStep: TSetupStep);
begin
  if CurStep=ssDone then
    begin
      if FileExists(ExpandConstant('{app}\更新说明.txt')) then
        SaveStringToFile(ExpandConstant('{app}\更新说明.txt'), #13#10 + 'V1.0.1  补丁内容' + #13#10, True)
      else
        SaveStringToFile(ExpandConstant('{app}\更新说明.txt'), 'V1.0.1  补丁内容' + #13#10, False);
      SaveStringToFile(ExpandConstant('{app}\更新说明.txt'), '1:增加XXX' + #13#10, True);
      SaveStringToFile(ExpandConstant('{app}\更新说明.txt'), '2:修改了XXXbug' + #13#10, True);
    end;
end;
离线373723699

发帖
38
金钱
380
威望
38
只看该作者 4 发表于: 2016-03-21
虎版,如果我想在更新内容后增加一处,记录安装补丁的当前时间日期,应该怎么做
离线373723699

发帖
38
金钱
380
威望
38
只看该作者 5 发表于: 2016-03-21
回 3楼(gnatix) 的帖子
gnatix:在你的补丁安装程序中增加下面的内容 procedure CurStepChanged(CurStep: TSetupStep);begin  if CurStep=ssDone then....... (2016-03-20 00:06)

虎版,如果我想在更新内容后增加一处,记录安装补丁的当前时间日期,应该怎么做

   SaveStringToFile(ExpandConstant('{app}\IAP软件补丁包安装记录.txt'), 'IAP_SP_V2.0.1.0(H).4  GetDateTimeString(‘ddddd’, #0, #0)' + #13#10, False);
编译不通过
离线gnatix

发帖
7696
金钱
-8279
威望
-828
只看该作者 6 发表于: 2016-03-22
试试这个:
SaveStringToFile(ExpandConstant('{app}\IAP软件补丁包安装记录.txt'), 'IAP_SP_V2.0.1.0(H).4  ' + GetDateTimeString(‘ddddd’, #0, #0) + #13#10, True);

离线axlswd

发帖
95
金钱
910
威望
91
只看该作者 7 发表于: 2016-03-23
回 5楼(373723699) 的帖子
373723699:虎版,如果我想在更新内容后增加一处,记录安装补丁的当前时间日期,应该怎么做   SaveStringToFile(ExpandConstant('{app}\IAP软件补丁包安装记录.txt'), 'IAP_SP_V2.0.1.0(H).4  GetDateTim .. (2016-03-21 09:51) 

老虎版主已经给出了答案,你自己变通一下,和三楼代码放在一起:
SaveStringToFile(ExpandConstant('{app}\更新说明.txt'), '更新时间 ' + GetDateTimeString('ddddd', #0, #0) + #13#10, True);