FMXInno Chronicles: Installer Source Code Index / Repository

[Lucifer Crossman]

Originally Posted by kaka2021

Yes, that's right. After the installation is complete, a pop-up page will appear.

I don't get it. Do you want a window with a website to pop up after installing any game?

[kaka2021]

Originally Posted by Lucifer Crossman

I don't get it. Do you want a window with a website to pop up after installing any game?

"Could you please help me see if this term 'secs' can be translated into Chinese?"

[nodesire7]

Originally Posted by audiofeel

I won't help you here, try translating everything in the russian.ini or english.ini file yourself. that's where it's translated.

I've tried these methods, but I can't translate this part. It needs to be forcibly replaced in Inno Setup because it's a parameter in the DLL. If I want to change it, I have to modify the DLL.

// 替换时分秒
function ReplaceTimeUnits(TimeStr: WideString): WideString;
var
i: Integer;
begin
Result := TimeStr;

// 先处理复数形式，再处理单数形式，避免替换不完整
while Pos(' hrs', Result) > 0 do
Result := Copy(Result, 1, Pos(' hrs', Result) - 1) + ' 小时' + Copy(Result, Pos(' hrs', Result) + 4, Length(Result));

while Pos(' hr', Result) > 0 do
Result := Copy(Result, 1, Pos(' hr', Result) - 1) + ' 小时' + Copy(Result, Pos(' hr', Result) + 3, Length(Result));

while Pos(' secs', Result) > 0 do
Result := Copy(Result, 1, Pos(' secs', Result) - 1) + ' 秒' + Copy(Result, Pos(' secs', Result) + 5, Length(Result));

while Pos(' sec', Result) > 0 do
Result := Copy(Result, 1, Pos(' sec', Result) - 1) + ' 秒' + Copy(Result, Pos(' sec', Result) + 4, Length(Result));

while Pos(' mins', Result) > 0 do
Result := Copy(Result, 1, Pos(' mins', Result) - 1) + ' 分钟' + Copy(Result, Pos(' mins', Result) + 5, Length(Result));

while Pos(' min', Result) > 0 do
Result := Copy(Result, 1, Pos(' min', Result) - 1) + ' 分钟' + Copy(Result, Pos(' min', Result) + 4, Length(Result));
end;

function ProgressCallbackEx(OverallPct, CurrentPct, DiskTotalMB, DiskExtractedMB, TotalFiles, CurFiles: Integer; DiskName, CurrentFile, RemainsTime, ElapsedTime, CurSpeed, AvgSpeed: WideString): longword;
begin
Page4Arc.Angle(OverallPct, 1000);
Page4Lbl[2].Text(IntToStr(OverallPct div 10) + '%');
Page4Lbl[11].Text(': ' + CurrentFile);
Page4Lbl[12].Text(': ' + ReplaceTimeUnits(RemainsTime));
Page4Lbl[13].Text(': ' + ReplaceTimeUnits(ElapsedTime));
Page5Lbl[3].Text(CustomMessage(UILang + 'Page5Lbl3') + #9 + ': ' + ReplaceTimeUnits(ElapsedTime));

Result:= ISArcExCancel;
end;

I succeeded by modifying it this way.



I checked other script, and it's all similar. Making slight modifications, similar to what I sent, allows for successful replacement.

[nodesire7]

Originally Posted by audiofeel

I won't help you here, try translating everything in the russian.ini or english.ini file yourself. that's where it's translated.

Why do other people encounter errors when installing the downloaded files?

Did the file get corrupted during download?

Have you ever encountered this situation where I can install the file normally after downloading it myself, but others can't?

Does the packaging method have hardware requirements during decompression?