Page 1 sur 1
[R] Une seule page internet sur une table
Posté : sam. 11 déc. 2010 23:36
par Kagami
Bonsoir,
J'ai une GUI qui se présente en onglet. Je voudrais savoir si il serait possible d'afficher une page internet sur cet onglet.
Voilà, c'est tout ^^
Re: [..] Une seule page internet sur une table
Posté : sam. 11 déc. 2010 23:58
par Sh4dows
En théorie oui !
Re: [..] Une seule page internet sur une table
Posté : dim. 12 déc. 2010 00:55
par Kagami
Et donc, j'attend une réponse plus constructive.
Qu'elles fonctions utiliser par exemple ^^
Re: [..] Une seule page internet sur une table
Posté : dim. 12 déc. 2010 05:43
par bloodwolff
Comme un exemple est souvent bien mieux pour expliquer
► Afficher le texte
Code : Tout sélectionner
#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
$oIE = _IECreateEmbedded()
$text = gettext()
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("", 523, 357, 192, 124)
$Tab1 = GUICtrlCreateTab(0, 0, 521, 353)
$TabSheet1 = GUICtrlCreateTabItem("Ta question !")
$Obj1_ctrl = GUICtrlCreateObj($oIE, 8, 32, 504, 312)
_IENavigate($oIE, "http://autoit.fr/forum/viewtopic.php?f=3&t=6415&sid=eee051d1ac31fca07ed5deca9cb33070")
$TabSheet2 = GUICtrlCreateTabItem("La réponse !")
GUICtrlCreateEdit($text, 8, 32, 504, 312)
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
GUICtrlSetState($TabSheet1 , @SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func gettext()
Return "#include <TabConstants.au3>" & @CRLF & _
"#include <WindowsConstants.au3>" & @CRLF & _
"#include <IE.au3>" & @CRLF & _
"$oIE = _IECreateEmbedded()" & @CRLF & _
"$text = gettext()" & @CRLF & _
"#Region ### START Koda GUI section ### Form=" & @CRLF & _
"$Form1 = GUICreate(""Form1"", 523, 357, 192, 124)" & @CRLF & _
"$Tab1 = GUICtrlCreateTab(0, 0, 521, 353)" & @CRLF & _
"$TabSheet1 = GUICtrlCreateTabItem(""Ta question !"")" & @CRLF & _
"$Obj1_ctrl = GUICtrlCreateObj($oIE, 8, 32, 504, 312)" & @CRLF & _
"_IENavigate($oIE, ""http://autoit.fr/forum/viewtopic.php?f=3&t=6415&sid=eee051d1ac31fca07ed5deca9cb33070"")" & @CRLF & _
"$TabSheet2 = GUICtrlCreateTabItem(""La réponse !"")" & @CRLF & _
"GUICtrlCreateEdit($text, 8, 32, 504, 312)" & @CRLF & _
"GUICtrlCreateTabItem("")" & @CRLF & _
"GUISetState(@SW_SHOW)" & @CRLF & _
"#EndRegion ### END Koda GUI section ###" & @CRLF & _
"GUICtrlSetState($TabSheet1 , @SW_SHOW)" & @CRLF & _
@CRLF & _
"While 1" & @CRLF & _
" $nMsg = GUIGetMsg()" & @CRLF & _
" Switch $nMsg" & @CRLF & _
" Case $GUI_EVENT_CLOSE" & @CRLF & _
" Exit" & @CRLF & _
@CRLF & _
" EndSwitch" & @CRLF & _
"WEnd"
EndFunc
Re: [..] Une seule page internet sur une table
Posté : dim. 12 déc. 2010 10:27
par Kagami
Exactement ce que je cherchais =)
Merci, je met en résolu tout de suite!