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

вытащить кусок текста   Найти похожие ветки 

← →
ivc_andr ©   (2003-10-14 11:50) [0]

Ув. мастера. Подскажите пожалуйста..
мне нужно из текстового файла вытащить кусок текста. задается начальное слово и конечное слово, и между этими словами текст и нужно вытащить...Заранее благодарен!

---

← →
KSergey ©   (2003-10-14 11:52) [1]

Бижим по файлу, ищщем нужную комбинацию символов. Если нашлясть - бежим дальше. но сохраняя пройденное. Как только встретилась комбинация2 - прикращаем это гнилое дело.

---

← →
clickmaker ©   (2003-10-14 12:16) [2]

SL := TStringList.Create;
SL.LoadFromFile(FileName);
Pos1 := Pos("слово1", SL.Text);
Pos2 := Pos("слово2", SL.Text);
if (Pos1 > 0) and (Pos2 > 0) then begin
Inc(Pos1, Length("слово1"));
S := Copy(SL.Text, Pos1, Pos2-Pos1);
end;

---

← →
ivc_andr ©   (2003-10-14 13:17) [3]

получилось!!!! УРРРРРААА!.....спасибо, то что надо!!!!

---

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

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



Память: 0.45 MB
Время: 0.013 c