1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. autoBert

Beiträge von autoBert

  • Liveticker auslesen

    • autoBert
    • 10. Dezember 2010 um 20:55
    Zitat von Manlius

    Jetzt is aber mein Problem: Solche Live Ticker sind meistens mit Flash oder so programmiert. Kann ich da überhaupt was rauslesen?


    Bei Flash hast du afair immer Pech, bei https://autoit.de/www.sport1.de im speziellen auch, denn

    Zitat

    Die Website beinhaltet Daten und Informationen, die urheber- und/oder markenrechtlich zugunsten von SPORT1 oder zugunsten Dritter geschützt sind. Jedes Herunterladen, jede Vervielfältigung, Änderung, Verbreitung, Speicherung, Vorführung, Sendung, Vermietung, Leihe oder sonstige Nutzung der Website im ganzen oder einzelner Inhalte der Website, insbesondere von Texten, Textteilen, Bildern, Bewegtbildern und/oder Audiodaten, ist ohne vorherige schriftliche Zustimmung von SPORT1 untersagt. Gestattet ist dem Nutzer ausschließlich die technisch bedingte Vervielfältigung zum Zwecke des Browsing (Zugriff auf die Website und Darstellung der Website und ihrer Inhalte), soweit diese Handlung keinen wirtschaftlichen Zwecken dient, sowie die dauerhafte Vervielfältigung für den eigenen Gebrauch.

    Quelle: http://www.sport1.de/de/sport1/agb/nutzungsbedingungen.html
    Und da unsere Forenregeln nun einmal aussagen:

    Zitat

    Folgende Inhalte sind absolut unerwünscht. Das Team behält es sich ausdrücklich vor, bei Verstoß gegen diese Regeln je nach Schweregrad zu verwarnen, zu löschen oder gar komplett zu sperren.

    ... * Automatisierung von Webseiten oder Tools, die das in ihren AGBs verbieten

    wird dieses Thema wohl ein Admin/Mod closen

    mfh autoBert

  • Bug im GUICtrlSetOnEvent bzw. GUICtrlSetBkColor?

    • autoBert
    • 10. Dezember 2010 um 19:29

    Ich glaube mich zu erinnern dass hierfür schon vor langer Zeit ein Ticket erstellt wurde. Durch das setzen der Hintergrundfarbe reagiert der Button wie wenn der Stil $BS_DEFPUSHBUTTON benutzt worden wäre.

    Edit: stimmt Bug ist schon gemeldet:

    • http://www.autoitscript.com/trac/autoit/ticket/1504
    • http://www.autoitscript.com/trac/autoit/ticket/376

    wird aber nicht gefixt, war damals im GuiGetMsg-Modus umschreiben geht nicht. Hier ist der Problem-Thread dazu:
    [ offen ] Bug oder GuiGetMsg() will nicht wie ich will

    mfg autoBert

  • Mehrere Webseite mit autoit öffnen

    • autoBert
    • 10. Dezember 2010 um 19:17

    Hallo Poster63,

    herzlich willkommen im Forum und viel Spass mit AutoIt.

    Hier kannst du dir die Hilfe herunterladen.
    Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

    Zitat von Poster63

    In den letzten Tagen habe ich mir das Script geladen und das Tutorial gelesen und teilweise nachgebaut.

    welches Skript? bitte posten!

    Da du mit FF arbeitest solltest du dich in die FF.AU3 von Stilgar einarbeiten:

    • Mozrepl wird dafür benötigt, kannst du von hier installieren: http://wiki.github.com/bard/mozrepl/
    • FF.au3 herunterladen
    • Mozrepl über Extras|Mozrepl im Firefox starten
    • Funktionsrefernz findest du hier
    • Zum testen Skript starten: [autoit]#Include <FF.au3>

      _FFStart("http://www.autoit.de", Default, 2)

      If _FFIsConnected() Then
      If _FFLoadWait() Then MsgBox(64, "", "Page was loaded in " & @extended & "ms")

      Sleep(3000)
      ; ;_FFQuit() ;FireFox schliessen
      EndIf

      [/autoit]
    [autoit]
    • Eine Tutorial findest du hier
    • [autoit]
    • dieser Link Wenn mal was nicht geht ... bitte zuerst hier nachschauen ... enthält auch sehr nützliche Hinweise von [user='200122']Stilgar[/user] (Author von ff.au3)
    [/autoit]
      [/autoit]


    Viel Spass bei der FireFox-Automatisierung

    mfg (Auto)Bert

  • kann man vb dlls in autoit verwenden

    • autoBert
    • 10. Dezember 2010 um 17:26
    Zitat von simon

    und noch was
    was ist ähnlicher zu borland c++, vb oder vc++?


    das solltest du doch schon am Namen erkennern,

    mfg autoBert

  • FF.au3 -> Html auslesen , verändern , Veränderter Code darsstellen

    • autoBert
    • 10. Dezember 2010 um 17:07

    Hallo Aldi,

    die Änderungen von HTTP nach HTTPS machen auf einer fremden Seite keinen Sinn und für deine eigene kannst du eine Kopie deines Original-Quellcodes nehmen und mit

    [autoit]

    StringReplace

    [/autoit]

    tauschen. Zur Kontrolle kannst du

    [autoit]

    Shellexecute(MeineSeite.de)

    [/autoit]

    aufrufen,

    mfg autoBert

  • Run für exe mit Leerzeichen und Parameter

    • autoBert
    • 10. Dezember 2010 um 14:41

    Leichenschänder

  • GDI Plus Input & Button

    • autoBert
    • 10. Dezember 2010 um 13:24

    bin der Meinung du solltest dich erst in die Grundlagen von GDI+ einarbeiten. Danach kannst du dir ja solche [UDF] GUICtrlPic - Update am 10.12.2010 Skripte analysieren, um hinter die Feinheiten zu kommen,

    mfg autoBert

  • onlinestatus von pokerspielern

    • autoBert
    • 10. Dezember 2010 um 13:16
    Zitat von zombie36

    auf https://autoit.de/www.pokertableratings.com gibt es ein feld das den onlinestatus eines spielers anzeigt und mich hatte interessiert wie die das machen.

    Wie die es machen ist erst einmal uninteressant, es zeigt nur dass es geht.
    Viel ineresantter ist die URL von der du die Tische auslesen willst,

    mfg autoBert

  • Kleines Script zur Boot.ini

    • autoBert
    • 10. Dezember 2010 um 12:44
    Zitat von ccain
    [autoit]


    ;...
    $filename = "c:\programme\boot.ini" ;Der Pfad und der Name der Datei
    $filename2 = "c:\boot.ini"
    ;...
    FileDelete($filename) ;Alte Datei wird geleert bzw. gelöscht

    [/autoit]

    [/autoit]


    du verwendest dem falschen Variablennamen,

    mfg autoBert

  • IE Object in einer GUI ohne Rand ?

    • autoBert
    • 10. Dezember 2010 um 12:31

    Hallo freaky,

    in deinem per PN zugesandten Skript, bekomme ich auch kein Bild zu sehen, würde mich auch wundern. Da ich an dem skript erkenne dass es auf einem Beispiel von UEZ aufbaut, solltest du noch einmal bei diesem stand anfangen und dort deine Änderungen einbauen. Den IE habe ich getetest, funktioniert auch in UEZ Skript:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GDIPlus.au3>
    #Include <WinAPI.au3>
    #include <GDIpProgress.au3>
    #include <IE.au3>

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

    Global $hGUI, $hImage, $hGraphic, $hImage
    Global Const $SC_DRAGMOVE = 0xF012
    Global $iImagePfad = @ScriptDir & "\Images\", $i
    _GDIPlus_StartUp()
    ; Load PNG image
    $hImage = _GDIPlus_ImageLoadFromFile($iImagePfad & "bg.png")
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    ; Create GUI
    $hGUI = GUICreate("Show PNG", $iWidth, $iHeight, 0,0, $WS_POPUP, $WS_EX_LAYERED + $WS_EX_TOPMOST)
    $hGUI_child = GUICreate("", $iWidth, $iHeight, 0, 0, $WS_POPUP, $WS_EX_LAYERED + $WS_EX_TOPMOST + $WS_EX_MDICHILD, $hGUI)
    GUISetBkColor(0, $hGUI_child)
    GUISetState(@SW_SHOW, $hGUI)
    GUISetState(@SW_SHOW, $hGUI_child)
    SetTransparentBitmap($hGUI, $hImage) ;diese Zeile fehlt bei dir (ist aber nicht ausschlaggebend)
    _WinAPI_SetLayeredWindowAttributes($hGUI_child, 0x00, 0xff)

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

    $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI_child)
    _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0) ;diese Zeile fehlt bei dir sehr wichtig ohne geht gar nichts

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

    $oIE = _IECreateEmbedded()
    _GUICtrlCreateIEObject ($hGUI_child,$oIE,200, 130, 195, 110,"http://google.de",1) ;hier verwendest du DEFAULT anstelle $hGUI_CHILD könnte auch ein Fehler sein
    $Progress1 = _ProgressCreate(20, $iHeight-35, $iWidth-40, 27)
    _ProgressSetColors($Progress1, 0x09B8F8, 0x09B8F8, 0xFFFFFF, 0xFFFFFF)
    _ProgressSetFont($Progress1, "Courier New", 14)

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

    GUIRegisterMsg($WM_LBUTTONDOWN, "_WM_LBUTTONDOWN")
    ;~ GUIRegisterMsg($WM_PAINT, "MY_WM_PAINT")
    AdlibRegister("_IncProgress",1000)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    ExitLoop
    EndSwitch
    WEnd

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

    ; Clean up resources
    _GDIPlus_GraphicsDispose($hGraphic)
    ;~ _GDIPlus_ImageDispose($hImage)
    _ProgressDelete($Progress1)
    _GDIPlus_ShutDown()
    Exit

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

    Func _IncProgress()
    if $i < 100 Then $i+=1
    _ProgressSet($Progress1, $i)
    EndFunc

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

    ; Draw PNG image
    Func MY_WM_PAINT($hWnd, $Msg, $wParam, $lParam)
    _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0)
    _WinAPI_RedrawWindow($hGUI, 0, 0, 1)
    Return $GUI_RUNDEFMSG
    EndFunc

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

    Func _WM_LBUTTONDOWN($hWnd, $iMsg, $wParam, $lParam)
    _SendMessage($hGUI, $WM_SYSCOMMAND, $SC_DRAGMOVE, 0)
    EndFunc ;==>_WM_LBUTTONDOWN

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

    Func SetTransparentBitmap($hGUI, $hImage, $iOpacity = 0xFF)
    Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend
    $hScrDC = _WinAPI_GetDC(0)
    $hMemDC = _WinAPI_CreateCompatibleDC($hScrDC)
    $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)
    $hOld = _WinAPI_SelectObject($hMemDC, $hBitmap)
    $tSize = DllStructCreate($tagSIZE)
    $pSize = DllStructGetPtr($tSize)
    DllStructSetData($tSize, "X", _GDIPlus_ImageGetWidth($hImage))
    DllStructSetData($tSize, "Y", _GDIPlus_ImageGetHeight($hImage))
    $tSource = DllStructCreate($tagPOINT)
    $pSource = DllStructGetPtr($tSource)
    $tBlend = DllStructCreate($tagBLENDFUNCTION)
    $pBlend = DllStructGetPtr($tBlend)
    DllStructSetData($tBlend, "Alpha", $iOpacity)
    DllStructSetData($tBlend, "Format", 1)
    _WinAPI_UpdateLayeredWindow($hGUI, $hGUI, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA)
    _WinAPI_ReleaseDC(0, $hScrDC)
    _WinAPI_SelectObject($hMemDC, $hOld)
    _WinAPI_DeleteObject($hBitmap)
    _WinAPI_DeleteDC($hMemDC)
    EndFunc ;==>SetBitmap

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

    Func _GUICtrlCreateIEObject ($iGui, $iObject,$iWidth,$iHeight,$iLeft,$iTop,$iUrl = "", $iWait = 1)
    ;$iWidth, $iHeight,$iLeft + $iTop beziehen sich auf die GUI
    $iIEGui = GUICreate("IE_" & Random(1, 100, 1), $iWidth, $iHeight,$iLeft, $iTop, BitOR($WS_CHILD, $WS_VISIBLE, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN), Default, $iGui)
    $GUIActiveX = GUICtrlCreateObj($iObject, 0, 0,$iWidth+18,$iHeight+18)
    GUICtrlSetResizing($GUIActiveX, $GUI_DOCKAUTO)
    _IENavigate($iObject, $iUrl, $iWait)
    GUISetState (@SW_SHOW,$iIEGui)
    Return SetError(0, $iIEGui, $GUIActiveX)
    EndFunc

    [/autoit]

    ich habe im obigen Skript von UEZ ein paar Kommentare hinterlassen, wenn du die beachtest solltest du dein Skriot zum laufen bekommen,

    mfg autoBert

  • Leichtgewichtiger Email-Client

    • autoBert
    • 10. Dezember 2010 um 00:14
    Zitat von MatthiasG.

    Nun habe ich folgende Idee: Vielleicht lässt sich ja eine Applikation mit AutoIt realisieren, eine IMAP.au3 ist mir im englischen Forum schon über den Weg gelaufen.

    Hast du den Link dazu, ich kann ihn nicht finden,

    mfg autoBert

  • Zahlen Kombinationen x= n!/(k!(n-k)!)

    • autoBert
    • 9. Dezember 2010 um 15:50

    Skar: es gab einmal einen Uit(-light?) zu Lottozahlen vielleicht wirst du ja dort fündig,

    stayawayknight: ! ist eine Rechenanweisung das ! gibt an das alle natürlichen,positiven Zahlen bis einschliesslich n miteinander multipliziert werden, Wenn n also 11 ist 1*2*3*4*5*6*7*8*9*10*11 = 39916800

    die Lösung bei n=11 und k=3 ist also: 1*2*3*4*5*6*7*8*9*10*11/((1*2*3)*(1*2*3*4*5*6*7*8 )) = 165

    Diese Formel wird z.B.: für Gewinnspielwarscheinlickeiten benutzt, im Beispiel von skar ist nicht anderes als Lotto 3 aus 11, deshalb mein Hinweis auf den Lotto-UIT

    Edit:

    Zitat von wikipedia [url

    http://de.wikipedia.org/wiki/Fakult%C3%A4t_%28Mathematik%29[/url]] * Ein Begriff, der in der abzählenden Kombinatorik eine ähnlich zentrale Stellung wie die Fakultät einnimmt, ist der Binomialkoeffizient

    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    Er gibt die Anzahl der Möglichkeiten an, eine k-elementige Teilmenge aus einer n-elementigen Menge auszuwählen. Hier ist das beliebteste Beispiel das Zahlenlotto 6 aus 49 mit

    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    Möglichkeiten.


    mfg autroBert

    Bilder

    • Bionomiinal1.JPG
      • 4,18 kB
      • 350 × 160
    • Bionomiinal2.JPG
      • 6,35 kB
      • 432 × 160
  • IE Object in einer GUI ohne Rand ?

    • autoBert
    • 9. Dezember 2010 um 15:12

    Hallo freaky,

    die beschrienen Änderungen habe ich schon in die Func eingearbeitet:

    [autoit]

    Func _GUICtrlCreateIEObject ($iGui, $iObject,$iWidth,$iHeight,$iLeft,$iTop,$iUrl = "", $iWait = 1)
    ;$iWidth, $iHeight,$iLeft + $iTop beziehen sich auf die GUI
    $iIEGui = GUICreate("IE_" & Random(1, 100, 1), $iWidth, $iHeight,$iLeft, $iTop, BitOR($WS_CHILD, $WS_VISIBLE, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN), Default, $iGui)
    $GUIActiveX = GUICtrlCreateObj($iObject, 0, -0,$iWidth+18,$iHeight+18)
    GUICtrlSetResizing($GUIActiveX, $GUI_DOCKAUTO)
    _IENavigate($iObject, $iUrl, $iWait)
    GUISetState (@SW_SHOW,$iIEGui)
    Return SetError(0, $iIEGui, $GUIActiveX)
    EndFunc

    [/autoit]

    das Skript aus vorherigem Post erzeugt folgende Gui:
    Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

    mfg autoBert

    Dateien

    freaky3.JPG 132,19 kB – 0 Downloads
  • IE Object in einer GUI ohne Rand ?

    • autoBert
    • 9. Dezember 2010 um 14:39

    Hallo freaky,

    wenn du es so imscreibst funktioniert es:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GDIPlus.au3>
    #include <WinAPI.au3>
    #include <IE.au3>
    #include <GDIpProgress.au3>

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

    Global $hGUI, $hImage, $hGraphic, $hImage
    Global Const $SC_DRAGMOVE = 0xF012
    Global $sImagePfad = @ScriptDir & "\", $i
    If Not FileExists($sImagePfad & "beetle3.png") Then InetGet("http://www.autoit.de/index.php?page=Attachment&attachmentID=11994&h=0f539727a8792db143f431db6e1d5b5f4b1ab20a", $sImagePfad & "beetle3.png", 1, 0)
    _GDIPlus_Startup()
    ; Load PNG image
    $hImage = _GDIPlus_ImageLoadFromFile($sImagePfad & "Beetle3.png")
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)

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

    ; Create GUI
    $hGUI = GUICreate("Show PNG", $iWidth, $iHeight, 0, 0, $WS_POPUP, $WS_EX_LAYERED)
    GUISetBkColor(0x01, $hGUI)
    GUISetState()
    _IEErrorHandlerRegister()
    _WinAPI_SetLayeredWindowAttributes($hGUI, 0x01, 0xFF, 3)

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

    $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)
    _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0)
    $oIE = _IECreateEmbedded()

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

    _GUICtrlCreateIEObject ($hGUI,$oIE,200, 130, 195, 110,"http://google.de",1)

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

    GUIRegisterMsg($WM_PAINT, "MY_WM_PAINT")
    AdlibRegister("_IncProgress", 1000)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    ExitLoop
    Case $GUI_EVENT_PRIMARYDOWN
    _SendMessage($hGUI, $WM_SYSCOMMAND, $SC_DRAGMOVE, 0)
    EndSwitch
    WEnd
    ; Clean up resources
    AdlibUnRegister("_IncProgress")
    _GDIPlus_GraphicsDispose($hGraphic)
    _GDIPlus_ImageDispose($hImage)
    ;_ProgressDelete($Progress1) ;schädlich Programm lässt sich nicht schliessen
    _GDIPlus_Shutdown()
    Exit

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

    Func _IncProgress()
    If $i < 100 Then $i += 1
    ; _ProgressSet($Progress1, $i)
    EndFunc ;==>_IncProgress

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

    ; Draw PNG image
    Func MY_WM_PAINT($hWnd, $Msg, $wParam, $lParam)
    _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0)
    _WinAPI_RedrawWindow($hGUI, 0, 0, 1)
    Return $GUI_RUNDEFMSG
    EndFunc ;==>MY_WM_PAINT

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

    Func _GUICtrlCreateIEObject ($iGui, $iObject,$iWidth,$iHeight,$iLeft,$iTop,$iUrl = "", $iWait = 1)
    ;$iWidth, $iHeight,$iLeft + $iTop beziehen sich auf die GUI
    $iIEGui = GUICreate("IE_" & Random(1, 100, 1), $iWidth, $iHeight,$iLeft, $iTop, BitOR($WS_CHILD, $WS_VISIBLE, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN), Default, $iGui)
    $GUIActiveX = GUICtrlCreateObj($iObject, 0, 0,$iWidth+18,$iHeight+18)
    GUICtrlSetResizing($GUIActiveX, $GUI_DOCKAUTO)
    _IENavigate($iObject, $iUrl, $iWait)
    GUISetState (@SW_SHOW,$iIEGui)
    Return SetError(0, $iIEGui, $GUIActiveX)
    EndFunc

    [/autoit]

    du musst beachten dass GuiCreate zuerst Breite, Höhe und danach links, oben haben möchte, bei GuiCtrlCreateObj ist es aber zuerst links, oben und danach Breite Höhe. Desweiteren ist beim Object links und oben auf 0 zu setzen und die Breite und auch die Höhe müssen um 18 grösser sein als die Höge und Breite der GUI, bei 18 kann es sein dass du andere werte benötigst, da ich derzeit in sehr starker Vergrösserung arbeite (siehe [gelöst] Darstellngsproblem in Scite),

    mfg autoBert

  • IE Object in einer GUI ohne Rand ?

    • autoBert
    • 9. Dezember 2010 um 13:38

    versuch es so:

    [autoit]

    $iIEGui = GUICreate("IE_" & Random(1, 100, 1), $iLeft, $iTop, $iWidth, $iHeight, BitOR($WS_CHILD, $WS_VISIBLE, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN), Default, $iGui)
    $GUIActiveX = GUICtrlCreateObj($iObject, -18, -18,$iWidth+36,$iHeight+36)

    [/autoit]

    Edit: Postionierung des IEs eingefügt,

    mfg azroBert

  • Daten einer Homepage in Datei kopieren

    • autoBert
    • 9. Dezember 2010 um 13:15

    Hallo Linuxfreak,

    • Inetgetsource benötigt immer eine URL, aber du kannst sie dir ja selbst ermitteln: [autoit]#include <IE.au3>
      $oIE = _IEAttach ( "Teilnehmer-Suchfeld","WindowTitle")
      $sUrl=_IEPropertyGet($oIE, "locationurl")
      $sSource =_InetGetSource($sUrl)
      MsgBox(0,"Source:",$sSource")[/autoit]Sollte klappen, hier online geschrieben /also nicht getestet)
    • du solltest die Seite angeben, damit man prüfen kann woran der Fehler liegen könnte,

    mfg autoBert

  • IE Object in einer GUI ohne Rand ?

    • autoBert
    • 9. Dezember 2010 um 12:37

    Hallo freaky,

    also bei nir klappt's (auch mit transparentem Hintergrundbild)

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <GDIPlus.au3>
    #include <WinAPI.au3>
    #include <IE.au3>
    #include <GDIpProgress.au3>

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

    Global $hGUI, $hImage, $hGraphic, $hImage
    Global Const $SC_DRAGMOVE = 0xF012
    Global $sImagePfad = @ScriptDir & "\", $i
    If Not FileExists($sImagePfad & "beetle3.png") Then InetGet("http://www.autoit.de/index.php?page=Attachment&attachmentID=11994&h=0f539727a8792db143f431db6e1d5b5f4b1ab20a", $sImagePfad & "beetle3.png", 1, 0)
    _GDIPlus_Startup()
    ; Load PNG image
    $hImage = _GDIPlus_ImageLoadFromFile($sImagePfad & "Beetle3.png")
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    ConsoleWrite($iWidth & " / " & $iHeight)

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

    ; Create GUI
    $hGUI = GUICreate("Show PNG", $iWidth, $iHeight, 0, 0, $WS_POPUP, $WS_EX_LAYERED)
    GUISetBkColor(0x01, $hGUI)
    $Progress1 = _ProgressCreate(180, $iHeight - 45, 220, 27)
    _ProgressSetColors($Progress1, 0x09B8F8, 0x09B8F8, 0xFFFFFF, 0xFFFFFF)
    _ProgressSetFont($Progress1, "Courier New", 14)
    _ProgressMarquee($Progress1)
    GUISetState()
    _IEErrorHandlerRegister()
    _WinAPI_SetLayeredWindowAttributes($hGUI, 0x01, 0xFF, 3)

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

    $hGraphic = _GDIPlus_GraphicsCreateFromHWND($hGUI)
    _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0)
    $oIE = _IECreateEmbedded()

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

    $hGuiIE = GUICreate("IE", 200, 130, 195, 110, BitOR($WS_CHILD, $WS_VISIBLE, $WS_CLIPSIBLINGS, $WS_CLIPCHILDREN), Default, $hGUI)
    $GUIActiveX = GUICtrlCreateObj($oIE, -18, -18, 236, 166)
    GUISetState(@SW_SHOW, $hGuiIE)
    _IENavigate($oIE, "http://autoit.de/index.php?page=Thread&postID=200042#post200042")

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

    GUIRegisterMsg($WM_PAINT, "MY_WM_PAINT")
    AdlibRegister("_IncProgress", 1000)

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    ExitLoop
    Case $GUI_EVENT_PRIMARYDOWN
    _SendMessage($hGUI, $WM_SYSCOMMAND, $SC_DRAGMOVE, 0)
    EndSwitch
    WEnd
    ; Clean up resources
    AdlibUnRegister("_IncProgress")
    _GDIPlus_GraphicsDispose($hGraphic)
    _GDIPlus_ImageDispose($hImage)
    ;_ProgressDelete($Progress1) ;schädlich Programm lässt sich nicht schliessen
    _GDIPlus_Shutdown()
    Exit

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

    Func _IncProgress()
    If $i < 100 Then $i += 1
    ; _ProgressSet($Progress1, $i)
    EndFunc ;==>_IncProgress

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

    ; Draw PNG image
    Func MY_WM_PAINT($hWnd, $Msg, $wParam, $lParam)
    _GDIPlus_GraphicsDrawImage($hGraphic, $hImage, 0, 0)
    _WinAPI_RedrawWindow($hGUI, 0, 0, 1)
    Return $GUI_RUNDEFMSG
    EndFunc ;==>MY_WM_PAINT

    [/autoit]

    mfg autoBert

  • Sprenger120 wird 15

    • autoBert
    • 8. Dezember 2010 um 23:59

    Herzlichen Glückwunsch zum Geburtstag viel Glück, Gesundheit fürs nächste Lebensjahr. Und natürlich, eine schöne :party:

    wünscht autoBert

  • [SciTE] Eigene Menüleiste

    • autoBert
    • 8. Dezember 2010 um 23:13

    Hallo matthias,

    Afaik = As far as i know. Ich wollte damit auch nur ausdrücken, dass es mit Scite egenen Mitteln meines Wissens nach nicht funktioniert. Zu solchen Keulen wie du vorschlägst muss man als AutoIt'ler wohl nicht greifen, wofür gibts die AnyGui-UDF?

    mfg autoBert

  • IE Object in einer GUI ohne Rand ?

    • autoBert
    • 8. Dezember 2010 um 23:06

    Den Rand vom _IECreateEmbedded bekommst du afair nicht weg. Für die Rechte-Maustaste kannst du versuchen für diese beiden Events

    [autoit]

    $GUI_EVENT_SECONDARYDOWN
    $GUI_EVENT_SECONDARYUP

    [/autoit]

    eine Dummy-Funktion in der MsgLoop-Schleife zu implementieren, das es klappt bezweifle ich aber,

    mfg autoBert

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™