Создаю приложение, с разграниченными правами для разных групп пользователей. Соответственно для каждой группы имеется свой ини файл с настройками. Данные в ини файл сохраняются без особых проблем, но в процедура с чтением упорно отказывается работать. Суть в том что после авторизации пользователя, переменной name присваивается значение группы в которой состоит пользователь, далее при создание главной формы как раз и должны прочитываться данные. Вот кусок кода:
Код:
if name='admin' then AIni:=TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'admin.ini') else
if name='prodavec' then AIni:=TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'prodavec.ini') else
if name='manager' then AIni:=TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'manager.ini');
form15.CheckBox1.Checked:=Aini.ReadBool('tovar','check',true);
form15.CheckBox2.Checked:=Aini.ReadBool('tovar','check2',true);
form15.CheckBox3.Checked:=Aini.ReadBool('tovar','check3',true);
form15.CheckBox4.Checked:=Aini.ReadBool('tovar','check4',true);
При запуске программы вылазит ошибка. В чем может быть проблема?