Qui utilise l'environnement de dévelopement "Xojo" ?
7 réponses
contact
fu2 : fr.comp.sys.mac.programmation
Qui utilise l'environnement de dévelopement "Xojo" ?
par exemple :
je fait un : str(10000000000), j'ai en retour 1e+9
comment faire pour que la chaine de caractere soit "10000000000" ?
--
\ / Croire ou ne pas croire, ce n'est pas savoir,
-- o -- si j'y crois ou pas, je ne sais pas,
/ \ si je sais, inutil d'y croire ou pas.
--> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
quark67
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
fu2 : fr.comp.sys.mac.programmation Qui utilise l'environnement de dévelopement "Xojo" ? par exemple : je fait un : str(10000000000), j'ai en retour 1e+9 comment faire pour que la chaine de caractere soit "10000000000" ?
Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str essaie : Str(10000000000,"###########") Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de copier coller de ta part. Je sais que la plupart des gens te boycottent et masquent tes messages, mais ta question est parfaitement légitime ici.
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
<contact@meta-science.fr> wrote:
fu2 : fr.comp.sys.mac.programmation
Qui utilise l'environnement de dévelopement "Xojo" ?
par exemple :
je fait un : str(10000000000), j'ai en retour 1e+9
comment faire pour que la chaine de caractere soit "10000000000" ?
Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str
essaie :
Str(10000000000,"###########")
Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le
nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de
copier coller de ta part.
Je sais que la plupart des gens te boycottent et masquent tes messages,
mais ta question est parfaitement légitime ici.
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
fu2 : fr.comp.sys.mac.programmation Qui utilise l'environnement de dévelopement "Xojo" ? par exemple : je fait un : str(10000000000), j'ai en retour 1e+9 comment faire pour que la chaine de caractere soit "10000000000" ?
Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str essaie : Str(10000000000,"###########") Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de copier coller de ta part. Je sais que la plupart des gens te boycottent et masquent tes messages, mais ta question est parfaitement légitime ici.
contact
quark67 wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
fu2 : fr.comp.sys.mac.programmation Qui utilise l'environnement de dévelopement "Xojo" ? par exemple : je fait un : str(10000000000), j'ai en retour 1e+9 comment faire pour que la chaine de caractere soit "10000000000" ?
Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str essaie : Str(10000000000,"###########") Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de copier coller de ta part. Je sais que la plupart des gens te boycottent et masquent tes messages, mais ta question est parfaitement légitime ici.
Grand Merci, ça marche ;-) -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
quark67 <quark67@free.fr> wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
<contact@meta-science.fr> wrote:
> fu2 : fr.comp.sys.mac.programmation
>
> Qui utilise l'environnement de dévelopement "Xojo" ?
>
>
>
> par exemple :
>
> je fait un : str(10000000000), j'ai en retour 1e+9
>
> comment faire pour que la chaine de caractere soit "10000000000" ?
Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str
essaie :
Str(10000000000,"###########")
Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le
nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de
copier coller de ta part.
Je sais que la plupart des gens te boycottent et masquent tes messages,
mais ta question est parfaitement légitime ici.
Grand Merci, ça marche ;-)
--
/ Croire ou ne pas croire, ce n'est pas savoir,
-- o -- si j'y crois ou pas, je ne sais pas,
/ si je sais, inutil d'y croire ou pas.
--> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
fu2 : fr.comp.sys.mac.programmation Qui utilise l'environnement de dévelopement "Xojo" ? par exemple : je fait un : str(10000000000), j'ai en retour 1e+9 comment faire pour que la chaine de caractere soit "10000000000" ?
Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str essaie : Str(10000000000,"###########") Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de copier coller de ta part. Je sais que la plupart des gens te boycottent et masquent tes messages, mais ta question est parfaitement légitime ici.
Grand Merci, ça marche ;-) -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
contact
quark67 wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
fu2 : fr.comp.sys.mac.programmation Qui utilise l'environnement de dévelopement "Xojo" ? par exemple : je fait un : str(10000000000), j'ai en retour 1e+9 comment faire pour que la chaine de caractere soit "10000000000" ?
Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str essaie : Str(10000000000,"###########") Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de copier coller de ta part. Je sais que la plupart des gens te boycottent et masquent tes messages, mais ta question est parfaitement légitime ici.
ps : oui ça marche :-) y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ? -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
quark67 <quark67@free.fr> wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
<contact@meta-science.fr> wrote:
> fu2 : fr.comp.sys.mac.programmation
>
> Qui utilise l'environnement de dévelopement "Xojo" ?
>
>
>
> par exemple :
>
> je fait un : str(10000000000), j'ai en retour 1e+9
>
> comment faire pour que la chaine de caractere soit "10000000000" ?
Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str
essaie :
Str(10000000000,"###########")
Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le
nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de
copier coller de ta part.
Je sais que la plupart des gens te boycottent et masquent tes messages,
mais ta question est parfaitement légitime ici.
ps : oui ça marche :-)
y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ?
--
/ Croire ou ne pas croire, ce n'est pas savoir,
-- o -- si j'y crois ou pas, je ne sais pas,
/ si je sais, inutil d'y croire ou pas.
--> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
fu2 : fr.comp.sys.mac.programmation Qui utilise l'environnement de dévelopement "Xojo" ? par exemple : je fait un : str(10000000000), j'ai en retour 1e+9 comment faire pour que la chaine de caractere soit "10000000000" ?
Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str essaie : Str(10000000000,"###########") Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de copier coller de ta part. Je sais que la plupart des gens te boycottent et masquent tes messages, mais ta question est parfaitement légitime ici.
ps : oui ça marche :-) y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ? -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
contact
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
quark67 wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote: > fu2 : fr.comp.sys.mac.programmation > > Qui utilise l'environnement de dévelopement "Xojo" ? > > > > par exemple : > > je fait un : str(10000000000), j'ai en retour 1e+9 > > comment faire pour que la chaine de caractere soit "10000000000" ? Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str essaie : Str(10000000000,"###########") Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de copier coller de ta part. Je sais que la plupart des gens te boycottent et masquent tes messages, mais ta question est parfaitement légitime ici.
ps : oui ça marche :-) y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ?
bon j'ai fait une fonction qui le fait voilà le code, elle reçois une string(nombre) et revoi une string dim tmptexte, tmptexte2 as String dim i as double for i = 1 to len(nombre) tmptexte = mid(nombre,i,1) + tmptexte next for i=1 to len(tmptexte) if round(i/3) = i/3 then tmptexte2 = tmptexte2 + " " end if tmptexte2 = tmptexte2 + mid(nombre,i,1) next tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = mid(tmptexte2,i,1) + tmptexte next return tmptexte -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
<contact@meta-science.fr> wrote:
quark67 <quark67@free.fr> wrote:
> Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
> <contact@meta-science.fr> wrote:
>
> > fu2 : fr.comp.sys.mac.programmation
> >
> > Qui utilise l'environnement de dévelopement "Xojo" ?
> >
> >
> >
> > par exemple :
> >
> > je fait un : str(10000000000), j'ai en retour 1e+9
> >
> > comment faire pour que la chaine de caractere soit "10000000000" ?
>
> Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str
> essaie :
> Str(10000000000,"###########")
>
> Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le
> nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de
> copier coller de ta part.
>
> Je sais que la plupart des gens te boycottent et masquent tes messages,
> mais ta question est parfaitement légitime ici.
ps : oui ça marche :-)
y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ?
bon j'ai fait une fonction qui le fait
voilà le code, elle reçois une string(nombre) et revoi une string
dim tmptexte, tmptexte2 as String
dim i as double
for i = 1 to len(nombre)
tmptexte = mid(nombre,i,1) + tmptexte
next
for i=1 to len(tmptexte)
if round(i/3) = i/3 then
tmptexte2 = tmptexte2 + " "
end if
tmptexte2 = tmptexte2 + mid(nombre,i,1)
next
tmptexte = ""
for i = len(tmptexte2) downto 1
tmptexte = mid(tmptexte2,i,1) + tmptexte
next
return tmptexte
--
/ Croire ou ne pas croire, ce n'est pas savoir,
-- o -- si j'y crois ou pas, je ne sais pas,
/ si je sais, inutil d'y croire ou pas.
--> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
quark67 wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote: > fu2 : fr.comp.sys.mac.programmation > > Qui utilise l'environnement de dévelopement "Xojo" ? > > > > par exemple : > > je fait un : str(10000000000), j'ai en retour 1e+9 > > comment faire pour que la chaine de caractere soit "10000000000" ? Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str essaie : Str(10000000000,"###########") Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de copier coller de ta part. Je sais que la plupart des gens te boycottent et masquent tes messages, mais ta question est parfaitement légitime ici.
ps : oui ça marche :-) y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ?
bon j'ai fait une fonction qui le fait voilà le code, elle reçois une string(nombre) et revoi une string dim tmptexte, tmptexte2 as String dim i as double for i = 1 to len(nombre) tmptexte = mid(nombre,i,1) + tmptexte next for i=1 to len(tmptexte) if round(i/3) = i/3 then tmptexte2 = tmptexte2 + " " end if tmptexte2 = tmptexte2 + mid(nombre,i,1) next tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = mid(tmptexte2,i,1) + tmptexte next return tmptexte -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
contact
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
quark67 wrote: > Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême > wrote: > > > fu2 : fr.comp.sys.mac.programmation > > > > Qui utilise l'environnement de dévelopement "Xojo" ? > > > > > > > > par exemple : > > > > je fait un : str(10000000000), j'ai en retour 1e+9 > > > > comment faire pour que la chaine de caractere soit "10000000000" ? > > Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str > essaie : > Str(10000000000,"###########") > > Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le > nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de > copier coller de ta part. > > Je sais que la plupart des gens te boycottent et masquent tes messages, > mais ta question est parfaitement légitime ici. ps : oui ça marche :-) y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ?
bon j'ai fait une fonction qui le fait voilà le code, elle reçois une string(nombre) et revoi une string dim tmptexte, tmptexte2 as String dim i as double for i = 1 to len(nombre) tmptexte = mid(nombre,i,1) + tmptexte next for i=1 to len(tmptexte) if round(i/3) = i/3 then tmptexte2 = tmptexte2 + " " end if tmptexte2 = tmptexte2 + mid(nombre,i,1) next tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = mid(tmptexte2,i,1) + tmptexte next return tmptexte
ps : il y a un bug :-D -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
<contact@meta-science.fr> wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
<contact@meta-science.fr> wrote:
> quark67 <quark67@free.fr> wrote:
>
> > Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
> > <contact@meta-science.fr> wrote:
> >
> > > fu2 : fr.comp.sys.mac.programmation
> > >
> > > Qui utilise l'environnement de dévelopement "Xojo" ?
> > >
> > >
> > >
> > > par exemple :
> > >
> > > je fait un : str(10000000000), j'ai en retour 1e+9
> > >
> > > comment faire pour que la chaine de caractere soit "10000000000" ?
> >
> > Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str
> > essaie :
> > Str(10000000000,"###########")
> >
> > Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le
> > nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de
> > copier coller de ta part.
> >
> > Je sais que la plupart des gens te boycottent et masquent tes messages,
> > mais ta question est parfaitement légitime ici.
>
> ps : oui ça marche :-)
>
> y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ?
bon j'ai fait une fonction qui le fait
voilà le code, elle reçois une string(nombre) et revoi une string
dim tmptexte, tmptexte2 as String
dim i as double
for i = 1 to len(nombre)
tmptexte = mid(nombre,i,1) + tmptexte
next
for i=1 to len(tmptexte)
if round(i/3) = i/3 then
tmptexte2 = tmptexte2 + " "
end if
tmptexte2 = tmptexte2 + mid(nombre,i,1)
next
tmptexte = ""
for i = len(tmptexte2) downto 1
tmptexte = mid(tmptexte2,i,1) + tmptexte
next
return tmptexte
ps : il y a un bug :-D
--
/ Croire ou ne pas croire, ce n'est pas savoir,
-- o -- si j'y crois ou pas, je ne sais pas,
/ si je sais, inutil d'y croire ou pas.
--> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
quark67 wrote: > Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême > wrote: > > > fu2 : fr.comp.sys.mac.programmation > > > > Qui utilise l'environnement de dévelopement "Xojo" ? > > > > > > > > par exemple : > > > > je fait un : str(10000000000), j'ai en retour 1e+9 > > > > comment faire pour que la chaine de caractere soit "10000000000" ? > > Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str > essaie : > Str(10000000000,"###########") > > Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le > nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de > copier coller de ta part. > > Je sais que la plupart des gens te boycottent et masquent tes messages, > mais ta question est parfaitement légitime ici. ps : oui ça marche :-) y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ?
bon j'ai fait une fonction qui le fait voilà le code, elle reçois une string(nombre) et revoi une string dim tmptexte, tmptexte2 as String dim i as double for i = 1 to len(nombre) tmptexte = mid(nombre,i,1) + tmptexte next for i=1 to len(tmptexte) if round(i/3) = i/3 then tmptexte2 = tmptexte2 + " " end if tmptexte2 = tmptexte2 + mid(nombre,i,1) next tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = mid(tmptexte2,i,1) + tmptexte next return tmptexte
ps : il y a un bug :-D -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
contact
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote: > quark67 wrote: > > > Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême > > wrote: > > > > > fu2 : fr.comp.sys.mac.programmation > > > > > > Qui utilise l'environnement de dévelopement "Xojo" ? > > > > > > > > > > > > par exemple : > > > > > > je fait un : str(10000000000), j'ai en retour 1e+9 > > > > > > comment faire pour que la chaine de caractere soit "10000000000" ? > > > > Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str > > essaie : > > Str(10000000000,"###########") > > > > Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le > > nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de > > copier coller de ta part. > > > > Je sais que la plupart des gens te boycottent et masquent tes messages, > > mais ta question est parfaitement légitime ici. > > ps : oui ça marche :-) > > y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ? bon j'ai fait une fonction qui le fait voilà le code, elle reçois une string(nombre) et revoi une string dim tmptexte, tmptexte2 as String dim i as double for i = 1 to len(nombre) tmptexte = mid(nombre,i,1) + tmptexte next for i=1 to len(tmptexte) if round(i/3) = i/3 then tmptexte2 = tmptexte2 + " " end if tmptexte2 = tmptexte2 + mid(nombre,i,1) next tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = mid(tmptexte2,i,1) + tmptexte next return tmptexte
ps : il y a un bug :-D
voilà le corrigé : dim tmptexte, tmptexte2 as String dim i as double for i = 1 to len(nombre) tmptexte = mid(nombre,i,1) + tmptexte next for i=1 to len(tmptexte) tmptexte2 = tmptexte2 + mid(tmptexte,i,1) if floor(i/3) = i/3 then tmptexte2 = tmptexte2 + " " end if next tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = tmptexte + mid(tmptexte2,i,1) next return tmptexte -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
<contact@meta-science.fr> wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
<contact@meta-science.fr> wrote:
> Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
> <contact@meta-science.fr> wrote:
>
> > quark67 <quark67@free.fr> wrote:
> >
> > > Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
> > > <contact@meta-science.fr> wrote:
> > >
> > > > fu2 : fr.comp.sys.mac.programmation
> > > >
> > > > Qui utilise l'environnement de dévelopement "Xojo" ?
> > > >
> > > >
> > > >
> > > > par exemple :
> > > >
> > > > je fait un : str(10000000000), j'ai en retour 1e+9
> > > >
> > > > comment faire pour que la chaine de caractere soit "10000000000" ?
> > >
> > > Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str
> > > essaie :
> > > Str(10000000000,"###########")
> > >
> > > Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le
> > > nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de
> > > copier coller de ta part.
> > >
> > > Je sais que la plupart des gens te boycottent et masquent tes messages,
> > > mais ta question est parfaitement légitime ici.
> >
> > ps : oui ça marche :-)
> >
> > y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ?
>
> bon j'ai fait une fonction qui le fait
>
> voilà le code, elle reçois une string(nombre) et revoi une string
>
> dim tmptexte, tmptexte2 as String
> dim i as double
>
> for i = 1 to len(nombre)
> tmptexte = mid(nombre,i,1) + tmptexte
> next
>
> for i=1 to len(tmptexte)
> if round(i/3) = i/3 then
> tmptexte2 = tmptexte2 + " "
> end if
> tmptexte2 = tmptexte2 + mid(nombre,i,1)
> next
>
> tmptexte = ""
> for i = len(tmptexte2) downto 1
> tmptexte = mid(tmptexte2,i,1) + tmptexte
> next
>
> return tmptexte
ps : il y a un bug :-D
voilà le corrigé :
dim tmptexte, tmptexte2 as String
dim i as double
for i = 1 to len(nombre)
tmptexte = mid(nombre,i,1) + tmptexte
next
for i=1 to len(tmptexte)
tmptexte2 = tmptexte2 + mid(tmptexte,i,1)
if floor(i/3) = i/3 then
tmptexte2 = tmptexte2 + " "
end if
next
tmptexte = ""
for i = len(tmptexte2) downto 1
tmptexte = tmptexte + mid(tmptexte2,i,1)
next
return tmptexte
--
/ Croire ou ne pas croire, ce n'est pas savoir,
-- o -- si j'y crois ou pas, je ne sais pas,
/ si je sais, inutil d'y croire ou pas.
--> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote: > quark67 wrote: > > > Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême > > wrote: > > > > > fu2 : fr.comp.sys.mac.programmation > > > > > > Qui utilise l'environnement de dévelopement "Xojo" ? > > > > > > > > > > > > par exemple : > > > > > > je fait un : str(10000000000), j'ai en retour 1e+9 > > > > > > comment faire pour que la chaine de caractere soit "10000000000" ? > > > > Je n'utilise pas Xojo, mais d'après http://docs.xojo.com/index.php/Str > > essaie : > > Str(10000000000,"###########") > > > > Notons que Str(10000000000) devrait renvoyer 1e+10, pas 1e+9 car le > > nombre à convertir est 1 suivi de 10 zéros. Sans doute une erreur de > > copier coller de ta part. > > > > Je sais que la plupart des gens te boycottent et masquent tes messages, > > mais ta question est parfaitement légitime ici. > > ps : oui ça marche :-) > > y a t'il un moyen pour qu'il affiche de cette maniere"1 000 000 000" ? bon j'ai fait une fonction qui le fait voilà le code, elle reçois une string(nombre) et revoi une string dim tmptexte, tmptexte2 as String dim i as double for i = 1 to len(nombre) tmptexte = mid(nombre,i,1) + tmptexte next for i=1 to len(tmptexte) if round(i/3) = i/3 then tmptexte2 = tmptexte2 + " " end if tmptexte2 = tmptexte2 + mid(nombre,i,1) next tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = mid(tmptexte2,i,1) + tmptexte next return tmptexte
ps : il y a un bug :-D
voilà le corrigé : dim tmptexte, tmptexte2 as String dim i as double for i = 1 to len(nombre) tmptexte = mid(nombre,i,1) + tmptexte next for i=1 to len(tmptexte) tmptexte2 = tmptexte2 + mid(tmptexte,i,1) if floor(i/3) = i/3 then tmptexte2 = tmptexte2 + " " end if next tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = tmptexte + mid(tmptexte2,i,1) next return tmptexte -- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
contact
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = tmptexte + mid(tmptexte2,i,1) next
ici le downto n'était pas nécessaire j'aurait pu l'ecrire : tmptexte = "" for i = 1 to len(tmptexte2) tmptexte = mid(tmptexte2,i,1) + tmptexte next
-- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême
<contact@meta-science.fr> wrote:
tmptexte = ""
for i = len(tmptexte2) downto 1
tmptexte = tmptexte + mid(tmptexte2,i,1)
next
ici le downto n'était pas nécessaire j'aurait pu l'ecrire :
tmptexte = ""
for i = 1 to len(tmptexte2)
tmptexte = mid(tmptexte2,i,1) + tmptexte
next
--
/ Croire ou ne pas croire, ce n'est pas savoir,
-- o -- si j'y crois ou pas, je ne sais pas,
/ si je sais, inutil d'y croire ou pas.
--> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
Dieu Rê Pur / Pur Rê Méta-Maître et Dieu de l'Extrême wrote:
tmptexte = "" for i = len(tmptexte2) downto 1 tmptexte = tmptexte + mid(tmptexte2,i,1) next
ici le downto n'était pas nécessaire j'aurait pu l'ecrire : tmptexte = "" for i = 1 to len(tmptexte2) tmptexte = mid(tmptexte2,i,1) + tmptexte next
-- / Croire ou ne pas croire, ce n'est pas savoir, -- o -- si j'y crois ou pas, je ne sais pas, / si je sais, inutil d'y croire ou pas. --> Je Croix Pas, car Je Sais que c'est Faux MalgRê TouT...
