Delphi - Reordenar un dbgrid

Tengo una serie de formularios herederos de una plantilla que contiene una dbgrid enlazada a una base datos. Necesito que cuando un usuario haga click en una columna el contenido se reordene en funcion de esa columna. ¿Alguna idea?

El DBGrid no se puede ordenadr, se tiene q ordenar el dataset, si usas un dataset sql puedes cerrarla y cambiar la sentencia order by..

El problema es que la tabla no esta enlazada a una consulta sino a una ADOtable. ¿Tengo que cerrar el datasource y volver a abrirlo? ¿La ordenacion se hara desde ahi? Si es asi ¿en que evento puedo capturar el nombre del campo al hacer click sobre la rejilla?

Se puede hacer de la siguiente manera (usando un ADOTable): El campo IndexFieldNames ordena la tabla. Ahora, sólo debemos decirle que cabecera ha pulsado el usuario:

procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
ADOTable1.IndexFieldNames:=Column.FieldName;
end;

Suerte.

En el click sobre el grid por ejemplo;
grid.SelectedField.Fieldname;

Perfecto, he probado con el indexfieldname y ha funcionado. No ha hecho falta cerrar y abrir. La unica pega es que no tengo muy claro como invertir el orden si el comun.fieldname es igual al indexfieldnames. Gracias a todos.
¿teneis alguna idea sobre como cambiar el order by de una tabla sobre una AdoTable ?

Para ordenar descedentemente
ADOTable1.IndexFieldNames:=Column.FieldName+ ' DESC';

Y ascendentemente (si no pones nada, se toma por defecto ascendentemente):
ADOTable1.IndexFieldNames:=Column.FieldName+ ' ASC;

Suerte.

Gracias de nuevo.
Lo probare de inmediato.
Muchas gracias

Si te está costando trabajo todo esto, puedes conseguir los componentes developer express que traen unos grids magníficos que te permiten ordenar por cada columna al hacer clic sobre ella, filtrar datos, totalizar, etc. Te los recomiendo.