do form waitForm name thisForm.waitForm noread thisForm.keyPreview = .t. && all keypress events go through && thisFrom.keypress() first && do other stuff here, like setFocus()In the main form's KEYPRESS method:
LPARAMETERS nKeyCode, nShiftAltCtrl if vartype(thisForm.waitForm)="O" && there is probably a better way to do this :) thisForm.waitForm.release() thisForm.keyPreview = .f. endifOf course, the form class needs to have a property called 'waitForm'. Does this get you any closer to what you want to do?