Como saber o nome do objeto ativo?

[ANDRIL]

Tem como saber? Exemplo, tenho varios objetos GET e ao teclar uma tecla de atalho F2 na funcao chamada eu identificar de qual objeto partiu a chamada, para que ao terminar possa voltar ao oBjeto que estava.

Ate+

[esbasso]

obj := odlg:findcontrol(,getfocus())

NOME
nome := obj:name