Discussion :

[tarbala]

Bonjour,
J'ai veux filtrer mes données dans un code DELPHI qui attaque Paradox. Voici les filtres que j'ai essayés sans succès :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
TTable1.Filter:='Montant <> NULL';
TTable1.Filter:='Montant > 0';

Je ne comprends pas pourquoi aucun de ces filtres ne marche. Je veux simplement avoir les enregistrements dont le champ Montant est renseigné contient une valeur > 0. Je signale que ce champ est soit NULL soit >0.

Merci pour vos contributions.

[SergioMaster]

Voila pourquoi un SQL est toujours mieux qu'un filtre quant au pourquoi , cela est du à la gestion du Null

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
SELECT * FROM TABLE WHERE NOT MONTANT IS NULL

[SergioMaster]

Voila pourquoi un SQL est toujours mieux qu'un filtre quant au pourquoi , cela est du à la gestion du Null

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
SELECT * FROM TABLE WHERE  MONTANT IS NOT NULL

désolé , correction raté

[Cl@udius]

Euh plutôt comme ça Sergio:

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

SELECT * FROM TABLE WHERE MONTANT IS NOT NULL;

[edit] Ah, je me disais aussi.

Cependant pour en revenir au filtre, que 'MONTANT <> NULL' ne marche pas ça ne m'étonne pas, mais 'MONTANT > 0' par contre.

A défaut d'utiliser SQL (via un Query donc) passe par l'événement OnFilterRecord:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
procedure Table1FilterRecord(DataSet: TDataSet; var Accept: Boolean);
var
  F: TField;
begin
  F := DataSet.FieldByName('MONTANT');
  Accept := (not F.IsNull) and (F.Value > 0);
end;

Quelque chose comme ça. Mais bon un Query il n'y a pas mieux.

@+

[SergioMaster]

Si Cl@udius en filtre ca marche avec le AND mais tester une valeur>0 si y a des champs null ca , ca marche pas

PS. je déteste les filtres