[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;