Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How do I activate the taskbar in XP
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
SAMBA Server
Database:
Visual FoxPro
Divers
Thread ID:
01233120
Message ID:
01233153
Vues:
12
Here's a quick and dirty solution: Start button is located and button click is emulated by sending left mouse button down and up messages.
#DEFINE WM_LBUTTONDOWN 0x201
#DEFINE WM_LBUTTONUP 0x0202

DECLARE INTEGER FindWindow IN user32;
	STRING lpClassName, STRING lpWindowName

DECLARE INTEGER FindWindowEx IN user32;
	INTEGER hwndParent, INTEGER hwndChildAfter,;
	STRING lpszClass, STRING @lpszWindow

DECLARE INTEGER SendMessage IN user32;
	INTEGER hWindow, INTEGER Msg,;
	INTEGER wParam, INTEGER lParam

LOCAL hTray, hStart
hTray = FindWindow("Shell_TrayWnd", Null)
hStart = FindWindowEx(hTray, 0, "button", NULL)

= SendMessage(hStart, WM_LBUTTONDOWN, 0, 0)
DOEVENTS
= SendMessage(hStart, WM_LBUTTONUP, 0, 0)
VFP window keeps capturing keyboard events. Need to find HWND for the popup window (Windows Start Menu) and activate it.

Comments to this article may appear helpful:
http://www.news2news.com/vfp/?example=336
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform