[TDBGrid] Trier par colonne.

Bonjour à tous.
Mon problème me paraissait simple, une Base Paradox7, sur la fiche, une TTable, une TDataSource, un TDBNavigator, une TDBGrid, et trier la base de donnée en cliquant sur l'entête des colonnes correspondant aux champs indexés (onDBGrid1TitleClick).
Impossible d'y parvenir, j'ai bien trouvé des solutions à base de TQuery sur la toile, mais cela semble disqualifier le TDBNavigator qui m'est indispensable, aussi je souhaite garder la TTable.

Comment puis-je faire ?
Toute suggestion sera la bienvenue.

Merci de votre temps.
Amicalement,
ARDILLER.

Je n'utilise pas de TTable mais le principe c'est de régénérer la TTable en modifiant la requète SQL en fonction de la colonne qui est 'cliquée'.
Un article bien fait : http://delphi.about.com/od/usedbvcl/l/aa042203a.htm

procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
(Column.Field.DataSet as TTable).IndexFieldNames:=Column.FieldName;
end;