Показать сообщение отдельно
  #8  
Старый 12.03.2016, 16:25
starcon starcon вне форума
Новичок
 
Регистрация: 15.03.2014
Сообщения: 84
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Код:
Var
Priv:string;
begin
form8.ADOQuery1.sql.text:='select privilegue from pol where name ="123"';
form8.ADOQuery1.open;
Priv:=ADODataSet1.Fields[0].AsString;
If priv='Администратор' then
Begin

End;
end;
Пользователь 123 есть в базе
Столбы
1.privilegue (Администратор, Пользователь)
2.name (123, 234)
Таблица pol

Ругается на
List index out of bounds (0)
Ответить с цитированием