NombreLong2

Syntaxe

NombreLong2(NroOrig)
Convertit un nombre long en notation exponentielle en chaîne de caractères. Le paramètre est au format nombre, le résultat est au format texte. Traite les nombres longs au délà de + 536870911 ou en déçà de - 536870911
Par Fredo d;o)

Exemple

NombreLong2(536870911 * (pi ^ pi))
(=1.95754728453491E+10)
---> "19575472845,34911"

Script

on NombreLong2(NroOrig) 
	set AppleScript's text item delimiters to "."
	set NroNew to text items of (text returned of ¬
		(display dialog "" default answer NroOrig giving up after -1))
	set AppleScript's text item delimiters to ","
	set NroOk to NroNew as text
	set AppleScript's text item delimiters to ""
	return NroOk
end NombreLong2

Remarque

Routine plus précise que NombreLong mais plus "bruyante" . Avec "giving up after -1" le dialogue est affiché puis est effacé aussitôt.