BOITE DE DIALOGUE - MESSAGE BOX - MSGBOX WIZZARD 1.0 (LE ÐØ© ) VERSION OCX TRÈS FACILEMENT INTÉGRABLE À TOUTES VOS APPLICATIONS!

---

Auteur : nico711

Ecrire un message privé
Commentaire sur cette source (6)
Ajouter un commentaire et/ou une note

Boite de dialogue remplaçant avantageusement celle de VB.


3 zips:
la documentation,l'exemple,la source.
Version finalisée mais suceptible d'évoluer!
* nombreux boutons graphiques (9 types de boites au total)
* couleur des boutons/arriere plan modifiable
* insertion d'images d'arriere plan
* vous pouvez même faire neiger dans la boite !!



    

MSGBOX WIZZARD
--------------

Objet.Action(Optional mess_box As String, Optional titre_box As String, Optional styl_box As Integer, Optional coul_box As Long, Optional coul_text As Long,
Optional pict As String, Optional larg_box As Long, Optional haut_box As Long,
Optional stars as boolean,Optional nb_flocons as integer,Optional coul_flocon as integer,Optional vitesse_flocon as integer)


Tous les paramètres sont optionnels


Valeur renvoyée de Type string
    "oui"
    "non"
    "annul"
    ""

Les paramètres:
---------------
*mess_box (contenu texte de la boite)
   Type String
   defaut=aucun

*titre_box ( titre de la boite)
    Type String
    defaut=aucun

*styl_box (style des boutons)
    Type Integer
            =1, bouton  OUI
            =2, bouton  OUI / NON / ANNULER
            =3, bouton  INFORMATION
            =4  bouton  EXCLAMATION (1)
            =5  bouton  EXCLAMATION (2)
            =6  bouton  STOP
            =7  bouton  INTERROGATION
            =8  bouton  ARRET CRITIQUE
            =9  bouton  Ok
*coul_box
      Type Long ou Hexa
      defaut=&H8000000F (beige)
      valeur : hexa ou equivalent numérique

*coul_text
      Type Long ou Hexa
      defaut=0 ( noir)
      valeur : hexa ou equivalent numérique

*pic (image arrière plan de la boite)
       Type String
       defaut=aucun
       valeur : App.Path & "\" & "nom de l'image.bmp"

*larg_box
       Type Long
       defaut=s'ajuste en fonction du contenu.
       valeur : si larg_box=100 , largeur=largeur par defaut+100

*haut_box
       Type Long
       defaut=s'ajuste en fonction du contenu.
       valeur : si haut_box=100 , hauteur=hauteur par defaut+100

*stars
       Type booleen
       defaut=false
       =true affiche chutes de neige dans la boite!

*nb_flocon
       Type: Integer
       Defaut:100
       nombre de flocons dans la boite
       (valide si stars=true)

*coul_flocon
      Type Long ou Hexa
      defaut=0 ( noir .. beark)
      valeur : hexa ou equivalent numérique        
      (valide si stars=true)

*vitesse_flocon
       Type: Integer
       Defaut:30
       nombre de flocons dans la boite
       (valide si stars=true)    

Télécharger le zip