shortcut mir strg und rechte maustaste halten Topic is solved

[tiroler16]

hallo Leute!

Ich benötige eure hilfe.

Ich möchte in FreeCad 0.21.2 die verschieben Funktion STRG + Rechte Maustaste als shortcut auf den XButton1 legen.
Dabei muss der shortcut aber solange gedrückt bleiben solange ich die xbutton1 Taste drücke.

Jetzt habe ich schon viel versucht aber bin auf keinen grünen Zweig gekommen.

1 versuch:

Code: Select all

XButton1::
Send, {Ctrl down}{RButton down}
KeyWait, XButton1
Send, {Ctrl up}{RButton up}
return

2. Versuch:

Code: Select all

SetTimer, CheckButton1, 10
return

XButton1:: ; XButton1 als Hotkey festlegen
if GetKeyState("XButton1", "P")
{
Send, {Ctrl down}{RButton down}
}
else
{
Send, {Ctrl up}{RButton up}
}
return

CheckButton1:
return

3. Versuch:

Code: Select all

SetTimer, CheckButton1, 10
return

XButton1:: ; XButton1 als Hotkey festlegen
if GetKeyState("XButton1", "P")
{
Send, {Ctrl down}{RButton down}
}
else
{
Send, {Ctrl up}{RButton up}
}
return

CheckButton1:
return

4. Versuch.

Code: Select all

XButton1::
Send, {Ctrl down}{RButton down}
KeyWait, XButton1, up
Send, {Ctrl up}{RButton up}
return

hat einer eine Idee was ich falsch mache. Teilweise funktioniert der Code für eine millisekunde

über Ideen eurerseits würde ich mich freuen

MFG
Stefan

[gero]

Hallo Stefan
Funktioniert denn das hier wenigstens zuverlässig in deiner Anwendung ? :

Code: Select all

XButton1::MsgBox,4096,Info,XButton1 gedrückt,1

gruss
gero

[tiroler16]

ja das funktioniert

wenn ich

Code: Select all

XButton1::
Send, {Ctrl down}{RButton down}

eingebe funktioniert es, es rastet ein und ich kann endloch verschieben. allerdings kann ich es nicht mehr beenden.
ich glaube dass er

Code: Select all

KeyWait, xbutton1
 Send, {Ctrl up}{RButton up}

nicht versteht weil ja immer noch die ctrl taste gedrückt ist. somit kann ich den xbutton1 nicht erkennen und nicht mehr abbrechen.

[LuckyJoe]

Hi,
ich hoffe, es ist nicht zu "off-topic": ich verwende parallel zu AHK auch das freie Tool X-Mouse Button Control, mit dem man sehr viele Maus-Tasten Einstellungen ändern und anpassen kann. Vielleicht lohnt ein Blick:
https://www.highrez.co.uk/downloads/XMouseButtonControl.htm

[tiroler16]

nach dem ich den Fehler erkannt habe löse ich es jetzt so, dass ich mit dem xbutton den down starte und mit Lbutton wieder beende.
wollte es mit keywait, xbutton beenden aber das funktioniert, das erkennt er nicht. Ich glaube, weil der xbutton als shortcut verwendet wird und somit nicht nach den :: stehen darf.

Code: Select all

XButton1::
    Send, {Ctrl down}{RButton down}
    KeyWait, Ctrl, t1
    KeyWait, RButton, t1
    KeyWait, LButton, d
    
    Send, {Ctrl up}{RButton up}

Return
   
XButton2::
    Send, {ShiftDown}{RButton down}
    KeyWait, Shift, t1
    KeyWait, RButton, t1
    KeyWait, LButton, d
    
    Send, {ShiftUp}{RButton up}
Return

vielleicht habt ihr noch eine bessere Lösung
MFG
Stefan

[just me]

Moin,

es gibt in der deutschen Hilfe unter Hotkey-Modifikatorsymbole unter UP ein Beipiel, das vielleicht für Dich passend gemacht werden kann:

Code: Select all

#NoEnv
XButton1Down := False
; ...
; ...
; ...
XButton1::
    XButton1Down := True
    Send, {Ctrl down}{RButton down}
Return
#If XButton1Down
*XButton1 Up::
    XButton1Down := False
    Send, {Ctrl up}{RButton up}
Return
#If

Ich kann es nicht testen, weil ich meine Maus keinen XButton hat.

[tiroler16]

oh Danke vielmals das ist genau das was ich gesucht habe.

Danke für eure bemühungen
MFG
Stefan