Текущий архив: 2002.01.17;
Скачать: CL | DM;
Вниз
EStringlistError Найти похожие ветки
← →
Lamok (real) (2001-12-28 23:23) [0]Всем доброго времени суток !!!
Постите если такой вопрос уже звучал, но очень надо !!!
Ну там прога большая и тут типа удаляется запись из лист бокса если
таковая есть если запись не первая то все работает а если удаляемая запись
первая то ошибку выдает говрит list index out of baunds(1) помоему, так в чем
проблема ??
Приивожу кусок кода:
if p="/e" then
begin
delete(s,1,2);
for e:=0 to lb1.Items.Count-1 do
begin
if s=lb1.Items.Strings[e] then <<стрелку компелятор тут ставит
begin
lb1.Items.Delete(e);
lb2.Items.Delete(e);
end;
end;
end;
Всем заранее спасибо !!
← →
MBo © (2001-12-29 06:35) [1]ПОТОМУ ЧТО количество записей при удалении УМЕНЬШАЕТСЯ.
сделай
for e:=lb1.Items.Count-1 downto 0 do
Страницы: 1 вся ветка
Текущий архив: 2002.01.17;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.01 c
