Discussion :

[Madjid52]

mon problème est de supprimer les enregistrements de la table1 qui a pour champ Date_V de la date 01/01/2009 au 31/01/2009 je travaille sur Delphi7
avec une table Paradox

[Just-Soft]

Salut;

tu as le choix entre l'utilisation d'un composant table ou query. pour le composant table tu dois utiliser la propriété Filtre qui est une chaine de caractère et accepte un champ (ou des champs). pour le composant query tu dois utiliser le langage SQL avec la commande Where.

Fais F1 sur l'aide Delphi tu as des exemples.

[Madjid52]

je vous remercie mais votre idée ne me supprime pas les enregistrements de la table1 elle me fait une filtration mais la source la table1 reste avec les enregistrements je veux supprimer comme par exemple dans le composant DbNavigateur avec un seul enregistrement

[youhibadelphi]

salem
je te propose la methode de filtrage entre deux date, tu fais un lien entre ton dbgrid et la table et un lien avec la table et le dbnavigator.
saha

[Just-Soft]

je vous remercie mais votre idée ne me supprime pas les enregistrements de la table1 elle me fait une filtration mais la source la table1 reste avec les enregistrements je veux supprimer comme par exemple dans le composant DbNavigateur avec un seul enregistrement

ceci dit après le filtre tu n'as qu'à faire :

Code :

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

Query1.Delete

ou

Code :

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

Table1.Delete

[Madjid52]

pour mon problème je veux supprimer 100 enregistrements tout le mois de janvier d'un seul coup avec table1.delete je les supprime un par un.

[evarisnea]

pourquoi ne pas utiliser un composant Query comme l'a suggéré Just-Soft ?

pour le composant query tu dois utiliser le langage SQL avec la commande Where.

Fais F1 sur l'aide Delphi tu as des exemples.

tu peux utiliser un Query avec une instruction du style

Code SQL :

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

DELETE * FROM Table1 WHERE Date_V BETWEEN 01/01/2009 AND 31/01/2009

l'instruction est donnée à titre indicatif, ne connaissant pas très bien le SQL supporté par Paradox.

[Just-Soft]

Pour le composant Table tu peux faire ça (bien sûr après avoir filtrer tes données)

Code :

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

1
2
Where not(Table1.IsEmpty) do
Table1.Delete;

[Madjid52]

j'ai essayé de filtrer la table et appliquer table1.delete mais ça revient toujours de supprimer les enregistrements un par un.je veux supprimer une partie des enregistrements de la table par un simple click

[Just-Soft]

je crois qu'il est temps de mettre ton code pour y voir claire !

[Madjid52]

voila ce que j'ai fait :

Code :

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

1
2
3
4
   Table1.Filter:= 'Date_Recrut >= ' + QuotedStr(Edit1.text) + ' AND ' +
    'Date_Recrut <= ' + QuotedStr(Edit2.text);
   Table1.Filtered :=true ;
   Table1.Delete;

[Just-Soft]

Salut;

voici ce qui te manquer

Code :

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

1
2
3
4
5
Table1.Filter:= 'Date_Recrut >= ' + QuotedStr(Edit1.text) + ' AND ' +
'Date_Recrut <= ' + QuotedStr(Edit2.text);
Table1.Filtered :=true ;
while not(Table1.IsEmpty) do 
  Table1.Delete;

à toi des faire le test.

[Madjid52]

Merci Just_Soft de Votre idée j'ai testé et ça a marché je vous remercie vivement.