Page 1 sur 1
[R] Plobleme afficher page web
Posté : ven. 13 janv. 2012 19:03
par yagonfstm91
Bonjour !
Voila j'aimerais afficher un site web sur ma GUI, c'est simple je l'ai deja fait et sa marchait sans probleme. En utilisant ce code :
Code : Tout sélectionner
$oIE = _IECreateEmbedded()
$GUIActiveX = GUICtrlCreateObj($oIE, 24, 16, 596, 225)
_IENavigate($oIE,"http://google.fr/")
Seulement avec mon nouveau projet j'ai un problème, le contenu de la page web ne s'affiche que si l'on passe la souris dessus !
Mon code si besoin :
► Afficher le texteVoir
Code : Tout sélectionner
#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=img\icon.ico
#AutoIt3Wrapper_UseX64=n
#AutoIt3Wrapper_Res_Language=1036
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <Misc.au3>
For $i = 0 To 2
If FileExists("data\Launcher_"&$i&"modif.jpg") <> 1 Then
MsgBox(48, "Erreur", "Il manque data\Launcher_"&$i&"modif.jpg")
EndIf
Next
If FileExists("data\haut.jpg") <> 1 Then
MsgBox(48, "Erreur", "Il manque data\haut.jpg")
EndIf
$width = @DesktopWidth / 2 - 320
$height = @DesktopHeight / 2 - 240
$FormIE = GUICreate("Pokémon", 640, 250, $width, $height, BitOR($WS_SYSMENU, $WS_POPUP, $WS_POPUPWINDOW, $WS_BORDER))
;page internet
$oIE = _IECreateEmbedded()
$GUIActiveX = GUICtrlCreateObj($oIE, 24, 16, 596, 225)
_IENavigate($oIE,"http://oshidawa.olympe-network.com/pokemon/news.html")
$PicIE = GUICtrlCreatePic("data\haut.jpg", 0, 0, 640, 250)
$FormButton = GUICreate("Jaune Foudre Launcher", 640, 230, $width, $height + 251, BitOR($WS_SYSMENU, $WS_POPUP, $WS_POPUPWINDOW, $WS_BORDER))
$Pic = GUICtrlCreatePic("data\Launcher_0modif.jpg", 0, 0, 640, 230)
$Jouer = GUICtrlCreateGraphic(344, 22, 273, 97)
$Quitter = GUICtrlCreateGraphic(384, 118, 257, 105)
Opt("TrayMenuMode",1)
$About = TrayCreateItem("About", -1, -1, 1)
$icon = "img\icon.ico"
TraySetIcon($icon)
TraySetToolTip("Pokémon Jaune Foudre Launcher")
GUISetState(@SW_SHOW, $FormIE)
GUISetState(@SW_SHOW, $FormButton)
While 1
$nMsg = TrayGetMsg()
Switch $nMsg
Case $About
MsgBox(64, "Informations :", "Launcher by Yago_nfs_tm_91- creer pour Oshidawa"&@CRLF&"yagoserver.net"&@CRLF&"oshidawa.olympe-network.com")
EndSwitch
$pos = GUIGetCursorInfo()
If IsArray($pos) Then
If $pos[4]=$Jouer Then
GUICtrlSetImage($Pic, "data\Launcher_1modif.jpg")
If _IsPressed("01") Then
If FileExists("data\game.exe") Then
Run("data\game.exe")
Else
MsgBox(48, "Erreur", "le Launcher n'a pas trouver data\game.exe")
EndIf
EndIf
ElseIf $pos[4]=$Quitter Then
GUICtrlSetImage($Pic, "data\Launcher_2modif.jpg")
If _IsPressed("01") Then
Exit
EndIf
Else
GUICtrlSetImage($Pic, "data\Launcher_0modif.jpg")
;If _IsPressed("01") Then
;$mouse = MouseGetPos()
;WinMove("FormIE", "", $mouse[0], $mouse[1])
;WinMove("FormButton", "", $mouse[0], $mouse[1] + 250)
;EndIf
EndIf
EndIf
WEnd
- data.rar
- images
- (146.36 Kio) Téléchargé 128 fois
Merci
Re: [..] Plobleme afficher page web
Posté : ven. 13 janv. 2012 19:28
par lesolutionneur
Salut,
Je suis sur itouch, donc je peux pas voir en détail, mais je me demande ce que c'est tout ces tests de position qui m'ont l'air foireux...
Re: [..] Plobleme afficher page web
Posté : ven. 13 janv. 2012 19:51
par mikell
@solutionneur
C'est parler sans comprendre qui est foireux
@yagonfstm91
Sympa ton script
Il te faut juste créer l'image $PicIE avant le controle activeX, ake sinon elle se met par-dessus
Re: [..] Plobleme afficher page web
Posté : ven. 13 janv. 2012 19:57
par lesolutionneur
Alors, on peut m'expliquer pouquoi il fait des tests de position sur la fenêtre ?
Re: [..] Plobleme afficher page web
Posté : ven. 13 janv. 2012 21:28
par mikell
l'aide a écrit :GUIGetCursorInfo
Success: returns a five-element array that containing the mouse cursor information
...
$array[4] = ID of the control that the mouse cursor is hovering over
Il vérifie que le curseur de la souris est bien sur le controle désiré (dans son cas un Graphic) pour valider des instructions en cas de clic
Bon il aurait pu s'y prendre autrement, c'est pas académique mais sa méthode fonctionne ^^
Re: [..] Plobleme afficher page web
Posté : ven. 13 janv. 2012 23:03
par lesolutionneur
Très justement, je pensais qu'il pourrait y avoir une erreur dedans vu que son embedded ne s'affichait que quand souris était dessus (c'est vrai que l'hypothèse élément gui au-dessus m'est sorti complètement de la tête.), en tout cas, je lui conseille vivement d'adopter des méthodes plus "conventionnelles" de façon à ce qu'il évite les erreurs (imagine qu'il doive changer les dimensions de la fenêtre ou bouger les éléments, quelle galère !
Re: [..] Plobleme afficher page web
Posté : ven. 13 janv. 2012 23:30
par yagonfstm91
mikell a écrit :@solutionneur
C'est parler sans comprendre qui est foireux
@yagonfstm91
Sympa ton script
Il te faut juste créer l'image $PicIE avant le controle activeX, ake sinon elle se met par-dessus
Ca marche, la page s'affiche mais maintenant je ne peut pas naviguer dessus
lesolutionneur a écrit :Alors, on peut m'expliquer pouquoi il fait des tests de position sur la fenêtre ?
Ca sert a changer l'image lors du survol de la souris sur un bouton
Re: [..] Plobleme afficher page web
Posté : sam. 14 janv. 2012 00:11
par mikell
► Afficher le texte
Code : Tout sélectionner
$FormIE = GUICreate("Pokémon", 640, 250, $width, $height, BitOR($WS_SYSMENU, $WS_POPUP, $WS_POPUPWINDOW, $WS_BORDER))
$PicIE = GUICtrlCreatePic("data\haut.jpg", 0, 0, 640, 250)
GUICtrlSetState(-1, $GUI_DISABLE) ; [color=#FF0000]<====[/color]
$oIE = _IECreateEmbedded()
$GUIActiveX = GUICtrlCreateObj($oIE, 24, 16, 596, 225)
_IENavigate($oIE,"http://oshidawa.olympe-network.com/pokemon/news.html")
Re: [..] Plobleme afficher page web
Posté : sam. 14 janv. 2012 00:25
par yagonfstm91
Ca marche impec merci beaucoup !
