Powerbuilder pour les completement Geeks !

Le forum (ô combien francophone) des utilisateurs de Powerbuilder.

Recherche rapide

Annonce

Certaines rubriques, dont des cours, sont uniquement visibles par les membres du forum ^^.
Dans la rubrique Liens & Références, vous avez accès à un sommaire de téléchargement, profitez-en !
Il existe maintenant un nouveau TOPIC "Votre CV en Ligne" accessible uniquement par demande.

#1 06-06-2006 12:27:25

pick ouic  
La bourse ou la vie ^^
Award: gearotter
Lieu: Massy-Verrières
Date d'inscription: 29-05-2006
Messages: 4658
Pépites: 942
Banque: 2,147,483,647
Site web

[ASTUCE] Griser le bouton X

Griser le bouton X, afin que l'utilisateur ne puisse pas refermer l'application.
Attention, cela n'empeche pas l'action  'Alt - F4'


declaration en local external function :

Code: pb

Function ulong GetSystemMenu(ulong hWnd, BOOLEAN bRevert) Library "user32.dll"
Function BOOLEAN EnableMenuItem(ulong hMenu, uint uIDEnableItem, uint uEnable) Library "user32.dll"

puis, dans l'evenement open de la fenetre :

Code: pb

uint SC_CLOSE = 61536
uint MF_BYCOMMAND = 0
uint MF_GRAYED = 1
EnableMenuItem(GetSystemMenu(handle(This), FALSE), SC_CLOSE, MF_BYCOMMAND + MF_GRAYED)

http://img106.imageshack.us/img106/2807/boutonx8dz.jpg


Connaitre son ignorance est une grande part de la connaissance.
http://animegifs.free.fr/anime/mazinger/mazinger.gif

Hors ligne

 

Pied de page des forums

Propulsé par FluxBB 1.2.22