Глюк

← →
LiteStone (2007-01-28 11:04) [0]

Удалено модератором
Примечание: п. 5.

← →
Virgo_Style © (2007-01-28 11:15) [1]

первый вариант, по всей видимости, должен будет удалить 5 файлов через один, хотя без кода затруднительно сказать что-либо.

Хмм, а ведь ты, пожалуй, begin-end забыл, вот что...

← →
SoulFlow © (2007-01-28 11:31) [2]

Полный вариант

1 раз повторяется
for i:=min to max do begin
DeleteFile(Listbox.Itesm.String[Min]);
Listbox.Items.Delete(Min);
end;

Столько сколько надо
for i:=min to max do begin
Listbox.Items.Delete(Min);
end;

← →
LiteStone (2007-01-28 11:33) [3]

SoulFlow это мой второй ник

← →
SerJaNT © (2007-01-28 11:38) [4]

> [0] LiteStone (28.01.07 11:04)

Я нихрена не понял в чем проблема! Сформулируй лучше вопрос и поставь запятые где надо.

← →
antonn © (2007-01-28 11:47) [5]

думаю проблема в for i:=max downto min
:)

← →
LiteStone (2007-01-28 11:51) [6]

Поясняю для SerJaNT

Цикл выполняется 1 раз
for i:=min to max do begin
DeleteFile(Listbox.Itesm.String[Min]);
Listbox.Items.Delete(Min);
end;

Цикл выполняется от min до max
for i:=min to max do begin
Listbox.Items.Delete(Min);
end;

Функция DeleteFile почему-то даёт циклу выполняться только 1 раз.

← →
LiteStone (2007-01-28 11:58) [7]

antonn проблемы идут одна за другой.

Цикл выполняется(Это уже хорошо),из Listbox удаляется все как надо,
но файлы с диска не удаляются.

> for i:=min to max do begin
> DeleteFile(Listbox.Itesm.String[Min]);
> Listbox.Items.Delete(Min);
> end;
>
> Цикл выполняется от min до max
> for i:=min to max do begin
> Listbox.Items.Delete(Min);
> end;

Почувствуй разницу:
for i:=min to max do begin
DeleteFile(Listbox.Itesm.String[i]);
Listbox.Items.Delete(i);
end;

Цикл выполняется от min до max
for i:=min to max do begin
Listbox.Items.Delete(i);
end;

Может это из-за того что, если в цикле удалять элементы листбокса, то из-за удаления сбивается нумерация item"ов?

Кинь исходник!

Глюк Найти похожие ветки