Bonjour,

étant novice, j'ai un petit problème et je pense que vous devriez pouvoir éclairer ma lanterne assez facilement :

Je voudrais faire une condition du style

Si condition
Alors consequence1 et consequence2

Mes essais m'ont conduit à faire ceci

[ Lien ]

Le problème de cette solution, c'est que le champ redevient vide quel que soit la valeur saisie... facheux :D

J'avais aussi pensé à faire ceci :


[ Lien ]

Dans ce cas, mon 'and' ne passe pas à la compilation !

Si quelqu'un pouvait m'aider sur ce problème bête et méchant, ce serait cool ! Merci d'avance !

Réponse acceptée !
Salut,

c'est effectivement très simple à résoudre :

If StrToFloat(Note.Text) > 20 Then
  Begin
    ShowMessage('Erreur : la note saisie est supérieure à 20');
    Note.Text := '';
  End
Else
Begin
    // ici le Traitement si la note est inférieur ou égale à 20
End;

 
@+
Cirec

---

merci beaucoup pour la petite aide !

Ca marche impécablement bien !

salut,

lit l'aide de TryStrToFloat, ça risque de t'être utile.

A+

Loda

---

Se poser les bonnes questions est le premier pas pour trouver les bonnes réponses.

salut,

merci pour le petit coup de main, mais je n'ai pas trouvé de tryStrToFloat dans Delphi 5... et puis, les conditionnelles fonctionnent plutôt bien pour ce que j'ai à faire.

Salut,

Comme tu es novice, je te conseille un petit tour par ici : [ Lien ]
Tout est clairement expliqué, et ça permet d'aller chercher des horizons plus lointains, sans avoir de lacunes par endroits, ce qui est largement préférable !

++

Ressources Delphi, sources, tutoriaux, actu, ...: www.mx-dev.net [ Lien ]

@ Loda :
Salut,

Effectivement TryStrToFloat n'existe pas sous D5 ...
Mais ce n'est pas un réel souci, on peut facilement recréer cette fonction en utilisant "TextToFloat"

@SylvainVV :

L'intérêt d'utiliser une telle fonction est très simple :

Si (avec le code actuel) une erreur survient lors de la conversion, une exception se déclanchera sans que tu puisses y remédier (pas top pour l'utilisateur final)
Alors qu'avec TryStrToFloat ou TextToFloat tu peux intercepter cette erreur et agir en conséquence sans que l'utilisateur s'en rende compte

 
@+
Cirec

---

OK je vois (et je comprend ^^)

Cela dit, je suis vraiment débutant en Delphi (et étant en première année de BTS, on est pas sensé encore maitriser ce genre de chose).
On est vraiment pas très avancé dans le cours (pour preuve, on a pas encore vu les conditionnelles ^_^'). Donc même si j'essaye de gérer les différentes erreurs histoire de grapiller un peu de points, je vais éviter d'aller trop loin dans ce domaine pour le moment... je voudrais en rester à des techniques plus 'simples'.

Mais en tout cas merci, je n'avais pas vraiment cherché à savoir comment Delphi gere 'naturellement' les erreurs... (je sais qu'en Java on utilise les Try... Catch, mais je n'ai pas encore cherché ce genre de choses sous Delphi).
Pour le coup je vais surement m'amuser à compléter mon TP juste 'pour moi'... ce sera toujours ça de pris =)

Et sinon florenth merci pour ce lien. Je vais m'amuser à lire ça dès que j'aurais un peu le temps =)