我需要一些帮助loadinf function
const
Section = 'Setup';
procedure LoadInf(const FileName: String; var WantToSuppressMsgBoxes: Boolean);
var
S: String;
begin
//saved infs
InitLang := GetIniString(Section, 'Lang', InitLang, FileName);
InitDir := GetIniString(Section, 'Dir', InitDir, FileName);
InitProgramGroup := GetIniString(Section, 'Group', InitProgramGroup, FileName);
InitNoIcons := GetIniBool(Section, 'NoIcons', InitNoIcons, FileName);
InitSetupType := GetIniString(Section, 'SetupType', InitSetupType, FileName);
S := GetIniString(Section, 'Components', '$', FileName);
if S <> '$' then begin
InitComponentsSpecified := True;
SetStringsFromCommaString(InitComponents, SlashesToBackslashes(S));
end;
S := GetIniString(Section, 'Tasks', '$', FileName);
if S <> '$' then begin
InitDeselectAllTasks := True;
SetStringsFromCommaString(InitTasks, SlashesToBackslashes(S));
end;
end;
我遇到了问题
SetStringsFromCommaString(InitComponents, SlashesToBackslashes(S));
有没有办法在inno中执行此功能?
可以找到SetStringsFromCommaString
here,但无法进行编译
最诚挚的问候,是BeGiN。