Sortieren mit Klick auf DBGrid

[omata]

Delphi-Quellcode:

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