Il faut inverser les lignes
Code: Select all
LineNr := FindLine('<H2><A NAME="tvs">TV series</A></H2>', Page, LineNr);
Code: Select all
LineNr := FindLine('<H2><A NAME="vid">Made for video</A></H2>', Page, LineNr);
Code: Select all
LineNr := FindLine('<H2><A NAME="tvs">TV series</A></H2>', Page, LineNr);
Code: Select all
LineNr := FindLine('<H2><A NAME="vid">Made for video</A></H2>', Page, LineNr);