pitis problemes avec la fonction copy

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : pitis problemes avec la fonction copy

piloud

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

Publicité

caRnAGE

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)".

antp

Super Administrateur
Champion des excuses bidons

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

FORUM HardWare.fr

Programmation

Delphi/Pascal

pitis problemes avec la fonction copy

Sujets relatifs
fonction "execute"	problemes pour acceder a un fichier
Comment faire en sorte de tester la fonction mail lorsqu'on utilise EA	[HTML] Petits problemes faciles a résoudres...
exemple de fonction roundup pour VBA	[JS] fonction replace()
[VB.net] une fonction pour terminer le programme [resolu]	Modifier la fonction DoDataExchange() pour personnaliser les DDV
Questrion fonction SI	[C] fonction pour récupérer l'adresse MAC de eth0
Plus de sujets relatifs à : pitis problemes avec la fonction copy

Page générée en 0.056 secondes