Page 1 sur 1
[..] Scroll dans un objet IE
Posté : mer. 21 oct. 2009 21:06
par TommyDDR
Bonjour,
J'aimerai savoir comment mettre la scroll barre en bas dans une page IE.
La fonction pour les Edit ne marche pas :
_GUICtrlEdit_LineScroll($edit, 0, _GUICtrlEdit_GetLineCount($Edit))
Merci.
Re: [..] Scroll dans un objet IE
Posté : jeu. 22 oct. 2009 21:47
par TommyDDR
me manque plus que ca pour finir mon chat et je pourrai enfin posté mon code source complet dans les exemples de scripts
Please.
Re: [..] Scroll dans un objet IE
Posté : ven. 23 oct. 2009 00:02
par timmalos
Envoi le code même si il n'est pas fini stp, qu'on puisse testé.
Re: [..] Scroll dans un objet IE
Posté : ven. 23 oct. 2009 16:47
par TommyDDR
Désolé de te répondre ça mais, si je poste mon code en entier maintenant, ca va plus embrouillé les gens que les mettre sur la voie de la réponse que je cherche ^^'.
Voila le code minimum pour pouvoir tester et comprendre le problème :
► Afficher le texteCode
Code : Tout sélectionner
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <IE.au3>
Opt("GUIOnEventMode", 1)
Dim $hCtrlObj
Dim $GuiChat = GUICreate("Chat", 400, 400)
GUISetBkColor(0x83CAFF)
$hCtrlObj = _IECreateEmbedded()
$hCtrl = GUICtrlCreateObj($hCtrlObj, 5, 5, 300, 360)
$file = FileOpen("test.html", 1)
_IENavigate($hCtrlObj, @scriptdir&"\test.html")
FileClose($file)
FileDelete("test.html")
$Input = GUICtrlCreateInput("", 5, 370, 300, 20)
$ListeViewOnline= GUICtrlCreateListView("Nom", 310, 5, 85, 360)
$Envoi = GUICtrlCreateButton("Envoyer", 310, 370, 85, 20)
GUICtrlSendMsg($ListeViewOnline, $LVM_SETCOLUMNWIDTH, 0, 81)
GUICtrlSetState($Envoi, $GUI_DEFBUTTON)
GUICtrlSetOnEvent($Envoi, "Envoyer")
GUISetOnEvent($GUI_EVENT_CLOSE, "quit")
GUISetState(@SW_SHOW, $GuiChat)
GUICtrlSetState($Input, $GUI_FOCUS)
_IEBodyWriteHTML($hCtrlObj, "<h1>")
While(True)
Sleep(100)
WEnd
Func Envoyer()
$Envoi = GUICtrlRead($Input)
If(StringLen($Envoi) > 0) Then
$Read = _IEBodyReadHTML($hCtrlObj) & "<br />"
_IEBodyWriteHTML($hCtrlObj, $Read & $Envoi)
GUICtrlSetData($Input, "")
GUICtrlSetState($Input, $GUI_FOCUS)
EndIf
EndFunc
Func quit()
Exit
EndFunc
En testant (en envoyant plein de messages) on voit bien que c'est assez gênant que la scroll reste en haut ^^.
Rappel => Question : "Comment faire pour déplacer la scroll barre de la page IE ?"