Seite 1 von 1
[gelöst] Gedrückte Maustaste erkennen
Verfasst: Mi, 01.07.2015 16:15
von Krangel
Hi,
ich brauche ein Code, der bei gedrückter Maustaste ausgeführt wird.
Es gibt das Maus-Ereignis "Mouse button pressed", finde aber keine Erklärung wir das angewandt wird. Aufgerufen wird das Makro über eine Schaltfläche und soll den Code bis zum Loslassen ausführen.
Code: Alles auswählen
Sub Mouse_left_down
Do
REM Mein Makro ausführen
Loop while <> ?Mouse button pressed?
End Sub
Grüße
Re: Gedrückte Maustaste erkennen
Verfasst: Mi, 01.07.2015 16:29
von komma4
Was ist Dein Anwendungsfall? Was willst Du erreichen?
Das Ereignis (wo: bei einem Formular?) wird nur einmal ausgelöst...
Und: während ein Makro läuft kann keine andere Aktion durchgeführt werden.
Re: Gedrückte Maustaste erkennen
Verfasst: Mi, 01.07.2015 16:32
von Stephan
z.B. ein Zweites Makro und eine öffentliche Variable, und das zweite Makro dem Ereignis "Maustaste loslassen" zuordnen:
Code: Alles auswählen
Dim halt As Boolean
Sub Mouse_left_down
halt = 0
Do
REM Mein Makro ausführen
Loop while halt = True
End Sub
Sub Anhalten()
halt = 1
End Sub
Gruß
Stephan
Re: Gedrückte Maustaste erkennen
Verfasst: Mi, 01.07.2015 17:00
von Krangel
Hi,
genauso! Einfacher als ich dachte.
Merkwürdig ist nur, dass bei mir until und while in der Funktion vertauscht ist.
Danke und Grüße an den Meister
Re: Gedrückte Maustaste erkennen
Verfasst: Mi, 01.07.2015 17:13
von Stephan
Danke und Grüße an den Meister
als "Der Meister" wird, im Zusammenhang mit StarBasic-Programmierung i.A. Andrew Pitonyak bezeichnet:
Webseite:
http://www.pitonyak.org/
Bild:
http://www.hentzenwerke.com/images/au_p ... andrew.jpg
Gruß
Stephan
