Requête sql si la clause where est vide

Bonsoir a tous ,
J'ai utilisé Delphi +Sql servr 2008 , je voulais faire une simple requette sur une table

Code:

---

1 2 3 4

query.sql.add('select * from personnels where Matricule= :a'); query.paramaters.parambyname('a').value:=edit1.text; query.open;

---

Vous voyez que j'ai utilisé la clause where ., donc je veux même si le edit1 est vide , la requette ignore la condition et me donne toutes les données . et aussi ou cas ou il yas deux condition et deux edit ?
et Merci d'avance.

Bonjour,

Rien de plus simple mais aussi plusieurs solutions dépendant des composants utilisés, je pense, hélas pour moi, ail s'agit de ADO

solutions "brut" de code

Code:

---

1 2 3 4 5 6 7 8 9 10

query.active:=False; Query.sql.Clear; query.sql.add('select * from personnels'); if Trim(Edit1.text)<>'' then begin query.sql.add('where Matricule= :a'); query.paramaters.parambyname('a').value:=edit1.text; end; query.open;

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

var clause,colonne,valeur : String; const SQLfmt = 'SELECT * FROM PERSONNELS WHERE %s=%s'; ... query.active:=False; colonne:='1'; valeur:='1'; if Trim(Edit1.text)<>'' then begin colonne:='Matricule'; valeur:=QuotedStr(Edit1.text); end; query.SQL.Text:=Format(SQLFmt,[colonne,valeur]); query.open;

---

Solution Firedac, utilisation des macros

Code:

---

1 2 3 4 5 6 7 8

FDQuery.Active:=False; FDQuery.SQL.Text:='SELECT * FROM personnels &where'; if Trim(Edit1.text)<>'' then begin FDQuery.MacrobyName('where').asRaw:='WHERE Matricule=:a'; FDQuery.Parambyname('a').asString:=edit1.text; end else FDQuery.MacrobyName('where').Clear; FDQuery.Active:=True;

---