Sortieren mit Klick auf DBGrid

[Privateer3000]

Hallöchen,

mit procedure TForm1.dbgTitleClick(Column: TColumn);
kann man ja auf einen Klick reagieren.
Ich hab mal rumexperimentiert. Finde aber keinen
Ansatz. Wie läßt man sich zurückgeben, welche Spalte
geklickt wurde, um anschliessend ein Sortierkriterium
an ein SQL-String zu senden?
Die Spaltentitel heissen (aus verständins) anders.
Es muss also auf Fieldname zurückgegriffen werden.


Grüße

[omata]

Delphi-Quellcode:

procedure TForm.DBGridTitleClick(Column: TColumn);
var SQL:string;
begin
  SQL:=
    'SELECT *'#13 +
    'FROM tabelle'#13 +
    'ORDER BY ' + Column.FieldName;
  :
  :
end;