STRG kombiniert mit Maustaste

  • Hallo liebe Community,

    habe eine Frage und zwar wie ist es möglich die Maustaste mit STRG zu kombinieren, habe folgendes vor:

    Ich möchte etwas ausführen lassen sobald STRG gehalten wird und dann irgendwo hingeklickt wird.
    also die Koordinaten der Maus will ich ausgeben lassen, das weis ich auch wie das geht
    nur weis ich eben nicht wie ich es mache STRG und Maustaste Links zu kombinieren ?

    Danke um jede Hilfe

    Mfg. Ich

  • [autoit]

    if _IsPressed(11) and _IsPressed(01) Then ...

    [/autoit]

    mfg Tim :)

    [autoit]


    While $Life = True
    $nMSG = BrainGetMsg()
    Switch $nMSG
    Case $Idea
    _Convert_Idea2Code()
    EndSwitch
    WEnd

    [/autoit]
  • mhm dann hätte ich gleich noch was (tut mir leid)

    Wenn ich das Script auf Syntas prüfe dann kommt folgender Fehler:

    Fehler:
    ERROR: _FileCountLines(): undefined function.


    Zeile:

    [autoit]

    $count = _FileCountLines("text.txt")

    [/autoit]
  • Okay tut mir leid, aber die frage muss sein ... :(
    also
    das funktioniert jetz alles gut ;)
    aber die Maus fängt es ziemlich oft ab wenn man draufbleibt ... kann man das machen das man sobald man einmal geklickt hat nur EInma abfragt ? egal wie lange man draufbleibt ???

  • aber wäre es nich einfacher mal dein ganzes script zu posten

    ps ich hab sowas schonmal gemacht aber n bissel anders

    Spoiler anzeigen
    [autoit]


    #include <Misc.au3>

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

    While Not _ispressed(01)
    $Mouse = MouseGetPos()
    TrayTip("Aktuelle Koordinaten sind:","X: " & $Mouse[0] & @CRLF & "Y: " & $Mouse[1],1)
    Sleep(100)
    WEnd

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

    MsgBox(32,"Koordinaten sind:","X: " & $Mouse[0] & @CRLF & "Y: " & $Mouse[1])

    [/autoit]
  • ps wenn du die farbe des pixels auch noch willst dann nimm das

    Spoiler anzeigen
    [autoit]


    #include <Misc.au3>

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

    While Not _ispressed(01)
    $Mouse = MouseGetPos()
    $Color = PixelGetColor($Mouse[0],$Mouse[1])
    TrayTip("Aktuelle Koordinaten sind:","X: " & $Mouse[0] & @CRLF & "Y: " & $Mouse[1] & @CRLF & "Farbe: Hex: #" & Hex($Color,6) & " Decimal: " & $Color,1)
    Sleep(100)
    WEnd

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

    MsgBox(32,"Koordinaten sind:","X: " & $Mouse[0] & @CRLF & "Y: " & $Mouse[1] & @CRLF & "Farbe: Hex: #" & Hex($Color,6) & " Decimal: " & $Color)

    [/autoit]
  • [autoit]

    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Compression=4
    #AutoIt3Wrapper_Res_Language=1031
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include<Misc.au3>
    #include<file.au3>

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

    HotKeySet("!e", "_Pause")
    $pause = False
    $pos = 0
    $dll = DllOpen("user32.dll")

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

    $sFilePath = FileOpen(@ScriptDir & '\coords.txt', 0)
    while sleep(75)
    if _IsPressed(11, $dll) And _IsPressed(01, $dll) Then
    $pos = MouseGetPos()
    $count = _FileCountLines($sFilePath) + 1
    _FileWriteToLine("coords.txt", $count, $pos[0] & "|" & $pos[1] & " | Text")
    EndIf
    WEnd

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

    Func _Pause()
    $pause= Not $pause
    If Not $pause then Return
    Do
    Sleep(100)
    Until not $pause
    EndFunc

    [/autoit]

    Hier der Code

  • eine frage warum machst du nicht einfach filewriteline das amchts automatisch ans ende

    Spoiler anzeigen
    [autoit]


    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_Compression=4
    #AutoIt3Wrapper_Res_Language=1031
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
    #include<Misc.au3>
    #include<file.au3>

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

    HotKeySet("!e", "_Pause")
    $pause = False

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

    while sleep(75)
    if _IsPressed(11) And _IsPressed(01) Then
    $pos = MouseGetPos()
    FileWriteLine("coords.txt", $count, $pos[0] & "|" & $pos[1] & " | Text")
    EndIf
    WEnd

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

    Func _Pause()
    $pause= Not $pause
    If Not $pause then Return
    Do
    Sleep(100)
    Until not $pause
    EndFunc

    [/autoit]
  • Hallo,

    Das sollte deinen Bedürfnissen entsprechen...

    Spoiler anzeigen
    [autoit]

    #include <Misc.au3>

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

    HotKeySet("{ESC}","_Exit")
    Global Static $STRun=False

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

    While 1
    If _IsPressed(11) And _IsPressed(01) And $STRun=False Then
    $aCord = MouseGetPos()
    TrayTip("Position","X: "&$aCord[0]&" "&"Y: "&$aCord[1],20)
    $STRun=True
    EndIf
    Sleep(20)
    WEnd

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

    Func _Exit()
    Exit
    EndFunc

    [/autoit]


    Lg, Fabian

  • Vielen Dank Alexander,
    und Fabian danke auch aber das wollte ich nicht direkt
    jetzt kann man solange das Skript offen ist nur 1 mal klicken...
    man sollte aber unendlich oft klicken können, aber eben wenn man draufbleibt soll er nicht ewig oft in die datei schreiben
    sondern einmal ;)