Coder le clic d'un TabControl

salut
je viens de voir le composant tabcontrol dans la liste des composants et...
voila j'ai deposé un tabcontrol sur lequel j'ai les 26 lettres de l'alphabet (a...z) qui representenr des boutons donc possibilité de cliquer sur une lettre.
ensuite j'ai deposé un dbgrid qui est connecté à une base de données access
(contient une table donc les champs sont: matricule, nom, prenom).
moi, je désire par exemple qu'a l'execution de l'application qu'il n'apparaissent sur le dbgrid que les personnes donc les noms commencent par a ( sur le tabcontrol, c'est le bouton qui comporte la lettre a qui est activé par défaut) qui s'affichent. ainsi, si l'utilisateur clic sur un autre bouton qui comporte la lettre b par exemple que seules les personnes donc le nom commence par b doivent apparaitre sur le dbgrid et ainsi de suite.
je veux donc savoir comment on code cela
merci

Salut

Tu peux appliquer un filtre sur le DataSet de tes personnels en implémentant OnFilterRecord comme ceci:

Code:

---

1 2 3 4 5 6 7

procedure TForm1.Query1FilterRecord(DataSet: TDataSet; var Accept: Boolean); begin with TabControl1 do Accept := Query1.FieldByName('Nom').AsString[1] = Tabs[TabIndex]; end;

---

Ensuite quand tu changes de page sur le TabControl, il suffit de rafraîchir le filtre:

Code:

---

1 2 3 4 5 6 7 8

procedure TForm1.TabControl1Change(Sender: TObject); begin with Query1 do begin Filtered := False; Filtered := True; end; end;

---

@+ Claudius