Page 1 of 1
help pour script allociné pour changer le titre FR
Posted: 2003-07-01 15:01:09
by reptile
hello
j'y connais quasiment rien en programmation, c'est pourquoi j'en appelle à votre bonne volonté
il s'avère qu'Allociné met le titre avec l'article devant (que ce soit titre VO ou titre VF). y'aurait-il la possibilité de modifier ceci afin que les titres allociné apparaissent directement avec l'article à la fin ?
Merci!
Posted: 2003-07-01 16:55:17
by antp
On a par exemple la ligne :
Code: Select all
SetField(fieldOriginalTitle, Value);
on peut la changer en :
Code: Select all
SetField(fieldOriginalTitle, RemoveArticle(Value));
(et de même pour les autres lignes modifiant les titres originaux & traduits)
Il faut alors ajouter une fonction RemoveArticle. Par exemple juste avant "function FindLine..." qui se trouve au début du fichier :
Code: Select all
function RemoveArticle(Value: string): string;
begin
if Pos('The ', Value) = 1 then
Result := Copy(Value, 5, Length(Value)) + ', The'
else
if Pos('Un ', Value) = 1 then
Result := Copy(Value, 4, Length(Value)) + ', Un'
else
if Pos('Une ', Value) = 1 then
Result := Copy(Value, 5, Length(Value)) + ', Une'
else
Result := Value;
end;
etc. (on peut en ajouter encore d'autres avant le else final)
Posted: 2003-07-01 16:58:10
by reptile
ah yes merci c'est génial
Posted: 2003-07-01 17:21:53
by reptile
et pour le L' ?
j'ai mis tel quel et ça passe pas
Posted: 2003-07-01 17:24:27
by reptile
nan c'est bon j'ai trouvé à partir d'un autre script
