Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Programmatically open find/replace windows
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01201555
Message ID:
01201606
Vues:
21
>
>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!
____________________________________
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform