Автор: FROST999
Дата сообщения: 08.12.2010 14:33
vint56
Что вот сюда надо прописать?
[more] //if not ISArcExtract ( 0, OveralPct, 0, ExpandConstant('{src}\Data.bin'), ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
;//if not ISArcExtract ( 0, OveralPct, 0, ExpandConstant('{src}\Data2.bin'), ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
if not ISSRepExtract ( 0, OveralPct, 0, ExpandConstant('{app}\Data.srp'), ExpandConstant('{app}\Data.pcf'), '', true, CallBack ) then break;
//if not ISPrecompExtract( 0, OveralPct, 0, ExpandConstant('{app}\Data.pcf'), ExpandConstant('{app}\Data.7z'), true, CallBack ) then break;
//if not IS7ZipExtract ( 0, OveralPct, 0, ExpandConstant('{app}\Data.7z'), ExpandConstant('{app}'), true, CallBack, '' ) then break;
//if not ISArcExtract ( 0, OveralPct, 0, ExpandConstant('{src}\Data1.bin'), ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
// if not ShowChangeDiskWindow('Пожалуйста, вставьте диск 2 и дождитесь его инициализации.', ExpandConstant('{src}'),'CODMW2_Disk2.arc' ) then break;
// if not ISArcExtract ( 1, OveralPct, 0, ExpandConstant('{src}\rustext.arc'), ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
// if not ISArcExtract ( 2, OveralPct, 0, ExpandConstant('{src}\engtext.arc'), ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
// if not ISArcExtract ( 3, OveralPct, 0, ExpandConstant('{src}\rusvoice.arc'),ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
// if not ISArcExtract ( 4, OveralPct, 0, ExpandConstant('{src}\engvoice.arc'),ExpandConstant('{app}'), false,CallBack, '', '', '') then break;
MyError:=false;
[/more]