Как я могу перезаписать существующий файл журнала в настройке Inno

Question

Как я могу перезаписать существующий файл журнала в настройке Inno

Я новичок в установке Inno. Мне нужна информация о регистрации, для этого я установил SetupLogging=yes и использовал следующий код для получения файла журнала.

procedure CurStepChanged(CurStep: TSetupStep);
    var
 logfilepathname, logfilename, newfilepathname: string;

 begin
  logfilepathname := expandconstant('{log}');
  logfilename := ExtractFileName(logfilepathname);
  newfilepathname := expandconstant('{app}\') +logfilename;

  if CurStep = ssDone then
  begin
    filecopy(logfilepathname, newfilepathname, false);
  end;
 end;

но, как и когда я устанавливаю установщик, он генерирует новый файл журнала с именами файлов, такими как журнал установки 2014-08-11 #001, журнал установки 2014-08-11 #002 и так далее.

Но я не хочу нескольких файлов журнала, даже если я запускаю установщик несколько раз. Я хочу, каждый раз, когда я запускаю его, он должен перезаписывать сам существующий файл журнала. Я имею в виду, что должен быть только один файл журнала. Как я могу добиться этого?

3

logging installer overwrite logfiles

Источник

beginner 11 авг '14 в 11:40

1 ответ

Решение

Другие вопросы по тегам logging installer overwrite logfiles

beginner 12 авг '14 в 08:11 2014-08-12 08:11 · Accepted Answer · 2014-08-12 08:11

Да я получил его. Я просто изменил свой сценарий следующим образом:

[Code]
procedure CurStepChanged(CurStep: TSetupStep);
var
  logfilepathname, logfilename, newfilepathname: string;
  begin

  logfilepathname := expandconstant('{log}');

// logfilename := ExtractFileName(logfilepathname); 

// RenameFile(logfilename,'Setup_Log.log');

 newfilepathname := expandconstant('{app}\') +'Setup_Log.log'

 if CurStep = ssDone then
  begin
     filecopy(logfilepathname, newfilepathname, false);
  end;

  end;