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

[Gnom_aka_Lexander]

Mat_y, nik1967,

[Alloc]

Gnom_aka_Lexander, спасибо за помощь)

[Alloc]

Shkutu,

Так а вот с этим что делать

Вот сам скрипт

http://rghost.ru/49047898

[Gnom_aka_Lexander]

Alloc, нет. Справка, описание функций. В первой все в порядке, вот в последующих -

function ISSrepExtract (CurComponent:Cardinal; PctOfTotal:double; InputFile, OutputFile:string; DeleteInFile:boolean):boolean;

тут нужно true. в остальных последующих тоже.

(Из справки - DeleteInFile - удаление исходного архива после распаковки.)

[Alloc]

Цитата Mat_y:



Допишите в Var

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

не в var а в type

[nik1967]

доброе время суток.дайте мне пожалуйста скрипт на завершение работы процесса до установки и до удаления программы

[Alloc]

nik1967, Спасибо за ответ. Пожалуйста, можете немного по подробнее об этом... я пробовал еще так:





Код:

Код: Выделить всё

if not ISExec ( 0, 0, 0, ExpandConstant('{tmp}\Arc.exe'), ExpandConstant('x -o+ "{src}\Data.bin" -dp"{app}"'), ExpandConstant('{tmp}'), '...',False) then break;
if not ISExec ( 0, 0, 0, ExpandConstant('{tmp}\precomp.exe'), ExpandConstant('-r "{app}\Data.srp {app}\Data.pcf"'), ExpandConstant('{tmp}'), '...',False) then break;
if not ISExec ( 0, 0, 0, ExpandConstant('{tmp}\srep.exe'), ExpandConstant('-mem512b -d -s -r "{app}\Data.pcf {app}\Data.arc"'), ExpandConstant('{tmp}'), '...',False) then break;
if not ISArcExtract ( 0, 0, ExpandConstant('{app}\Data.arc'), ExpandConstant('{app}\data1'), '', true, '', '', ExpandConstant('{app}'), notPCFonFLY {PCFonFLY}) then break;

Но вылазит ошибка на втором архиве... Хотя по идее должно работать.. Вообщем цель - распаковать .srep -> .pcf - в скрытом режиме а конечный архив .arc уже что б был виден в инсталляторе...



Буду очень признателен за помощь. Спасибо заранее .

[audiofeel]

Цитата Johny777:



и чем тебя не устраивает метод GetFileVersion FileSystemObject-а, который предложил nik1967

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

Да Вы не поняли...сам метод меня полностью устраивает... я спросил "как дальше сравнить полученную версию файла с эталонной (допустим версия должна быть выше 2.0.0.1 и если версия ниже, то выдать окно с сообщением, что на данную версию продолжить установку нельзя).

[Alloc]

audiofeel, большое спасибо, я попробую

Большое спасибо за помощь, все прекрасно работает. Этого я и добивался)

Еще подскажите пожалуйста, какими командами можно установить пароль для архива?

[vint56]

Alloc

arc.exe a -ep1 -dses --dirs -s; -lc- -di -i2 -r "-hpvint56" -mprecomp+srep:l512+lzma:a1:mfbt4:d176m:fb128:mc1000:lc8 data.bin packeddata\*



if not ISArcExtract ( 0, 0, ExpandConstant('{src}\data.bin'), ExpandConstant('{app}'), '', false, 'vint56', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}'), notPCFonFLY {PCFonFLY}) then break;