[Code]
procedure CurStepChanged(CurStep: TSetupStep);
var
languageName: string;
begin
if CurStep=ssDone then // 软件安装后执行
begin
languageName := ActiveLanguage(); // 获取用户选择的语言
if 'cn' = languageName then
begin
SetIniString('ChangeLanguage','Language','简体中文',ExpandConstant('{app}/Configuration/SystemSetting/systemsetting.ini'));
end
else if 'en' = languageName then
begin
SetIniString('ChangeLanguage','Language','English',ExpandConstant('{app}/Configuration/SystemSetting/systemsetting.ini'));
end;
end;
end;
// 函数原型帮助理解怎么修改配置文件:
function SetIniString(const Section, Key, Value, Filename: String): Boolean;