Hi,
>This only happens if the form is set to edit mode via a popup menu. This calls the click code of a command button.
- Code for the popup
- where is the focus when you select the popup
- Code on click commandbutton
I hope that pack-saddles in order to understand something.

Fabio
***************
Hi
>code for the popup :
popup is called from the rightclick of a grid :
thisform.call_profile_pop_up_menu()

.mpr code:

DEFINE POPUP shortcut SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF shortcut PROMPT "Archive Layer" ;
PICTURE "..\..\vfp7subclassed\pics\archive.ico"
DEFINE BAR 2 OF shortcut PROMPT "Delete Layer" ;
PICTURE "..\..\vfp7subclassed\pics\delete_button_16.bmp"
DEFINE BAR 3 OF shortcut PROMPT "Insert Layer" ;
PICTURE "..\..\vfp7subclassed\pics\new_button_16.bmp"
ON SELECTION BAR 1 OF shortcut ;
DO _10t0m846x ;
IN LOCFILE("OTHER\POPUP_CRE_PROFILE" ,"MPX;MPR|FXP;PRG" ,"WHERE is POPUP_CRE_PROFILE?")
ON SELECTION BAR 2 OF shortcut ;
DO _10t0m846y ;
IN LOCFILE("OTHER\POPUP_CRE_PROFILE" ,"MPX;MPR|FXP;PRG" ,"WHERE is POPUP_CRE_PROFILE?")
ON SELECTION BAR 3 OF shortcut ;
DO _10t0m846z ;
IN LOCFILE("OTHER\POPUP_CRE_PROFILE" ,"MPX;MPR|FXP;PRG" ,"WHERE is POPUP_CRE_PROFILE?")

ACTIVATE POPUP shortcut

PROCEDURE _10t0m846x
_screen.ActiveForm.archive_layer()

PROCEDURE _10t0m846y
_screen.ActiveForm.delete_layer()

PROCEDURE _10t0m846z
_screen.ActiveForm.do_button_click()

>focus is on the grid

> relevant Code on click commandbutton [ same code in do_button_click() ]
** insert
DO CASE
CASE THISFORM.pgfCREdetails.ACTIVEPAGE=1
** insert new rentlayer code
response=THISFORM.message_question('Insert a new rent layer?')
IF response=6
IF THISFORM.layercount_val=5 &&archive oldest +insert new layer
THISFORM.auto_archive()
ELSE && insert new layer
THISFORM.insert_layer()
ENDIF
ELSE
RETURN
ENDIF
other cases for the other pages of the pageframe 'pgfCREdetails'
endcase

Thanks again for your interest and time

David