antp.be forum

bonjour à tous,

AMC c'est de la balle, je l'utilise depuis si longtemps que je ne peux plus m'en passer maintenant !!!!

j'aimerai bien maintenant ecrire un p'tit script pour modifier un champ particulier de tous mes films. en fait, le champ "label du support" je l'ai customisé à ma maniere, en y indiquant le numero de CD/DVD sur lequel se trouve le film.

malheureusement j'ai eu la mauvaise idée, qd le support est un DVD, d'inscrire le numéro du média + (DVD-R). ce qui fait tre smoceh quand je veux imprimer/afficher ma liste.

je voudrai donc ecrire un script qui lit toutes mes entrees, qui recupere le champ "label du support", et qui le modifie si besoin est.

mais je ne sais pas comment faire cela.
qq'un pourrait-il m'aider svp' ?

merci pour tout
Herve

euh, j'ai reflechi 5 mn, et j'ai reussi...

;-)


program NewScript;
var
field: string;
newfield : string;
begin
field := GetField(fieldMedia);
newfield := StringReplace(field,' (DVD-R)','');
SetField(fieldMedia,newfield);
end.



désolé,et merci !

content de voir quer tu as pu te débrouiller
et ça pourra servir à d'autres s'ils tombent sur le sujet

c'est pour cela que j'ai mis la soluce.

sinon, maintenant je cherche à enlever, dans la liste des acteurs, les string qui contiennent des parentheses.

exemple :

Peter Falk (as Columbo)
devient
Peter Falk

dur dur ca tiens !

Là par contre en effet le code est moins simple vu qu'il faut parcourir la chaîne caractère par caractère
Si j'oublie pas je posterai le code ce soir

j'ai fait qq ch qui boucle !!!!

program NewScript;
var
s,tmp:string;
BeginPos, EndPos: Integer;

Begin
s:=GetField(fieldActors);

while Pos('(', s) > 0 do
begin

BeginPos := Pos('(', s);
EndPos := Pos(')', s);
tmp := Copy(s, 0, BeginPos-1);
s := tmp + Copy(s, EndPos+1, Length(s));

end;

SetField(fieldActors,s);
end.


bon, comme je n'avais pas le cas pour beaucoup de mes films, j'ai fait ca a la main...

faut faire attention à ces cas-là :

nom prenom ((aazzee as (bob))

et aussi aux ) qui ne sont pas presentes

bref, c l'horreur !!!!