pitis problemes avec la fonction copy

pitis problemes avec la fonction copy - Delphi/Pascal - Programmation

Marsh Posté le 22-05-2003 à 22:15:31    

voila jai fais ce code ....
 
 
a:=socket.ReceiveText;
 if length(a)>=7 then
 b:=copy(a,0,7);;
 if b='/PSEUDO ' then
  begin
   PseudoServeur := copy(a,8,(length(a)-7));
   exit;  
  end;
 
eh bin , meme si j'ai un un a = '/PSEUDO pilou'  
bha PseudoServeur = ''  
 
help


Message édité par piloud le 22-05-2003 à 22:15:47
Reply

Marsh Posté le 22-05-2003 à 22:15:31   

Reply

Marsh Posté le 23-05-2003 à 11:08:22    

Il me semble que c'est parce que les chaines de caractere en delphi ont un index qui commence à 1, et non 0, donc au lieu de "copy(a,0,7)", fait plutot "copy(a,1,7)".

Reply

Marsh Posté le 23-05-2003 à 11:10:13    

en effet
puis le "length(a)-7", tu peux mettre juste length(a), la fonction Copy s'arrête à la fin de la chaîne de toute façon


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed