[NumLock]

на самом деле с кнопкой все гораздо проще:

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
  DBGrid1.Columns[0].ButtonStyle:=cbsEllipsis;
  DBGrid1.Columns[1].ButtonStyle:=cbsEllipsis;
  DBGrid1.OnEditButtonClick:=DBGrid1EditButtonClick;
end;

procedure TForm1.DBGrid1EditButtonClick(Sender: TObject);
begin
  ShowMessage(DBGrid1.SelectedField.FieldName);
end;

а вот с другим контролом нужно чуть побольше кода написать