Скачать: CL | DM;

TStrings - уничтожение лишних строк.   Найти похожие ветки 

← →
guest__   (2005-12-09 19:14) [0]

for i:=0 to f.Count-1 do
 begin
 if f.strings[i]="*" then
 f.Delete(i);
 end;
Эмм..как это можно реализовать другим способом или что подставить вместо коунт дабы не вылазила ошибка о том что новер строки не найдет, т.к. ее уже удалили...=)

---

← →
begin...end ©   (2005-12-09 19:16) [1]

for i := f.count - 1 downto 0 do ...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.028 c