Jump to content
Sign in to follow this  
mesale0077

QtWeb browser embeeding in guı

Recommended Posts

mesale0077

QtWeb browser embeeding in guı

dowland link :http://qtweb.net/

portable :http://www.qtweb.net/downloads/QtWeb.zip

like this source

ı think but dont work

or how is work ?

#include <GUIConstants.au3>
#include <WindowsConstants.au3>



$Mozilla = ObjCreate("QtWeb.Browser") ;


; Create a simple GUI for our output
GUICreate ( "QtWeb Internet Browser", 640, 580,(@DesktopWidth-640)/2, (@DesktopHeight-580)/2 , $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GUIActiveX         = GUICtrlCreateObj      ( $Mozilla,      10, 40 , 600 , 360 )
$GUI_Button_Back    = GuiCtrlCreateButton   ("Back",     10, 420, 100,  30)
$GUI_Button_Forward = GuiCtrlCreateButton   ("Forward", 120, 420, 100,  30)
$GUI_Button_Home    = GuiCtrlCreateButton   ("Home",    230, 420, 100,  30)
$GUI_Button_Stop    = GuiCtrlCreateButton   ("Stop",    330, 420, 100,  30)

GUISetState ()       ;Show GUI

$Mozilla.navigate("http://www.autoitscript.com/forum/index.php?showtopic=95595")

; Waiting for user to close the window
While 1
    $msg = GUIGetMsg()
    
    Select
        Case $msg = $GUI_EVENT_CLOSE
            ExitLoop
        Case $msg = $GUI_Button_Home
            $Mozilla.navigate("http://www.autoitscript.com/forum/")
        Case $msg = $GUI_Button_Back
            $Mozilla.GoBack
        Case $msg = $GUI_Button_Forward
            $Mozilla.GoForward
        Case $msg = $GUI_Button_Stop
            $Mozilla.Stop
    EndSelect
    
Wend

$Mozilla = 0
GUIDelete()

exit

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×