[toNN]

Создаю приложение, с разграниченными правами для разных групп пользователей. Соответственно для каждой группы имеется свой ини файл с настройками. Данные в ини файл сохраняются без особых проблем, но в процедура с чтением упорно отказывается работать. Суть в том что после авторизации пользователя, переменной 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);

При запуске программы вылазит ошибка. В чем может быть проблема?

[Страдалецъ]

Ну видимо не срабатывает ваш if и как следствие не создается AIni, ну и при обращение к свойствам несуществующего объекта получаете ваше сообщение.

[Страдалецъ]

Возможно вы вводите имя не совсем так как запланировано.

[toNN]

Уже думал над таким вариантом, поэтому пробывал убрать все условия, оставлял только создание файла, все равно такая ошибка

[Страдалецъ]

Исключение срабатывает на создание или обращение?
Возможно поможет создание нового пустого проекта, куда скопировать эти пару строчек для эксперимента.

[toNN]

на создание. Создал новый проект из 2х форм, кинул туда этот ини файл, чекбоксы и эту процедуру. Эффект тот же самый.