ON KEY LABEL f12 clear events o=CREATEOBJECT("TestBind") BINDEVENT(_vfp,"ActiveForm",o,"HandleEvent") o1=CREATEOBJECT("form") o1.Name = "FirstForm" o1.Caption = "First" o1.Show() o2=CREATEOBJECT("Form") o2.Name = "SecondForm" o2.Caption = "Second" o2.show() READ EVENTS RETURN DEFINE CLASS TestBind AS Custom PROCEDURE HandleEvent DEBUGOUT PROGRAM() ENDPROC ENDDEFINEAny suggestions? For that matter, I'll really want to do this when using a top-level form as my background, so ideas about what I can bind to there would be helpful.