|
|
|
#1
|
||||
|
||||
|
You check ...
Code:
[Languages] Name: eng; MessagesFile: compiler:Languages\English.isl Insert the same name to be compiled ... Code:
Source: "Files\english.ini"; DestDir: "{tmp}"; Flags: "dontcopy";
Code:
ExtractTemporaryFile('english.ini');
Code:
if ISDoneInit(ExpandConstant('{src}\records.inf'), $F777, Comps1,Comps2,Comps3, MainForm.Handle, {#NeedMem}, @ProgressCallback) then begin
repeat
case ActiveLanguage of
'eng': ChangeLanguage('English');
end;
if not SrepInit(ExpandConstant('{app}'),512,0) then break;
if not PrecompInit(ExpandConstant('{app}'),128,PCFVer) then break;
if not FileSearchInit(true) then break;
if not ISArcExtract (0, 100, ExpandConstant('{src}\data.arc'), ExpandConstant('{app}'), '', false, '', ExpandConstant('{tmp}\arc.ini'), ExpandConstant('{app}\'), notPCFonFLY{PCFonFLY}) then break;
if not ShowChangeDiskWindow ('bla bla bla.', ExpandConstant('{src}'),'data.arc') then break;
FindHandle1:=ISFindFiles(0,ExpandConstant('{app}\*.ogg'),ColFiles1);
ExecError:=false;
while not ExecError and ISPickFilename(FindHandle1,ExpandConstant('{app}\'),CurIndex1,true) do begin
InFilePath:=ISGetName(0);
OutFilePath:=ISGetName(1);
OutFileName:=ISGetName(2);
ExecError:=not ISExec(0, 0, 0, ExpandConstant('{tmp}\oggdec.exe'), '"'+InFilePath+'" -w "'+OutFilePath+'"',ExpandConstant('{tmp}'),OutFileName,false);
end;
ISFindFree(FindHandle1);
if ExecError then break;
ISDoneError:=false;
until true;
ISDoneStop;
end;
![]() As you can read the error is written in Italian, because I translated the error line within the "English.ini" files in Italian. Same thing you can do if you do not have file (*.ini) preconfigured in your language. EDIT:The only thing that does not come back, that during installation I have not any progressbar in the task bar, as the picture you posted, maybe because I use w7. Last edited by felice2011; 04-09-2016 at 15:41. |
| Sponsored Links |
|
#2
|
|||
|
|||
|
You are magic! thanx!
|
![]() |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Masked Compression (Ultimate compression in one go) | panker1992 | Conversion Tutorials | 661 | 13-05-2024 16:51 |
| Compression Method | AzPo | Conversion Tutorials | 6 | 14-07-2016 14:26 |
| Easy Compression Tool (3 Step Method) | alley_u2 | Conversion Tutorials | 36 | 22-05-2014 05:16 |
| Best compression method? What is it? | Dooddy21 | PC Games - CD/DVD Conversions | 2 | 06-01-2014 23:23 |