Isexec (ISdone)

[Pein46]

Change like this..

example:

    if ISDoneInit(ExpandConstant('{src}\records.inf'), $F777, Comps1,Comps2,Comps3, MainForm.Handle, {#NeedMem}, @ProgressCallback) then begin
      repeat
        ChangeLanguage('English');
        if not SrepInit('',512,0) then break;
        if not PrecompInit('',128,PCFVer) then break;
        if not FileSearchInit(true) then break;

        if not ISArcExtract    ( 0, 0, ExpandConstant('{src}\data1.bin'), ExpandConstant('{app}\'), '', false, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}\'), notPCFonFLY{PCFonFLY}) then break;
        if not ISSRepExtract   ( 0, 0, ExpandConstant('{app}\*.srep'),ExpandConstant('{app}\~data0000.pcf'), true) then break;
        if not ISPrecompExtract( 0, 0, ExpandConstant('{app}\*.pcf'),    ExpandConstant('{app}\data.arc'), true) then break;
        if not ISArcExtract    ( 0, 0, ExpandConstant('{app}\data.arc'), ExpandConstant('{app}\'), '', true, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}\'), notPCFonFLY{PCFonFLY}) then break;

Compile and run setup until finished.. then add records.inf(can be found on source folder) to your script

#define records
.
.
[Files]
Source: records.inf; DestDir: {tmp}; Flags: dontcopy

Compile and run setup again..