Ładny brzuch

Pobieram do pamici programu acuch znakw. W tym acuchu jest duo tekstu. Jak wyodrbni z tego to co znajduje si midzy znacznikami <span class='flight espionage'> a </span>??

Tego <span class='flight espionage'> cotam </span> moe by nieskoczenie wiele, nawet koo setki. Jak je wszystkie dopisa do ListBox-a ??

I potem jak do drugiego ListBoxa zapisa to co znajduje si midzy znacznikami <span class='flight attack'> a </span>?? Tego te moe by nieskoczenie wiele.

Musz mie je w liniach w List-Boxie i mie liczb ich wszystkich.

Mamnadziej, e kto pomoe. Pozdro



Niedawno byo co podobnego o wyciganiu sessionid :excl:
procedure TForm1.Button1Click(Sender: TObject); const  Znacznik = '<span class=''flight espionage''>';  Znacznik_koniec = '</span>'; var  Text, S: string;  I: Integer; begin  Text := Memo1.Lines.Text;  while True do  begin    I := Pos(Znacznik, Text);    if I <> 0 then    begin      Text := Copy(Text, I + Length(Znacznik), Length(Text) - I - Length(Znacznik));      S := Copy(Text, 1, Pos(Znacznik_koniec, Text) - 1);      ListBox1.Items.Add(S);    end else Break;  end; end;

// Oczywicie ten tekst jest w Memo1 ;)
Uytkownik lukexpert edytowa ten post 12 luty 2006, 14:50
ale miaem problem z wielokrotnoci.


ale miaem problem z wielokrotnoci.



spoko dziaa wielkie dziki

A jak z tego co dopisuj wywali wszystkie znaczniki HTML-a ??
Uytkownik pawkow edytowa ten post 12 luty 2006, 15:13
  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
  •