Discussion :

[vinse]

bon voila je suis debutant en delphi
et j ai lu pas mal de vos poste je me suis lancer un defi
cree un petit logiciel qui inclu un algo

jusque la sa vas

mais voila j ai un souci et je vois pas comment faire

donc voila
apres un calcul

j ai sa comme resultat
xxyy
sa cest le resultat du calcul precedent dans mon logiciel je voudrais sa voir comment je pourrais separer le xx et les yy en deux partis et les aditioner


bien entendu les valeur sont aleatoir enfin je veut dir pas toujour les meme
mais toujour sous cette forme xxyy
ce que je veut cest pouvoir fair comme etape suivante xx+yy=zz


et de plus je voudrais savoir comment inclure zz dans une chaine du style aaaaaazzaaaaaa
et zz seras toujour a la meme position

je sais que je suis casse bonnbon mais je me soigne

[Bleys]

Salut,

Jette un oeil dans la FAQ tu trouveras tout ce que tu veux ...

Une possibilité cet exemple renvoie le troisième caractère de la chaine MaChaine :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MaChaine[3]

A partir de là tu devrais pouvoir faire ce que tu veux


Si t'as des soucis, n'hésites pas on détaillera plus

[TicTacToe]

J'ajouterai qu'il te faut regarder du coté des fonctions

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
copy(...)
Pos(...)
IntToStr(...)
StrToInt(...)

donc un petit la dessu

bon code !

[vinse]

bon al partis affichage et resolu
mais rest la partis calcul
es ce que j ai meilleur temp de transformer mon entier en string et de prendre les difernte caracter du string separement et de les transfomer en integer pour pouvoir les aditonner

du style

sa

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
x:=inttostr(z); 
a1:=x[1];
a2:=x[2];
b1:=x[3];
b2:=x[4];

mais apres comemnt fair pour les aditonner
a moins que lol
je dois reconvertir chaque variable en entier

et apres les aditioner

mais as risque de fair long
y aurais t il pas plus simple merci

quand a la faq pas mal merci as tout ceux qui ont participer

[Jeannot Alpin]

Moi, j'utiliserai la fonction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

copy

Tu copies dans une string les 2 premiers caractères (xx) puis dans une autre les deux suivants (yy) et ensuite tu les additonnes avec la fonction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

strtoint()

[vinse]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
x:=inttostr(z);
a1:=x[1];
a2:=x[2];
a3:=x[3];
a4:=x[4];
p:=(a1)+(a2);
p2:=(a3)+(a4);
zz:=strtofloat(p)+strtofloat(p2);
vv:= trunc(zz);

voila comment j ai fais
je pense qu il y as plus simple mais comme je debute


zz et le resultat de la somme de xx et yy dont je parle plus haut

maintenant je galer sur le inttohex de vv
car je voudrais transformer le resultat en hexa

la fonction et pas trop detailler

[vinse]

sa y est j ai resolut merci a tous de votre aide et de ce sympathique forum
merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

xx:=IntToHex(Ord(vv), 2);

voici comment sa as transformer mon entier en hexa
merci a tous
cest cool
merci