>You may check for
>WExist('Find')=.t.
>before sending search string.
>By doing it by Timer you will ensure correct sequence.
Works like a charm. I created timer timerFINDDialog with Interval = 100 and Timer event=
if !WEXIST('Find')
CLEAR TYPEAHEAD
KEYBOARD '{CTRL+F}'
else
KEYBOARD (thisform.csearchstring)
KEYBOARD '{ENTER}'
this.Enabled = .f.
endif
I call it from my Find button by..
IF RECCOUNT('curs_sqlroutines')>0
thisform.edtRoutine_Definition.SetFocus()
thisform.timerFINDDialog.Enabled = .t.
endif
Seems completely reliable.
Thanks!
____________________________________
Don't Tread on Me
Overthrow the federal government NOW!
____________________________________