Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
VFp, WP8
Message
 
À
26/08/1998 12:10:21
Information générale
Forum:
Visual FoxPro
Catégorie:
Fonctions Windows API
Titre:
Divers
Thread ID:
00129837
Message ID:
00130168
Vues:
27
>Any info yuo could provide would be appreciated. TIA

Here's the declaration, some values, and an example procedure:
DECLARE INTEGER SendMessage IN Win32API;
  INTEGER hwnd, INTEGER uMsg,;
  INTEGER wParam, INTEGER lParam
#DEFINE WM_CLOSE	    0x0010
#DEFINE WM_DESTROY	    0x0002
#define WM_QUIT		    0x0012
PROCEDURE KillWindows
* This assumes that the above declaration are in effect.
LPARAMETER pctitle

LOCAL lnhwnd
* Call Is_Run for a window handle
lnhwhnd = Is_Run32(pctitle)
DO WHILE NOT EMPTY(lnhwnd)
  * If this doesn't work try the other
  * values
  = SendMessage(lnhwnd, WM_CLOSE, 0, 0)
  lnhwnd = Is_Run(pctitle)
ENDDO
Naturally, I'd test this pretty thoroughly before implementation.

Please let me know how this turns out.
George

Ubi caritas et amor, deus ibi est
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform