GUICtrlCreateObj-Inhalt skalieren?

  • Hallo,

    ich stehe vor folgendem Problem:
    ich habe in meinem Script ein _IECreateEmbedded()-Objekt in einem GUI und möchte jetzt den Inhalt skalieren können. Die Internetseite soll also visuell verkleinert bzw. vergrößert werden, so - beispielsweise - wie wenn ich ein Bild in meinem GUI hätte und dieses dann von der Größe her verändere.

    Kennt da jemand eine Methode?

    ...der Andy :rolleyes:

    Einmal editiert, zuletzt von AndyTR (11. Juni 2012 um 23:17)

  • Das geht z.B per Frame mit Style ;)

    Hier das Beispiel aus dem englischen Forum "zoom-in-ie-in-gui" -> http://www.autoitscript.com/forum/topic/11…m-in-ie-in-gui/

    Funktioniert sogar noch das Beispiel :D

    [autoit]

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

    [/autoit][autoit][/autoit][autoit]

    _IEErrorHandlerRegister ()

    [/autoit][autoit][/autoit][autoit]

    $oIE = _IECreateEmbedded ()
    GUICreate("Embedded Web control Test", 640, 580, _
    (@DesktopWidth - 640) / 2, (@DesktopHeight - 580) / 2, _
    $WS_OVERLAPPEDWindOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN)
    $GUIActiveX = GUICtrlCreateObj($oIE, 10, 40, 600, 360)
    $GUI_Button_ZoomIn = GUICtrlCreateButton("ZoomIn", 10, 420, 100, 30)
    $GUI_Button_ZoomOut = GUICtrlCreateButton("ZoomOut", 120, 420, 100, 30)
    $GUI_Button_Home = GUICtrlCreateButton("Home", 230, 420, 100, 30)
    $GUI_Button_Stop = GUICtrlCreateButton("Stop", 340, 420, 100, 30)

    [/autoit][autoit][/autoit][autoit]

    GUISetState() ;Show GUI

    [/autoit][autoit][/autoit][autoit]

    _IENavigate ($oIE, "http://www.autoitscript.com/")

    [/autoit][autoit][/autoit][autoit]

    ; Waiting for user to close the Window
    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    ExitLoop
    Case $msg = $GUI_Button_Home
    _IENavigate ($oIE, "http://www.autoitscript.com/")
    Case $msg = $GUI_Button_ZoomIn
    $HTMLTAG2 = '<iframe src="http://www.autoitscript.com/" style="zoom:200%"></iframe>'
    _IENavigate($oIE,"about:blank",1)
    _IEBodyWriteHTML($oIE,$HTMLTAG2)
    Case $msg = $GUI_Button_ZoomOut
    $HTMLTAG2 = '<iframe src="http://www.autoitscript.com/" style="zoom:180%"></iframe>'
    _IENavigate($oIE,"about:blank",1)
    _IEBodyWriteHTML($oIE,$HTMLTAG2)
    Case $msg = $GUI_Button_Stop
    _IEAction ($oIE, "stop")
    EndSelect
    WEnd

    [/autoit][autoit][/autoit][autoit]

    GUIDelete()

    [/autoit][autoit][/autoit][autoit]

    Exit

    [/autoit]