Des if avec des and .

Je voudrais juste savoir comment faire des IF avec deux voir 3 conditions.

Je veux en fait dire :

Si A est plus grand que B et plus petit que C et égale à D alors...

Je pensais faire :

If A>B and A<C and A=D then Edit1.text:='Ca tombe juste';

Mais ça ne marche pas.

J'ai trouvé et j'ai honte y manque les () :oops:

oui n'oublie jamais les parentheses. par soucis de ne pas avoir d'erreur, même dans les langages "qui font le tris" comme PHP ou JavaScript.

on pourrai également l'ecrire :

Code:

---

1 2 3 4 5

if a > b then if a < c then if a = d then result := 'OK';

---

contrairement à ce qu'on pourrait croire cette ecriture n'est pas moins performante et peux même permettre un meilleur control sur la probabilité qu'une expression soit fausse (donc à tester en premier).

exemple:
A est > B dans 90% des cas
A est < C dans 75% des cas
A est = D dans 15% des cas

A = D est donc l'expression la plus souvent fausse (85%)
on ecrira donc :

Code:

---

1 2 3 4 5

if A = D then // 85% fail test if A < C then // 25% fail test if A > B then // 15% fail test result := 'OK';

---

avec ça on gagne quelques demi-cycles processeurs, à garder en tête pour les conditions appelées de façon massive (traitement par lots/flux)
ça c'est valable pour les AND, les OR n'etant pas "compactable"

Pas si sur, Delphi réalise par défaut l'optimisation des expression booléennes

Ainsi :

Code:

---

1 2	If A And B And C Then ...

---

Si A vaut false, B et C ne seront pas du tout évalués. L'évaluation va de gauche à droite. Autrement dis dans ton exemple avec le probalilités on peut écrire que :

Code:

---

if (A = D ) And ( A < C ) And ( A > B ) then

---

Sera plus rapide en moyenne que :

Code:

---

if ( A > B ) And ( A < C ) And (A = D ) then

---

Delphi faut aussi le tri sur le OR :

Code:

---

1 2	If A Or B Or C Then ...

---

Si A est vrai, B et C ne seront pas évalués. Ainsi l'optimisation est faite alors qu'a l'écrire à la main ce serait plus chiant :

Code:

---

1 2 3

If A Then DoTruc Else If B Then DoTruc Else If C Then DoTruc

---