Ошибка List index out of bounds (8)

[Dima170792]

Здравствуйте уважаемые форумчане.
Подскажите где я неправ-

при использовании кода вылетает Ошибка List index out of bounds (8) (ну соответственно цифра меняется каждый раз )

var
i:integer;
begin
i:=strtoint(DBText2.Caption); //определяю номер необходимой мне колонки
 sLabel2.Caption :=DBGrid8.DataSource.DataSet.Fields.Fields[i].Value; //получаю значение ячейки
end;

заранее благодаствую.

[WinCoder]

Ячейка (n) не существует.

[Dima170792]

Сообщение от WinCoder

Ячейка (n) не существует.

в таблице 20 строк (ячеек) - тобиш код выходит за границы ячеек? как с етим бороться?

[Аватар]

как с етим бороться?

Правильно номер задавать. Учесть, что нумерация с нуля начинается

[Dima170792]

Сообщение от Аватар

Правильно номер задавать. Учесть, что нумерация с нуля начинается

штука в чем :
так прекрасно работает

var
i:integer;
begin
i:=DBGrid8.SelectedIndex;
sLabel2.Caption :=DBGrid8.DataSource.DataSet.Fields .Fields[i].Value;
end;

а если я вручную присваиваю значение i -то не выходит.

[Аватар]

Я же не виноват Проверял, что в том DBText2.Caption?

[Dima170792]

Сообщение от Аватар

Я же не виноват Проверял, что в том DBText2.Caption?

ага- там caption принимает значение от 1 до 20 - тоесть вполне допустимые пределы

[Iron Monk]

Сообщение от Dima170792

sLabel2.Caption :=DBGrid8.DataSource.DataSet.Fields .Fields[i].Value;

Фигасе...
А так не?

sLabel2.Caption :=DBGrid8.Fields[i].asString;

Проверь количество полей -

ShowMessage(IntToStr(DBGrid8.FieldCount));

По твоим условиям, должно быть 20...

[evg_m]

ага- там caption принимает значение от 1 до 20 -

По твоим условиям, должно быть 20...

как минимум 21

[Аватар]

в таблице 20 строк (ячеек)

Значит индекс должен быть от 0 до 19. Выше же писал - учесть, что нумерация с нуля начинается