Aide sur TTable

Bonjour,
j'ai un problème avec l'utilisation d'un TTable et DBgrid,
1er / je veux calculer le nombre d'enregistrement total de la table;
2eme/ après l'utilisation de cette procédure :

Code:

---

1 2 3 4 5

procedure TForm1.Button5Click(Sender: TObject); begin Table1.Filter:='DD='+chr(39)+'SEN'+chr(39); Table1.Filtered:= True; end;

---

je veux le nombre d’enregistrement à chaque opération de TTable.
3eme/ je cherche toute les possibilités avec TTable et aussi autre composant pour bien manipuler une table DBF (Recherche, Filtrache, Fonction,..)
Merci

Bonjour,

Compter les lignes d'une table (valables avec ou sans filtre) : propriété RecordCount de la classe TTable

Ne pas utiliser Chr(39) dans l'expression de filtre (ou des requêtes SQL) mais plutôt la fonction QuotedStr de l'unité SysUtils :

Code:

---

1 2	// Table1.Filter:='DD='+chr(39)+'SEN'+chr(39); à remplacer par Table1.Filter := 'DD=' + QuotedStr('SEN');

---

Pour accélérer l'affichage des grilles et éviter des rafraichissements intermédiaires pénalisants, utiliser les méthodes DisableControls et EnableControls :

Code:

---

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

procedure TForm1.Button5Click(Sender: TObject); begin Table1.DisableControls; try Table1.Filtered := False; Table1.Filter := 'DD=' + QuotedStr('SEN'); Table1.Filtered := True; // Eventuellement, appeler RecordCount pour connaître le nombre de lignes concernées finally Table1.EnableControls; end; end;

---

--
Philippe.

Citation:

---

Envoyé par Ph. B.

Bonjour,

Compter les lignes d'une table (valables avec ou sans filtre) : propriété RecordCount de la classe TTable

Ne pas utiliser Chr(39) dans l'expression de filtre (ou des requêtes SQL) mais plutôt la fonction QuotedStr de l'unité SysUtils :

Pour accélérer l'affichage des grilles et éviter des rafraichissements intermédiaires pénalisants, utiliser les méthodes DisableControls et EnableControls :

--
Philippe.

---

Merci Mr.Philippe,
ça bien marché
il me reste de découvrire les méthode de TTable et leur utilisation si c'est possible, pour qu'elle me permet de bien utiliser ce composant ( qu'est ce que je peux faire avec TTable et DBgrid?...)