Dbgrid(eh)+Popup

[Kamalekb]

На форме Dbgrid и связанный с ним Popup

При вызове Popup, как определить на какой Колонке и Ячейке открылась Popup

procedure TForm1.N1Click(Sender: TObject);
var
  xxx,yyy : string;
  begin

if DBGridEh1.Focused=true then
   xxx:= DM.DataSource2.DataSet.Fields[0].AsString;
   ShowMessage(xxx);

end;

Ячейку выводит, а как вывести имя колонки, на которой фокус ?

[Kamalekb]

Ответ найден.

yyy:=DBGridEh1.SelectedField.FieldName; //колонка