>>I'd like to search through all applications (which are located under APPL directory in its own directories with subdirectories) and search for SetFocus() in Form's.Init.
>
>Use Adir to get every SCX file, do a MODI FILE NOWAIT on all files found, then do an aSelObj(aA, 1) and this will tell youf is SetFOcus() is in the Init method:
>
>?'SetFocus()' $ aA[1].ReadMethod('init')

Hi Mike,

 modify form (alltrim(cfilename)) nowait
 =aSelObj(aA, 1)
 llFlag=.f. 
 llFlag=(atc("SetFocus", aA[1].ReadMethod("Init"))>0)	
 keyboard '{Ctrl+W}'
 replace flag with llFlag

How can I close the form? Keyboard seems to do nothing...