hyperlink

    Vielleicht hat er die Dateien "GuiHyperLink.au3" und "Events.au3" auch nicht dort hinkopiert wo sie sein sollen? Die müssen ja nicht irgendwo liegen, sondern dort wo auch beim compalieren ein Pfad drauf gesetzt ist.

    Gruss, Lina.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    OuBVU5ebLhHu5QvlnAyQB4A7SzBrvWulwL7RLl2BdH5tI6sIYspeMKeXMSXl

    • Offizieller Beitrag

    Hi,

    ich habe mal einen Link eingefügt:

    Spoiler anzeigen
    [autoit]

    Opt("WinTitleMatchMode", 4)
    #include <GuiConstants.au3>
    #include <GuiHyperLink.au3>

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

    $GUI = GUICreate("SroToolBox", 750, 600)
    GUISetBkColor(0x00E0FFFF)

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

    Opt("TrayMenuMode", 1)
    $info = TrayCreateItem("Über")
    $hilfe = TrayCreateItem("Hilfe")
    TrayCreateItem("")
    $exit = TrayCreateItem("Exit")
    TraySetState()

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

    ;GUICtrlSetState(-1, $GUI_ACCEPTFILES)
    GUISetState()

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

    GUICtrlCreateLabel("?:", 560, 30)
    $bild = GUICtrlCreateButton(" Bild ", 560, 50)
    $map = GUICtrlCreateButton("Skarte", 620, 50)
    GUICtrlCreateLabel(":", 560, 100)
    $bild = GUICtrlCreateButton(" Bild ", 560, 120)
    $map = GUICtrlCreateButton("karte", 620, 120)
    GUICtrlCreateLabel(":", 560, 170)
    $bild = GUICtrlCreateButton(" Bild ", 560, 190)
    $map = GUICtrlCreateButton("karte", 620, 190)
    GUICtrlCreateLabel(":", 560, 240)
    $bild = GUICtrlCreateButton(" Bild ", 560, 260)
    $map = GUICtrlCreateButton("karte", 620, 260)
    GUICtrlCreateLabel(":", 560, 310)
    $bild = GUICtrlCreateButton(" Bild ", 560, 330)
    $map = GUICtrlCreateButton("karte", 620, 330)

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

    GUICtrlCreateLabel("", 540, 335)
    GUICtrlCreateLabel("", 540, 360)

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

    $GroupBox1 = GUICtrlCreateGroup("Info", 8, 8, 689, 505, -1, $WS_EX_TRANSPARENT)
    GUICtrlSetBkColor(-1, 0x00E0FFFF)
    $Label2 = GUICtrlCreateLabel("Version : /", 32, 32, 75, 17, $WS_GROUP)
    GUICtrlSetBkColor(-1, 0x00E0FFFF)
    $Label1 = GUICtrlCreateLabel("Http://www.autoit.de", 512, 486, 172, 17)
    GUICtrlSetBkColor(-1, 0x00E0FFFF)
    ReDim $hl_hwnd[2]
    $hl_hwnd[1] = _GuiCtrlHyperLinkCreate ($GUI, _
    'For Question/Suggestions e-mail: UDF Maniac of the AutoIt Forum', _
    "mailto:custompcs@charter.net", "UDF Maniac", _
    10, 360, 480, 20, -1, -1, "Arial", 14)

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

    $Group1 = GUICtrlCreateGroup("Game Start", 32, 54, 129, 65)
    GUICtrlSetBkColor(-1, 0x00E0FFFF)
    $Button1 = GUICtrlCreateButton("Start", 48, 78, 89, 25, 0)
    GUICtrlSetTip(-1, "C:/Programme/test ordner/test game.exe")

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

    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUICtrlCreateGroup("", -99, -99, 1, 1)

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

    Local $Links[2] = ["http://www.Autoitscript.com/forum", "mailto:custompcs@charter.net"]
    Local $Link_On[2] = ["AutoIt Script home page", "UDF Maniac"]
    GUISetState(@SW_SHOW)
    GUIRegisterMsg($WM_NOTIFY, "WM_Notify_Events")

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

    GUISetState()
    While 1
    $nMsg = GUIGetMsg()
    $msg1 = TrayGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Button1
    ShellExecute("C:/Programme/test ordner/test game.exe")
    Case $bild
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Test Bild.gif", 200, 200, Default, Default, 1)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    Case $map
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Test Bild.jpg", 331, 266, Default, Default, 16)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    Case $bild
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Test Bild.gif", 200, 200, Default, Default, 1)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    Case $map
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Test Bild.jpg", 317, 278, Default, Default, 16)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    Case $bild
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Test Bild.gif", 200, 200, Default, Default, 1)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    Case $map
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Test Bild.jpg", 300, 326, Default, Default, 16)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    Case $bild
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Lord Bild.jpg", 200, 200, Default, Default, 1)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    Case $map
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Test Bild.jpg", 499, 328, Default, Default, 16)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    Case $bild
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Test Bild.jpg", 499, 328, Default, Default, 16)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    Case $map
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Test Bild.jpg", 499, 328, Default, Default, 16)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")
    EndSwitch
    Select
    Case $msg1 = 0
    ContinueLoop
    Case $msg1 = $info
    MsgBox(64, "Info:", "^^" & @LF & "" & @LF & "Version: 0.1" & @LF & "" & @LF & "© 2007 by geheim", 10)
    Case $msg1 = $hilfe
    MsgBox(64, "Info:", "Mit ESC wird das Skript beendet." & @LF & "" & @LF & "Wenn ein Bild aufgerufen wurde, kann dies mit ESC beendet werden.", 20)
    EndSelect
    WEnd

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

    Func _esc()
    $SplashOff = True
    EndFunc ;==>_esc

    [/autoit]

    So long,

    Mega

    ich hab die beiden .au3 scripte im include ordner liegen

    <a id="post26794" name="post26794">[/url]Xenobiologist

    ich hab mal den script den wo den link eingebaut hast ausprobiert aber funtzt net

    das kan doch net sein

    das mus man doch i-wie zum laufen bekommen

    Einmal editiert, zuletzt von Darki (3. September 2007 um 18:18)

    So, ich habe jetzt mal den Beitrag durchgelesen und folgender Script arbeitet einwandfrei:

    Spoiler anzeigen
    [autoit]

    Opt("WinTitleMatchMode", 4)
    #include "GuiHyperLink.au3" ; vom engl. Forum in Ordner Include kopieren
    #include "Events.au3" ; vom engl. Forum in Ordner Include kopieren
    #include <GUIConstants.au3>
    Local $hl_ctrl[1]
    Local $Links[1] = ["http://www.rsh.de"] ; Array mit der oder den URL
    Local $Link_On[1] = [" Klick mich "] ; Array mit Anzeigetext für Link

    $GUI = GUICreate("Moin-Moin", 180, 250, -1, -1)

    $hl_ctrl[0] = _GuiCtrlHyperLinkCreate ($GUI, _
    'Willkommen, hier ist' & @LF & 'die Seite von:' & @LF & @LF &'Max Mustermann' & @LF & 'Musterstraße 1' & @LF & '12345 Musterort' & @LF & @LF & ' Klick mich ', _
    $Links[0], $Link_On[0], _
    5, 20, 300, 180,-1, -1, "Courier New", 12)

    GUISetState(@SW_SHOW)
    GUIRegisterMsg($WM_NOTIFY, "WM_Notify_Events")
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]

    Wenn der nicht bei Dir geht, dann einfach alles laaaaaangsam Schritt für Schritt noch einmal durcharbeiten.

    Aufgefallen ist mir zum Beispiel, das bei dem beispielscript das " klick mich " beide male gleich sein muß, sonst gibt es Fehler beim compalieren.

    Gruss, die Lina.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    OuBVU5ebLhHu5QvlnAyQB4A7SzBrvWulwL7RLl2BdH5tI6sIYspeMKeXMSXl

    dein script funtzt einwandfrei blow wie bekome ich diese struktur von link aufbau in mein script das es weiterhin funtzt

    • Offizieller Beitrag

    Du mußt in deinem Skript die Variablen deklarieren:

    [autoit]

    Local $hl_ctrl[1]
    Local $Links[1] = ["http://www.rsh.de"] ; Array mit der oder den URL
    Local $Link_On[1] = [" Klick mich "] ; Array mit Anzeigetext für Link

    [/autoit]


    Diese Variablennamen darfst du NICHT ändern.

    Da drunter erzeugst du deine GUI mit

    [autoit]

    $GUI = GUICreate(.....)
    ;

    [/autoit]

    Im Definitionsbereich der GUI deklarierst du den Hyperlink

    [autoit]

    $hl_ctrl[0] = _GuiCtrlHyperLinkCreate ($GUI, _
    'Willkommen, hier ist' & @LF & 'die Seite von:' & @LF & @LF &'Max Mustermann' & @LF & 'Musterstraße 1' & @LF & '12345 Musterort' & @LF & @LF & ' Klick mich ', _
    $Links[0], $Link_On[0], _
    5, 20, 300, 180,-1, -1, "Courier New", 12)

    [/autoit]

    Dann folgt

    [autoit]

    GUISetState(@SW_SHOW)

    [/autoit]


    und danach WICHTIG

    [autoit]

    GUIRegisterMsg($WM_NOTIFY, "WM_Notify_Events")

    [/autoit]


    Anschließend folgt die While-Schleife mit deinem restlichen Code.

    okay habs so halb wegs hin bekommen nur noch eine frage zur farbe meine standart farbe ist GUISetBkColor(0x00E0FFFF)

    aber wen ich so schaue ist unten recht im feld wo der link jetzt ist ein graues feld mit dem link kan man das graue feld auch zu dieser farbe machen (0x00E0FFFF)

    habs versucht überall mal hin gesetzt aber der graue aste mit dem link ist imma noch da ich bekomme das grau nciht in die farbe geändert

    [autoit]

    GUISetBkColor(0x00E0FFFF)

    [/autoit]


    das ist der code mit den grauen kasten und dem link

    Spoiler anzeigen
    [autoit]

    Opt("WinTitleMatchMode", 4)
    #include "GuiHyperLink.au3"
    #include "Events.au3"
    #include <GUIConstants.au3>
    Local $hl_ctrl[1]
    Local $Links[1] = ["http://www.autoit.de/jgs_portal.php?sid="] ; Array mit der oder den URL
    Local $Link_On[1] = ["DIE deutsche AutoIt Community"] ; Array mit Anzeigetext für Link

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

    $GUI = GUICreate("Hyperlink Test", 400, 250, -1, -1)
    GUISetBkColor(0x00E0FFFF)

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

    $hl_ctrl[0] = _GuiCtrlHyperLinkCreate ($GUI, _
    'Willkommen, hier ist' & @LF & 'DIE deutsche AutoIt Community', _
    $Links[0], $Link_On[0], _
    20, 20, 360, 40,-1, -1, "Courier New", 12)
    GUISetBkColor(0x00E0FFFF)

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

    GUISetState(@SW_SHOW)
    GUIRegisterMsg($WM_NOTIFY, "WM_Notify_Events";)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]

    Vielleicht mal den Code kommplett zeigen?
    Dann kann man besser helfen.

    Gruss, Lina.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    OuBVU5ebLhHu5QvlnAyQB4A7SzBrvWulwL7RLl2BdH5tI6sIYspeMKeXMSXl

    hab noch ne frage ^^ sry
    aber ich brauch hilfe ebend
    Wenn ich ein Buton erstellt habe möchte ich das , wenn man drauf klickt ein Programm gestartet wird aber das liegt in einem Ordner der verschieden liegt mal aufen desktop oder C: D: oder so ähnlich hab mal ein teil meines codes hier

    [autoit]

    Case $Girlbild
    HotKeySet("{ESC}", "_esc")
    SplashImageOn("", @ScriptDir & "\Bilder\Girl Bild.gif", 200, 200, Default, Default, 1)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}")

    [/autoit]

    so damit werden die bilder aus dem ordner wo die drine liegen geöffnet aber wie ist es mit Programmen wie werden die aus einem ordner abgelesen " SplashImageOn " glaub ich nicht das man das benutzen mus könte mia iner auch bei dem Problem helfen und bei dem mit dem Link

    Darfst Du nicht sagen ?
    Was ist da so geheimnisvoll?
    Macht Du etwa ein Roboter der nicht legal ist?

    Gruss, Lina.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    OuBVU5ebLhHu5QvlnAyQB4A7SzBrvWulwL7RLl2BdH5tI6sIYspeMKeXMSXl

    ^^ Schön wärs
    NE kan sowas nicht ... was brauchst du alles für Information das du mia helfen kanst

    Also ich habs so jetzt :


    Spoiler anzeigen
    [autoit]

    While 1

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

    GuiCtrlCreateLabel("Geheim:", 560, 310)
    $bild = GUICtrlCreateButton(" Bild ", 560, 330)
    $map = GUICtrlCreateButton("karte", 620, 330)
    ........
    ........
    ........ Geheim sry ^^
    ........
    ........
    $Msg = GUIGetMsg()
    $msg1 = TrayGetMsg()
    Switch $Msg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $map
    HotKeySet("{ESC}", "_esc";)
    SplashImageOn("", @ScriptDir & "\Bilder\Bild1.jpg", 268, 266, Default, Default, 16)
    $SplashOff = False
    While 1
    If $SplashOff Then ExitLoop
    Sleep(500)
    WEnd
    SplashOff()
    HotKeySet("{ESC}";)

    [/autoit]

    so kapiert keiner ich weiß aber ich wolte fragen wen man auf den button klickt öffnet sich dan das bild was ich in meinem ordner liegen habe da auch wo das script liegt
    so.
    und nun die frage ich wolte das i-wie hin bekommen das ich cniht ein bild z.b auf dem ordner öffne nein ich möchte das ein program gestartet wird ! Sagen wir mal das heißt: Geheim.exe

    [autoit]


    SplashImageOn("", @ScriptDir & "\Bilder\Bild1.jpg", 268, 266, Default, Default, 16)

    [/autoit]

    das kan man ja nicht für ein Program verwenden das gestartet werden soll

    nun 2 te frage :

    Hab das mit dem link hin bekomen aber das mit dem grau stört :


    Spoiler anzeigen
    [autoit]

    Opt("WinTitleMatchMode", 4)
    #include "GuiHyperLink.au3"
    #include "Events.au3"
    #include <GUIConstants.au3>
    Local $hl_ctrl[1]
    Local $Links[1] = ["http://www.autoit.de/jgs_portal.php?sid="] ; Array mit der oder den URL
    Local $Link_On[1] = ["DIE deutsche AutoIt Community"] ; Array mit Anzeigetext für Link

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

    $GUI = GUICreate("Hyperlink Test", 400, 250, -1, -1)
    GUISetBkColor(0x00E0FFFF)

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

    $hl_ctrl[0] = _GuiCtrlHyperLinkCreate ($GUI, _
    'Willkommen, hier ist' & @LF & 'DIE deutsche AutoIt Community', _
    $Links[0], $Link_On[0], _
    20, 20, 360, 40,-1, -1, "Courier New", 12)
    GUISetBkColor(0x00E0FFFF)

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

    GUISetState(@SW_SHOW)
    GUIRegisterMsg($WM_NOTIFY, "WM_Notify_Events";)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]

    das mal in kopieren und selbst ausprobieren dann sieht ihr was ich meine
    ich hoffe man versteht das #

    wen nicht dan bitte sagen was ihr noch wisen wolt um mia vlt helfen zu können

    Hallo Darki.

    Bei Deiner letzten Anfrage im zweiten Spoiler, Zeil 19 ist ein Fehler. So kann das ganze GAR NICHT bei Dir gelaufen sein ;)
    Die Abschlußklammer (schließende Klammer muß vor dem ";", wobei dieses eh überflüssing ist. Vielleicht war da ja mal eine Erklärung, die Du uns aber nicht vorenthalten solltest, falls diese nämlich wichtig ist für das menschliche Verständnis.

    Das ganze Geheim? Ich kann darüber nur lächeln. Sorry, aber ich bin so. Wenn etwas wirklich "geheim" wäre, dann würde man es nicht als "geheim" deklarieren, sondern durch gleiche, aber unbrauchbar gemachte Dateinamen bzw. Dateipfade abgleichen.
    Man muß nicht alles preis geben, um hier hilfe zu beklommen, aber es sollte doch so gargestellt werden, das die es verstehen, die Dir helfen möchten.

    In diesem Sinne, denk drüber nach und hier hilft jeder, der es irgendwie kann.

    Gruss, Lina.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    OuBVU5ebLhHu5QvlnAyQB4A7SzBrvWulwL7RLl2BdH5tI6sIYspeMKeXMSXl