thank you! Martin, this is exactly what i need. Now it runs by:
ON KEY LABEL F12 wait window SYS(1271,_screen.ActiveForm)
this return full path of running form, that's ok to me. this is to tell end user: press F12 and tell me the name of form you are running, to make changes.