Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Sysmenu of a form
Message
De
19/10/2009 07:23:15
Lutz Scheffler
Lutz Scheffler Software Ingenieurbüro
Dresden, Allemagne
 
 
À
19/10/2009 07:16:10
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01429815
Message ID:
01429831
Vues:
60
>>>>Hi All,
>>>>
>>>>I need to open the sysmenu of a form via code. How to do this?
>>>>
>>>>Agnes
>>>
>>>Agnes,
>>>
>>>I have this code in the Click of a form's commandbutton
>>>
>>>
>>>#define WM_COMMAND 0x0111
>>>#define WM_SYSCOMMAND	0x0112
>>>
>>>#define SC_KEYMENU	0xF100
>>>#define	WM_CHAR 0x0102
>>>
>>>declare integer PostMessage in user32.dll long, long, long, long
>>>
>>>&& select the menu
>>>=PostMessage (m.thisform.hwnd, WM_SYSCOMMAND, SC_KEYMENU, 0)
>>>
>>>&& make it drop down
>>>=PostMessage (m.thisform.hwnd, WM_CHAR , asc(space(1)), 0)
>>>
>>
>>
>>Hi Gregory,
>>
>>this one opens the applications menu (Like "ALT"+ space"). I need the one of the form ("ALT" + "-").
>>
>>Agnes
>
>hi Agnes,
>
>I guess we do not share the meaning of 'sysmenu'

No, we do.

Beg your paedon, I've used a form without caption for testing and those does redirceted to the app. It works fine for normal forms.

Thank you

Agnes
Words are given to man to enable him to conceal his true feelings.
Charles Maurice de Talleyrand-Périgord

Weeks of programming can save you hours of planning.

Off

There is no place like [::1]
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform