Problème avec une instruction if

salut tous et merci de me lire
voila un petit probléme
je veux afficher un bouton si mon nombre.caption est >= à 30
mais avec mon code cela ne marche pas enfin uniquement jusqu a 9

Code:

---

1 2 3 4

if nombre.Caption >='30' then begin SpeedButton1.Enabled:=True; end;

---

le code marche bien pour 9 mais pour 10 et etc cela ne marche pas?
une petite idée ?
merci davance

Salut :D

Tu ne peux pas comparer tes valeurs comme ça :)
Il faut convertir ce que tu as dans ton objet nombre en nombre:

Code:

---

1 2 3 4 5

if StrToInt(nombre.Caption) >= 30 then begin SpeedButton1.Enabled := true; end;

---

Par contre, fait bien attention à ne pas saisir autre chose qu'un entier dans cet objet ;)

ok super merci a toi

Code:

---

1 2 3 4 5 6 7 8 9

try if StrToInt(nombre.Caption) >= 30 then begin SpeedButton1.Enabled := true; end;   except ShowMessage('Ton message d''Erreur'); end;

---

Biensur tu peux gérer tes exceptions cas par cas