Código Delphi [-]procedure TForm1.DBGrid1CellClick(Column: TColumn); begin ShowMessage(Column.Title.Caption); end;
procedure TForm1.DBGrid1CellClick(Column: TColumn); begin ShowMessage(Column.Title.Caption); end;