>
>This seems to work on my computer:
>
>thisform.edit1.SetFocus()
>IF thisform.edit1.SelStart = 0
>KEYBOARD '{CTRL+F}'
>IF WExist('Find')=.t.
> KEYBOARD 'Adobe'
>endif
>KEYBOARD '{Alt+N}'
>KEYBOARD '{CTRL+W}'
>RELEASE WINDOWS Find
>endif
This works for me too.
Boy, I asked 1 question and got 3 good answers each using a different approach in less than an hour!
____________________________________
Don't Tread on Me
Overthrow the federal government NOW!
____________________________________