>I'm missing something obvious this morning.
>
>I'm writing an editor-like application for SQL Server stored procs/functions/triggers/etc that displays a grid (stored procs that have a string we searched for) and an editbox that displays the contents of a memo field (the definition of the stored proc selected in the grid).
>
>I want to, from buttons, set focus to the editbox, light up the find (CTRL+F) or replace (CTRL-L) menu and load it with the string we searched for, and have it go to the first occurance in the editbox.
>
>basically..
>

>	IF RECCOUNT('curs_sqlroutines')>0
>		CLEAR TYPEAHEAD
>		thisform.edtRoutine_Definition.SetFocus()
>		KEYBOARD '{CTRL+F}'
>		KEYBOARD (thisform.csearchstring)
>		KEYBOARD '{ENTER}'	
>	ENDIF
>

>So far, this works unreliably. Many times it doesn't actually open the find dialog and just winds up typing my search string into the editbox.
>
>
>I thought there was a way to just activate the system Find window?
How about:

KEYBOARD (thisform.csearchstring) + CHR(13)
SYS(1500, '_MED_FIND', '_MEDIT')

Not tested at all