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

Добрый день. Спомощью этого кода я обрезаю строки до   Найти похожие ветки 

← →
mikey   (2004-08-09 14:16) [0]

некоторого символа(ов)
s:=Edit1.Text;
sl:=TStringList.Create;
sl.LoadFromFile(Fileopen1.Dialog.FileName);
for i:=0 to sl.Count-1 do
if pos(s,sl[i])<>0 then
Sl[i]:=copy(sl[i],0,pos(s,sl[i])+length(s)-1);
sl.SaveToFile(FileOpen1.Dialog.FileName);
sl.Free;
RichEdit1.Lines.LoadFromFile(Fileopen1.Dialog.FileName);

А как мне вывести в label кол-во обрабатываемых строк т.е  те которые были обрезаны

---

← →
Sandman25 ©   (2004-08-09 14:18) [1]

а подумать?

---

← →
Digitman ©   (2004-08-09 14:38) [2]

это оч сложно ... даже и браться за эту задачу не стоит

---

← →
Мастер ©   (2004-08-09 14:43) [3]

Воспользуйся TMemo.Lines.Count

---

← →
Думкин ©   (2004-08-09 14:48) [4]

> [3] Мастер ©   (09.08.04 14:43)

Не...Лучше TStreamMemory.Size

---

← →
mikey   (2004-08-09 14:49) [5]

поровал через
for i:=0 to sl.count-1 do
sl.count;
label1.caption:=IntToStr(i);
Но считается весь список, а мне надо только те которые обрезаются. Подскажите как это задать.

---

← →
Sandman25 ©   (2004-08-09 14:53) [6]

[5] mikey   (09.08.04 14:49)

Разберитесь с тем, что делает программа из [0] в каждой своей строке. После этого сможете ее подправить, чтобы получить требуемое

---

← →
mikey   (2004-08-09 16:23) [7]

[5] mikey   (09.08.04 14:49)

Разберитесь с тем, что делает программа из [0] в каждой своей строке. После этого сможете ее подправить, чтобы получить требуемое

Что-то не выходит может все же подскажите

---

← →
mikey   (2004-08-09 16:24) [8]

Удалено модератором

---

← →
Digitman ©   (2004-08-09 16:25) [9]

> Что-то не выходит


для того чтобы что-то "вышло", необходимо чтобы это "что-то" сначала "вошло"

---

← →
mikey   (2004-08-09 16:28) [10]

Удалено модератором

---

← →
KSergey ©   (2004-08-09 16:28) [11]

> [8] mikey   (09.08.04 16:24)

Т.е. она не ваша? Или она получена методом последовательного перебора последователности нажатия кнопок до получения требуемого результата??

---

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

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



Память: 0.47 MB
Время: 0.022 c