Código Delphi [-] variable:=dbGrid.Fields[dbGrid.SelectedIndex].Text;
variable:=dbGrid.Fields[dbGrid.SelectedIndex].Text;