antp.be forum

Et en tapant "The Matrix" avec les guillemets, c'est mieux ?

I have this function in one of my scripts. It converts an Unicode (UTF8) text to Ascii Latin-1, droping all non-translatable characters.
function UTF8ToAscii(text:string):string;
var
i:integer;
c:integer;
first:integer;
begin
for i:=1 to length(text) do
begin
c:=ord(copy(text,i,1));
if c ...

J'avais déjà signalé le problème, mais les derniers scripts n'ont pas été corrigés : la recherche sur l'IMDb liste d'abord les les films "made for video" puis les séries.

Il faut inverser les lignes LineNr := FindLine('<H2><A NAME="tvs">TV series</A></H2>', Page, LineNr); et LineNr := FindLine('<H2 ...

È meglio scrivere inglese o francese, se può.

English translation of his message:
Hello everybody...
I'm working to post in the forum a template in PHP and Flash for this (fichissimo ???) program

Anyone who wants to contribute is welcome.
See you soon with more details...

Traduction en français ...

The following is the simplest ASX file as created by ZoomPlayer (Windows Media Player puts a lot more stuff in it):
<ASX version="3.0">
<ENTRY><REF href="movie1.avi" /></ENTRY>
<ENTRY><REF href="movie2.avi" /></ENTRY>
<ENTRY><REF href="movie3.avi" /></ENTRY>
<ENTRY><REF href="movie4.avi ...

[ita] Ci penserò io, se ho tempo questa settimana. A meno che qualcun altro voglia farlo.

[eng] I will work on it if I have time this week. Unless someone else wants to do it. If so, search url is :
'http://www.dvd.it/index.cgi?page=list&tito='+SearchString
or
'http://www.dvd.it/index.cgi?page=list ...

[FR] Le script pour Cinematografo.it ne s'arrête pas s'il n'y a pas d'annotations.

[IT] Lo script per Cinematografo.it non ferma se non c'è note.

Remplacer/Sostituire

else if pos('<strong>Note</strong>', Line) <> 0 then

par/con

else if pos('</table>', Line) <> 0 then

[FR] Dans le script pour Yahoo, j'ai repéré deux petits bugs pour les cas où le film n'est pas trouvé.

[IT] Nello script per Yahoo, ho scoperto due errori nei casi che lo film non é trovato.

// GETINFO SCRIPTING
// Yahoo!Cinema

(***************************************************
* Movie ...

[FR] Dans les 2 scripts, la fonction GetLineFromOtherPage est inutile.

[IT] In entrambi gli script, la funzione GetLineFromOtherPage è inutile.

Le script est nettement plus compact que la version précédente (8 ko au lieu de 14), c'est normal ou bien il manque un bout ?

C'est normal : j'ai dû appuyer un peu trop sur Ctrl-V et le script y était deux fois. Je l'avais remarqué et corrigé mais tu es sûrement passé le récupérer avant.

Non essendo il sito di Film-Up completo, perchè mancano tanti films, mi hanno chiesto se potresti fare uno script per :

http://it.movies.yahoo.com

Quel sito mi sembra un po' più complicato di FilmUp. Ma tenterò fare il script.

[FR] Légère modification de GetComments pour éviter les blancs en début de ligne.

[IT] Lieve modificazione di GetComments per evitare i bianchi in inizio di riga.

procedure GetComments(address: string);
var
Page: TStringList;
BeginLine: integer;
EndLine: integer;
i: integer;
Line, Comments ...

[FR] Pour importer aussi les petites images, j'ai modifié AnalyzeMoviePage. Remplacer les lignes de '//Picture' à 'DisplayResults;' par celles-ci.

[IT] Per importare anche le piccole immagini, ho modificato AnalyzeMoviePage. Sostituire le linee da '//Picture' a 'DisplayResults;' con queste ...

[FR] Merci pour les compliments. Les affiches pour les films dont tu parles sont de petites images (150 x 212). C'est dans ces cas-là que mon script ne les importe pas. Je vais le modifier. Pour les commentaires, je pense que ça sera un peu plus long.

[IT] Grazie per i complimenti. Le locandine per ...

[FR] Je ne comprends pas pourquoi ça ne marche pas. Je ne reçois aucune erreur. Quelqu'un d'autre a des problèmes avec ce script ?... Est-ce que tu as des erreurs avec d'autres scripts ou seulement le mien ?

[IT] Non capisco perché non funziona. Non ricevo nessun errore. Qualcun altro ha probleme ...

[FR] Moi aussi j'utilise Windows 98. Peux-tu me dire quelques titres de films pour lesquels ça ne marche pas ?

[IT] Anch'io uso Windows 98. Puoi dirmi alcuni titoli da film per i quali non funziona ?

Seems like the "Made for video" and "TV series" sections should be swapped.
I think all IMDb scripts have this error.

LineNr := FindLine('<H2><A NAME="vid">Made for video</A></H2>', Page, LineNr);
if LineNr > -1 then
begin
PickTreeAdd('Made for video', '');
AddMoviesTitles(Page, LineNr);
end ...

pour antp : tu peux effacer mon entrée précédente ? celle inscrite en "guest" ?

[FR] Voici la nouvelle version corrigée pour les photos. Pour la note, le problème vient des demi-points : j'arrondis au-dessus ou en-dessous ? J'ai choisi la valeur inférieur, ça vous va ?

[IT] Ecco la nuova versione ...

You forgot to turn to uppercase the article "a".

I tried it with www.ofdb.de and it worked.