Nerd Problem

Rodny_le_lude

Hi Community

ich hab da ein kleines Problem undzwar.

ich hab ein Programm geschrieben (das ausschliesslich im Tray agiert) das ich nun mit Hotkeys belegen will.
Das Problem ist das ich es nicht im onevent mode geschrieben habe und somit nachträglich anscheinend nich mit Hotkeys belegen kann ich hab
schon sachen wie _ispressed benutzt das funktioniert auch soweit nur das ich dan den befehl nicht mehr über den button bekomme

hier mal ein b.s.p

[autoit]

while 1
$tmsg=Traygetmsg()

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

select

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

Case $tmsg = $btn Or _IsPressed("11")=1 And _IsPressed("30")=1
msgbox(0,"","Hallo")

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

endselect
wend

[/autoit]

Calypso

[autoit]

while 1
$tmsg=Traygetmsg()

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

select

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

Case $tmsg = $btn Or BitAnd( _IsPressed("11") ,_IsPressed("30"))
msgbox(0,"","Hallo")

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

endselect
wend

[/autoit]

so ?

Ubuntu

Spontan würd Ich sagen:

[autoit]

...
If _isPressed(11) Then msg()
If _isPressed(30) Then msg()

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

Case $tmsg = $btn
msg()

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

Func msg()
msgbox(0,"","Hallo")
...

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

mfg
Ubuntu

Edit: Calypso war schneller

Calypso

Zitat von Ubuntu

Spontan würd Ich sagen:
[autoit]

...
If _isPressed(11) Then msg()
If _isPressed(30) Then msg()
[/autoit] [autoit][/autoit] [autoit]
Case $tmsg = $btn
msg()
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Func msg()
msgbox(0,"","Hallo")
...
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit]
mfg
Ubuntu

Alles anzeigen

nö Da er schrieb _IsPressed(..) AND _IsPressed(..)

Allerdings kann mans auch mit ner If-Abfrage machen

Also

[autoit]

While 1
Sleep(50)
If _IsPressed(11) And _IsPressed(30) Then
msg()
EndIf
If $tmsg = $btn Then
msg()
EndIf
WEnd

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

Func msg()
MsgBox(64,"Info","Hi!")
EndFunc

[/autoit]

SEuBo

Völlig wurst ob OnEvent Mode oder nicht! Hotkeys müssen funktionieren.
Außerdem weiß ich garnicht so wirklich, ob man in einem Select /Case auch AND und OR bentuzen kann

Rodny_le_lude

@Calypso syntax error
ja ne if abfrage is ja ganz gut und schön nur das mein script schon sehr gross ist und ich einfach kein bock habe es umzumodeln

SEuBo
ich hab leider ned alles in functions aufgeteielt aber HOTKEYSET funktioniert leider nur so bsp

HotKeySet("{PAUSE}","TogglePause")

Func TogglePause()
$Paused=NOT$Paused
While$Paused
sleep(100)
ToolTip('Script is "Paused"',0,0)
WEnd
ToolTip("")
EndFunc

Ubuntu

@Calypso
Oh ja :pinch:
Man sollte also doch keine "schnell Antworten" geben.
sry hab ich einfach überlesen

mfg
Ubuntu

Calypso

Zitat von SEuBo

Außerdem weiß ich garnicht so wirklich, ob man in einem Select /Case auch AND und OR bentuzen kann

Eben nicht !
Allerdings sind diese Case-Abfragen Wahrheitswerte (1 und 0 )
Deswegen kann man mit BitOr, BitAnd usw.. Abfragen

Ist übringes Stoff in Informatik 9. Klasse Gymnasium

SEuBo

Zitat von Calypso

Ist übringes Stoff in Informatik 9. Klasse Gymnasium

Du glücklicher! Bei uns hieß es damals in der 9ten Klasse aufm Gymi
"Word, Excel, Powerpoint". Daran sind dann auch 90% des Kurses gescheitert. 10te Klasse wäre Java gewesen, aber das durfte ich dann nicht mehr miterleben

**Raupi**

Zitat von Calypso

Eben nicht !
Allerdings sind diese Case-Abfragen Wahrheitswerte (1 und 0 )
Deswegen kann man mit BitOr, BitAnd usw.. Abfragen

Ist übringes Stoff in Informatik 9. Klasse Gymnasium

Wer sag sowas?

[autoit]

Case $tmsg = $btn Or (_IsPressed("11")=1 And _IsPressed("30")=1)

[/autoit]

Rodny_le_lude

Big Thx Raupi

Hätt ich auch selbst drauf kommen können , nur manchmal steh auf dem schlauch bei den leichtesten Sachen