1. Accueil
  2. Delphi / Pascal
  3. Sources Delphi / Pascal
  4. Sources Trucs & Astuces
  5. Nombres flottants

Nombres flottants

5/5 (12 avis)

Vue 7 561 fois - Téléchargée 453 fois

Télécharger le projet
Commenter

Description

Recherche le nombre de chiffres contenus dans la partie précédent le point décimal d'un nombre flottant.

Conclusion :


Le code n'effectue aucun contrôle de la saisie.
Le seul objectif était de connaitre le nombre de chiffres significatifs situés avant le point décimal et rien d'autre.
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire Commentaires
jmp77
Messages postés
1119
Date d'inscription
lundi 4 février 2002
Statut
Membre
Dernière intervention
4 octobre 2006
 7
20 déc. 2004 à 09:51
Hello delphiprog,

Sympa ton code et à chaque fois que je lis un de tes codes j'apprends des choses lol. Tu m'épateras toujours.
Sinon ce n'est pas exactement ce que nous recherchions avec Mauricio. Nous ce que voudrions c'est savoir le nombre de caractère maximum d'un champ déclaré en integer ou en floattant dans une base sans lire tous les enregistrements.
Je te remercie de penser à nous. Si tu as une idée pour notre souci ...

Bonne prog,
JMP77.
cs_grandvizir
Messages postés
1106
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
3 septembre 2006
 22
19 déc. 2004 à 18:14
Comme tu peux le voir, je n'ai que les versions impaires. Tu pourras donc toujours me coincer avec celles qui sont paires. D7 me sert juste à ouvrir tous vos codes. La version 3 est totale révolutionnaire... Mais en fait, c'est plus subtile que ça. Chut !
florenth
19 déc. 2004 à 17:03
Il y a un probleme au niveau de l'explication.

Si on met un nombre entier dans l'edit, on obtiont par exemple 5 * 10^-2 50 ou pire 12 * 10^-2 12.

Il y a comme un probleme....

PS : booleans: array[boolean] of string = ('non', 'oui');
Ce qui me fait marrer, c'est le commentaire de la ligne du dessus : INTERNATIONALISATION DES CHAINES !!!!!

TryStrToFloat existe sous Delphi 6.
n'est-ce-pas grandvizir qui refuse absolument de lacher sa version 3. toi qui dit pourtant dans ton commentaire perso que tu a la version 7.
cs_grandvizir
Messages postés
1106
Date d'inscription
samedi 8 novembre 2003
Statut
Membre
Dernière intervention
3 septembre 2006
 22
19 déc. 2004 à 10:13
Sans vouloir être méchant, je trouve ce code un peu décevant par rapport au grand potentiel de DelphiProg pour faire des applications de ouf, lui qui en sait tant. Je me réserve donc en attendant...

Toutes précisions sont bonnes à entendre. En l'occurrence ici, j'ajoute que sa fonction TryStrToFloat ne débarque que depuis Delphi 7.

Et sinon, en ce qui concerne mes logs, je dirais qu'il serait plus court de passer par StrToFloat et Pos, que de s'amuser à faire des logarithmes, des valeurs absolues et des conditions IF...
DRJEROME
Messages postés
436
Date d'inscription
jeudi 9 janvier 2003
Statut
Membre
Dernière intervention
5 février 2015
19 déc. 2004 à 07:45
Effectivement, concernant le nombre de chiffres significatifs, c'est bon, je n'ai jamais eu de doute à ce sujet, Delphiprog a toujours bien programmé

(j'amenais juste une précision sur un format de notation dont on parle rarement mais qui est important pour notre compréhension).

Delphiprog met un lien sur les IEEE qui explique aussi ce format à voir absolument pour ceux qui voudraient un complément d'info.


Dans le syle array, moi aussi j'ai bien aimé aussi le :

booleans: array[boolean] of string = ('non', 'oui');
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_Delphiprog)