Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Looking for a snazzy way
Message
De
25/07/2001 13:15:22
Mark McCasland
Midlothian, Texas, États-Unis
 
 
À
25/07/2001 05:29:18
Will Jones
Vevey, Suisse
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Re: Looking for a snazzy way
Divers
Thread ID:
00534851
Message ID:
00535168
Vues:
21
This works better. Run this code in a test PRG.
lnMask = 99999999
FOR lnI = 1 to LEN(TRANSFORM(lnMask))
	SET Decimals TO lnI - 1
	? RIGHT(ALLTRIM(TRANSFORM(lnMask/INT(10**(lnI-1)), '@T')), 8)
ENDFOR
RETURN
Mark McCasland
Midlothian, TX USA
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform