| |
|
|
 | One Click on The Startleiste. Gehts everywhere? CompileMarkSeparationDEF @mouse_event(5)!"User32","mouse_event"
Windowstyle 31
Windowtitle "Mausklick erzeugen"
Window 0,0-640,400
Declare Mausklick&,Y&,x&
Print "Irgendeine Taste drücken..."
While 0=0
waitkey
LET Y&=-(%MAXY+20)
LEt X&=%MAXX-5
@mouse_event(1+$8000,x&,Y&,0,0) Maus bewegen
@mouse_event(2,0,0,0,0) Maus drücken
@mouse_event(4,0,0,0,0) Maus loslassen
wend
|
|
|
| |
|
|