Jump to content

HowTo. GoOnInternet InAGUI


ZanaxNL
 Share

Recommended Posts

Hey.

How do i get for example www.google.com inside the GUI.

So that Google is in Form1_2 so u can do stuff there > search things.

* Or maybe even Programs inside the GUI/Form?!

Thx

Zanax

Edited by ZanaxNL
Link to comment
Share on other sites

  • Moderators

ZanaxNL,

Search for "embedded IE" and all will be revealed. ;)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

Aha. i came farther : )

#include <IE.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


_IEErrorHandlerRegister()

$oIE = _IECreateEmbedded()
$hGUI = GUICreate("myWindow", 800, 600, (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, _
        $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GUIActiveX = GUICtrlCreateObj($oIE, 0, 0, 800, 600)
GUISetState();Show GUI

_IENavigate($oIE, "http://www.autoitscript.com/forum/index.php?showtopic=82184")


;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
; Get control handle
Global $hHandle = _GetObjectWinHandle($oIE)
ConsoleWrite("--- " & $hHandle & @CRLF)
;XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

; Focus it
$oIE.document.focus


For $i = 1 To 10

    #cs
        $oIE.document.parentwindow.scrollBy(500, 500) ; DaleHohm's suggestion
        Sleep(1000)
    #ce

    ConsoleWrite("sending command:" & ControlSend($hHandle, 0, 0, "{DOWN}") & @CRLF)
    Sleep(1000)

Next





Func _GetObjectWinHandle($oObject)

    Local $aCall = DllCall("oleacc.dll", "int", "WindowFromAccessibleObject", _
            "idispatch", $oObject, _
            "hwnd*", 0)

    If @error Or $aCall[0] Then
        Return SetError(1, 0, 0)
    EndIf

    Return $aCall[2]

EndFunc   ;==>_GetObjectWinHandle

I saw this one on the forum only.

Im pretty new here.

And yea, i only need that he opens it in a GUI.

Can u maybe make this script shorter to the basics what i meen/need

Thanks! ( should this also work for programms? )

Zanax

: )

If i only do:

#include <IE.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


_IEErrorHandlerRegister()

$oIE = _IECreateEmbedded()
$hGUI = GUICreate("myWindow", 800, 600, (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, _
        $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS)
$GUIActiveX = GUICtrlCreateObj($oIE, 0, 0, 800, 600)
GUISetState();Show GUI

_IENavigate($oIE, "http://www.autoitscript.com/forum/index.php?showtopic=82184")

Then it automatic close after it started.

What to fix that?

Edited by ZanaxNL
Link to comment
Share on other sites

Look at all the examples in the help file that use a GUI. There is always a loop to keep the script running. Since you stick with the default message mode, you need a GuiGetMsg() loop.

;)

Edited by PsaltyDS
Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law
Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...