antp.be forum

Perfecto, Ronin666 . Mucho mejor tu solución que la mía.

Todo el "follón" es porque la búsqueda avanzada de FilmAffinity incorpora delante del año la bandera de la nacionalidad (como antes) pero precedida a su vez del tipo de "producto visual" al que se refiere: Serie, TV, Cortometraje, etc... y ...

He actualizado con un apaño.

Dentro de la parte "procedure AnalyzeAdvPage(Address: string);"

Borra esto:

MovieYear := TextBetween(Line, '</a> (', ') <img class="nflag" src="/imgs/countries2/');
if MovieYear = '' Then MovieYear := YearAnt
else YearAnt := MovieYear;

Line:= Page.GetString ...

Mientras actualizan el script, he hecho algunos cambios en "Director" y "Intérpretes" que es donde falla, para que siga funcionando:


// Director
LineNr := FindLine(UTF8Encode('class="directors">'), Page, LineNr);
if LineNr <> -1 then
begin
Line := Page.GetString(LineNr + 1);
Item ...