Page 1 sur 1
[...] Remplacer Splash par GUI, possible ?
Posté : ven. 26 juin 2009 20:02
par Julien
Bonsoir,
J'ai fais des recherches puis des test avec la fonction splash mais je ne trouve pas comment afficher plusieurs ligne avec des taille de texte et police différente par exemple voir même insérer une image.
Est il possible d' un Gui d'en faire un splash, surement avec le POPUP mais le programme réagira t'il de la même façon ?
Merci.
Re: [...] Remplacer Splash par GUI, possible ?
Posté : ven. 26 juin 2009 21:31
par TaPuZ
Même si ce n'est pas de moi, mais de Tlem (très certainement), je vais me la peter, et donner un chti bout de code, avec une image que j'ai mis dans une dll:
► Afficher le texte
Code : Tout sélectionner
Dim $SplashGui
converti
$message = "blablabla"
_MySplashImageOn("blabalbla", @ScriptFullPath, "splashin", 640, 400)
Sleep(6000)
_MySplashOff()
; Ouverture avec le splash qui va bien
Func _MySplashImageOn($Title, $Dll, $RC, $Width = 640, $Height = 400, $Xpos = -1, $YPos = -1)
$SplashGui = GUICreate($message, $Width, $Height, $Xpos, $YPos, BitOR($WS_CAPTION, $WS_POPUP, $WS_BORDER, $WS_CLIPSIBLINGS, $WS_SIZEBOX))
GUICtrlCreatePic("", 0, 0, $Width, $Height)
_ResourceSetImageToCtrl(-1, $RC, 10, $Dll) ; Ici, on assigne la ressource $RC au composant image GUICtrlCreatePic.
GUISetState(@SW_SHOW)
EndFunc ;==>_MySplashImageOn
; Cette fonction permet de supprimer la GUI crée pour le Splash.
Func _MySplashOff()
GUIDelete($SplashGui)
EndFunc ;==>_MySplashOff
Re: [...] Remplacer Splash par GUI, possible ?
Posté : ven. 26 juin 2009 22:20
par ani
Bonjour,
Au niveau des styles, j'aurai juste indiqué $WS_POPUPWINDOW ;)d
bonne continuation