Obtener titulo de una columna

[MaMu]

Como puedo hacer para obtener el titulo de una columna de un DBGrid cuando hago clic en cualquier celda de esa columna?

Saludos

[marcoszorrilla]

procedure TForm1.DBGrid1CellClick(Column: TColumn);
begin
ShowMessage(Column.Title.Caption);
end;

Un Saludo.