Скрипты Inno Setup. Помощь и советы [часть 8]

Nordek · Конфигурация компьютера

dracosha, Смотрите:

Обратите внимание под столбцами "Изменен" и "Дата создания".

Изменён - это дата создания/изменение самого инсталлятора.
Дата создания - это дата появления на носителе (Скачивание/копирование откуда-либо)

dracosha · Отправлено: **23:46, 22-01-2016** | #**1252**

Nordek, файл я удаляю, затем открываю свой скрипт.iss китайским компилятором Inno и жму кнопку Компиляция, через 20 секунд новый файл появляется на диске, которого не было. Вопрос: какие даты создания и изменения должны быть у этого файла? Разницу в несколько секунд я конечно же допускаю, но разница та почти в две недели. Я как-то раньше обращал на это внимание и все было в порядке, это точно... Может какие системные глюки.

Nordek · Конфигурация компьютера

Цитата dracosha:

какие даты создания и изменения должны быть у этого файла? »

В столбце "Изменён" - Дата создания самого инсталлятора. Т.е вы создали инсталлятор 22 января 2016 года в 15:00, таковой она и останется.
Дата в столбце "Дата создания" условная. Т.е может меняться от перемещения, копирования, скачивания и т.д.

Цитата dracosha:

но разница та почти в две недели. »

В директиве OutputBaseFilename, которая в секции [Setup], назначьте другое имя на выходе.
Пример:

Код:

OutputBaseFilename=setup1

vadjliss · Отправлено: **07:52, 23-01-2016** | #**1254**

парни подскажите как убрать время создания файла

dracosha · Отправлено: **09:50, 23-01-2016** | #**1255**

Nordek, спасибо большое. Хоть файл я и удалял, но данные о его создании где-то все равно оставались. После твоего совета удалил свой файл и рестартанул систему - все стало на место.

Возник вопрос... Можно ли через препроцессор в китайской версии организовать удаление файла указанного в директиве OutputBaseFilename секции [Setup] до того как начнется компиляция?
p.s. варианты с ком.строкой не интересны.

kotyarko@fb · Отправлено: **13:06, 23-01-2016** | #**1256**

Цитата dracosha:

Можно ли через препроцессор в китайской версии организовать удаление файла указанного в директиве OutputBaseFilename секции [Setup] до того как начнется компиляция? »

Можно попробовать так:

Код:

#DeleteFile(SetupSetting("OutputBaseFilename"))

dracosha · Отправлено: **15:10, 23-01-2016** | #**1257**

kotyarko@fb, не прокатило

Скриншот

kotyarko@fb · Отправлено: **15:55, 23-01-2016** | #**1258**

dracosha, тогда как-то так:

Код:

#expr DeleteFile(AddBackslash(SetupSetting("OutputDir")) + SetupSetting("OutputBaseFilename"))

dracosha · Отправлено: **16:10, 23-01-2016** | #**1259**

kotyarko@fb, да, так собирается, только я не успеваю проверить удаляется файл или нет

А вообще да, товарищ Nordek прав, дата создания файла условная и зависит от времени перемещения, копирования и скачивания.
И совсем не стоит заморачиваться на этой дате.

vadjliss · Отправлено: **14:24, 24-01-2016** | #**1260**

парни помогите два скрипта соединить вместе голову уже сломал

Код:

procedure CurStepChanged(CurStep: TSetupStep);
var
  ErrorCode: Integer;
begin
  If CurStep = ssDone then
begin
  ShellExec('open', 'http://forum.oszone.net//', '', '', SW_SHOWNORMAL, ewNoWait, ErrorCode)
end;
end;

Код:

procedure CurStepChanged(CurStep: TSetupStep);
var
  HostFile: TStringList;
begin
  HostFile := TStringList.Create;
  try
    with HostFile do
    if CurStep = ssPostInstall then
    begin
      LoadFromFile(ExpandConstant('{sys}\drivers\etc\hosts'));
      Add('127.0.0.1    www.xxx');
      Add('127.0.0.1    www.xxx');
      Add('127.0.0.1    www.xxx');
      Add('127.0.0.1    xxx');
      Add('127.0.0.1    xxx');
      Add('127.0.0.1    xxx');
      SaveToFile(ExpandConstant('{sys}\drivers\etc\hosts'));
    end;
  finally
    HostFile.free;
  end;
end;