Сообщение List index out of bound(0)!

@Ainee · Регистрация: 25.04.2011

Author24 — интернет-сервис помощи студентам

В общем смысл процедуры: при нажатии на соответсвующую клавишу должно присходить считывание из типизированного файла элементов в массив a[n], а затем, значения из параметра .name всех записей должны помещаться в checkListBox в том же порядке как были считаны из файла...

вот код:

Delphi

begin;
n:=0
assignfile(f,'filename');
reset(f);
while not eof(f) do
begin
seek(f,n);
read(f,a[n]);
n:=n+1;
end;
closefile(f);
for i:=0 to n do
Checklistbox1.Items[i]:=a[i].name;
end;

если же используется код в таком виде то при нажатии кнопки выдает : 'List index out of bound(0)'
если работать с компонентом Мемо и заменить Checklistbox1.Items[i]:=a[i].name; на memo1.Lines[i]:=a[i].name; то всё работает...
Но мне нужен именно checkListBox...подскажите, наверняка проблема в чем то элементарном, а я не вижу(

@Lord_Voodoo · 22.04.2012, 12:31

Ainee, а у вас вообще в списке компонента есть какие-то данные, что вы так смело обращаетесь к элементам, даже без проверки на существование заданного элемента?

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

если работать с компонентом Мемо и заменить Checklistbox1.Items[i]:=a[i].name; на memo1.Lines[i]:=a[i].name; то всё работает...

а кто вам сказал, что все компоненты работают одинаково?

может вам для начала добавить все же данные с помощью метода AddItem в TCheckBoxList или Add в свойстве Items...

@Ainee · 22.04.2012, 12:55 **[ТС]**

Lord_Voodoo, благодарю за подсказку, с Checklistbox1.Items.Add(a[n].name) всё работает

Первоначально не хотела связываться с постоянным очищением строк компонента, т.к. при повторном нажатии строчки добавляются ниже, поэтому вариант с Add как то не рассматривала...но похоже всё таки выбора нет

@Lord_Voodoo Супер-модератор 8783 / 2536 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	22.04.2012, 12:31	2
	Ainee, а у вас вообще в списке компонента есть какие-то данные, что вы так смело обращаетесь к элементам, даже без проверки на существование заданного элемента? Сообщение от Ainee если работать с компонентом Мемо и заменить Checklistbox1.Items[i]:=a[i].name; на memo1.Lines[i]:=a[i].name; то всё работает... а кто вам сказал, что все компоненты работают одинаково? может вам для начала добавить все же данные с помощью метода AddItem в TCheckBoxList или Add в свойстве Items... 0

@Ainee 0 / 0 / 0 Регистрация: 25.04.2011 Сообщений: 30
	22.04.2012, 12:55 [ТС]	3
	Lord_Voodoo, благодарю за подсказку, с Checklistbox1.Items.Add(a[n].name) всё работает Первоначально не хотела связываться с постоянным очищением строк компонента, т.к. при повторном нажатии строчки добавляются ниже, поэтому вариант с Add как то не рассматривала...но похоже всё таки выбора нет 0

Опции темы