Salut à vous,

Vous allez devenir chevres (moi ca fait deja 1 h que je le suis Grrrr) mais on dit bien jamais 2 sans 3 alors une petite derniere question pour la route

Procedure TUMERENDSCHEVRE;
Var
Line:string,
begin
Line:='Delphi&c'est fantastique quand ca beugue pas toutes|les 30 secondes';
ListBox1.Items.add(Copy(Line,  Pos('&', Line)+1, Pos('|', Line)-1 ));
end;

Et bien ce gredin de programme plutot que de m'afficher dans la listbox tout ce qu'il y a entre & et | il m'affiche : "c'est fantastique quand ca beugue pas toutes|les 30 secondes".

Que ca m'énerve : je capte pas pk ca plante.

Merci d'intervenir et d'épargner les quelques cheveux qu'ils me restent

salut
syntaxe de copy:
function Copy(S; Index, Count: Integer): string;
or tu donne 2 index!!!!!!!
en decomposant
debut:=Pos('&', line)+1;
fin:=    Pos('|', line) -debut;
buf1:=Copy(buf, debut,fin  ); 
 ListBox1.Items.add(buf1);


voili voilou!!

@+
jlen

Quel crétin je fais,

Merci

c'est toujours quand on a la solution sous les yeux qu'on ne la voit pas

@+
jlen