Beiträge von Mario2323

  • Gibt es Control Pixelsearch und wo lieg in mein Script der Fehler?

    Hallo Leute ich habe 2 Fragen

    Gibt es als UDF eine Control Pixelsearch Function?

    Und die nächste frage.

    Wo liegt der fehler im folgendem Script? Wenn ich einen der Beiden Button anklicke bekomme ich immer als Error WEnd^ ERROR

    Spoiler anzeigen
    [autoit]

    $show = TrayCreateItem("Show")
    $hide = TrayCreateItem("Hide")
    TrayCreateItem("")
    $exit = TrayCreateItem("Exit")
    $oIE = ObjCreate("Shell.Explorer.2")
    $oIE2 = ObjCreate("Shell.Explorer.2")
    $lol = GUICreate("PaidAngel", 200, 150, 826,588, $WS_POPUP, $WS_EX_TOOLWINDOW + $WS_EX_TOPMOST)

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

    $start = GUICtrlCreateTab (5, 5, 190,140)
    GUICtrlCreateTabItem("Start")
    $1 = GUICtrlCreateButton("Hammertausch",15, 35, 100)
    $2 = GUICtrlCreateButton("Fix Besucher",15, 65, 100)
    GUISetState()
    $hammertauch = 0
    $fixbesucher = 0
    While 1
    $msg = TrayGetMsg()
    $msgg = GUIGetMsg()
    Select
    Case $msg = $show
    Guisetstate(@SW_SHOW, $lol)
    Case $msg = $hide
    Guisetstate(@sw_hide, $lol)
    Case $msg = $exit
    Exit
    Case $msgg = $GUI_EVENT_CLOSE
    Exit
    Case $msgg = $1
    If $hammertauch = 0 Then
    $tab1 = GUICtrlCreateTabItem("Hammertausch")
    GUICtrlCreateObj($oIE, 10, 30, 180, 110)
    $oIE.navigate ("http://www.hammertausch.net/frame.php?userid=3302")
    $hammertauch = 1
    ContinueCase
    EndIf
    If $hammertauch = 1 Then
    _GUICtrlTab_DeleteItem ($start, 1)
    $oIE.navigate ("about:blank")
    $hammertauch = 0
    EndIf
    Case $msgg = $2
    If $fixbesucher = 0 Then
    GUICtrlCreateTabItem("Fix Besucher")
    GUICtrlCreateObj($oIE2, 10, 30, 180, 110)
    $oIE2.navigate ("http://fixbesucher.de/view.php?user=User")
    $fixbesucher = 1
    ContinueCase
    EndIf
    If $fixbesucher = 1 Then
    _GUICtrlTab_DeleteItem ($start, 1)
    $oIE.navigate ("about:blank")
    $hammertauch = 0
    EndIf
    EndSelect
    WEnd

    [/autoit]

    Vielen dank für eure Hilfe

    Mario2323

  • GUIrand selber erstellen / designen?

    also ich habe es jetzt.

    Spoiler anzeigen
    [autoit]

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

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



    $gui = GUICreate("Background", 1, 1,-1,-1,$WS_POPUP)
    GUISetState(@SW_SHOW)

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

    $pic = GUICreate("", 600, 30, 0,0, $WS_POPUP, $WS_EX_LAYERED + $WS_EX_MDICHILD, $gui)
    WinSetTrans($pic, "", 0)
    GUICtrlCreateLabel('', 5, 5, 600, 30, -1, $GUI_WS_EX_PARENTDRAG)
    GUICtrlCreatePic("sysmenu.gif", 0, 0, 600, 30)
    GUISetState(@SW_SHOW)

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

    Do
    $msg = GUIGetMsg()

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

    Until $msg = $GUI_EVENT_CLOSE

    [/autoit]

    danke nochmal an BugFix für seine Hilfe

    Edit: ist jetzt nur die SySleiste in Rohform geht aus genaus beim eigentlichen gui und ist ausbaufähig

  • GUIrand selber erstellen / designen?

    Hallo Leutz.

    Schon etwas länger beschäftigt mich die Frage, wie man den GUIrand selber gestallten kann.

    Ich habe viel ausprobiert ($WS_POPUPWINDOW etc.) aber nie bin ich zu einer endgültigen Lösung gekommen.

    Also wende ich mich mit der Frage hier her.

    Wenn ich mit $WS_POPUP arbeite(Images,Flash Object auf der Leiste [wo Close, Minimieren, Maximieren drauf sind) und z.b. runde Kanten habe, stehen weise Zipfel des POPUP Windows über.

    Und anders kann ich mir das auch nicht vorstellen.

    >Hat jemand ein Ratschlag dazu?

    MfG

    mario2323

  • GUI2 wirklich schließen und nciht verstecken

    Spoiler anzeigen
    [autoit]

    #include <GuiConstants.au3>

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

    $1_GUI = GuiCreate("MyGUI1", 392, 316,-1, -1)
    $Label_1 = GuiCtrlCreateLabel("Bitte Vorname eingeben", 10, 60, 130, 20)
    $Button_1 = GuiCtrlCreateButton("Weiter zu Gui 2", 240, 290, 150, 20)
    $Input_1 = GuiCtrlCreateInput("Vorname", 140, 60, 150, 20)

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

    $2_GUI = GuiCreate("MyGUI2", 392, 316,-1, -1)
    $Label_2 = GuiCtrlCreateLabel("Bitte Nachname eingeben", 10, 60, 130, 20)
    $Input_2 = GuiCtrlCreateInput("Nachname", 140, 60, 150, 20)
    $exit = GuiCtrlCreateButton("GUI 2 schließen und zurück zu GUI 1", 40, 290, 250, 20)

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

    GUISetState(@SW_SHOW, $1_GUI)

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

    While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
    ExitLoop

    Case $msg = $Button_1
    GUISetState(@SW_HIDE, $1_GUI)
    GUISetState(@SW_SHOW, $2_GUI)

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

    Case $msg = $exit
    GUISetState(@SW_SHOW, $1_GUI) ; GUI-1 soll eingeblendet werden "zurück zu GUI1"
    GUIDelete($2_GUI); GUI2 soll wirklich geschlossen werden und nicht versteckt (HIDE) werden.

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

    EndSelect
    WEnd
    Exit

    [/autoit]

  • w0uter Schutz selber benutzen. Wie funktiniert das?

    Hallo Leuts.

    Ich habe vor einigen Tagen im englischen Forum ein Decomiled-Schutz gesehen.

    (Link )

    Ich habe jetzt einige Tage gelesen und auch aus probiert, aber ich blicke da nicht durch. Was ich verstanden habe ist, dass man in der Hex-ansicht (Hex-Editor) Bytes so verändern kann, dass jeder Decomilierer den Script überspringt und als Ausgabe in die *.au3 Datei eine beliebige Ausgabe schreibt.

    Im englischen Forum wird "Hacker. Nice try, but Wrong :)" ausgegeben.(für die die nicht Englisch können: Hacker. Guter versuch, hast aber nichts davon)

    Außerdem gibt es da ein/eine GUI die dies eigentlich machen sollte, aber wenn man die benutzt passiert nichts.
    Die geschützte Datei kann man immer noch dann nach dem decomilieren Lesen, obwohl die Ausgabe/der Script Inhalt
    "Hacker. Nice try, but Wrong :)" lauten sollte.

    Hat den jemand schon Erfahrung damit? Und benutzt jemand den Schutz?

    Wie genau funktioniert dies?

    Wäre dankbar über Hilfe.

    Mario2323