[string] recherche dans code HTML
bonjour,
j'essaye a partir d'un code source de recuperer des données
celles ci sont encadrées par les balises <H1> et <H2>
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| for Loop := Memo1.Lines.Count - 1 downto 0
do begin
if (pos(H2,Memo1.Lines[Loop]) <> 0)
then begin
A := copy(Memo1.Lines[Loop],pos(H2, Memo1.Lines[Loop]) + 4,255);
album[i] := Gauche(H2b,A);
i:=i+1;
Mylist.add(album[i]);
end;
if (pos(H1, Memo1.Lines[Loop]) <> 0)
then begin
S := copy(Memo1.Lines[Loop],pos(H1, Memo1.Lines[Loop]) + 4,255);
serie := Gauche(H1b,S);
end;
end; // for Loop |
voici la boucle que j'utilise
celle ci marche tres bien quand je mets uniquerment la boucle avec detection de H1. des que je colle l'autre boucle if avec H2, ca bug.
impossible d'avoir les données encadrées par H2.
pourtant les deux boucles sont identiques.
un point les differe : il peut exister plusieurs balises H2 donc je les mets dans une liste.
si qq un voit une erreur merci davance
