[prays]

Код:

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 name ='admin' then aini:=TiniFile.Create(ExtractFilePath(ParamStr(0)) + 'admin.ini');
if name ='prodavec' then aini:=TiniFile.Create(ExtractFilePath(ParamStr(0)) + 'prodavec.ini');
if name ='manager' then aini:=TiniFile.Create(ExtractFilePath(ParamStr(0)) + 'manager.ini');

и дальше как есть


Да к стати есть вариант что Tinifile.Create(ExtractFileDir(Application.exename )+'\admin.ini'); сработает лучше чем тот что у вас