Delphi - Detectar el campo donde estoy posicionado.

Hola a todos.
Necesito que al pulsar un boton pueda captar el nombre del campo donde estoy posicionado (No del DbEdit) para almacenarlo en una variable. Que luego utilizaré para busquedas.
Por ejemplo: Form1.ActiveControl.Name me daria el nombre del DbEdit pero yo necesito el nombre del campo (Fieldname) de ese DbEdit.

No se si me he explicado bien.
Gracias por atenderme.
Patres.

Prueba con

if (Form1.ActiveControl is TDBEdit) then
Nombre:= (Form1.ActiveControl as TDBEdit).FieldName;

Espero te sirva

Hola Erwin,
Diasculpa por tardar en responderte.

Lo he probado con estas lineas y funciona:
if (ActiveControl is TDBEdit) then
ShowMessage('Nombre del campo Activo ==> ' +(ActiveControl as TDBEdit).DataField)
Else
ShowMessage('¡ NO es un TDBEdit ! Es: '+ActiveControl.Name);

Y ahora si el control activo no es un TDBEdit (Ejemplo: DBRichEdit, DBLookupComboBox ...) ¿Como puedo controlar todos los casos?

Seguiré probando... quizas con el CASE...

Gracias de nuevo.
Saludos
Patres.