Français
Online-Documentation

Souris API: souris, clavier

 

Michael
Wodrich
qui API mouse_event erzeugt une Mausklick ou bien une Mausbewegung.

P:L1: Flag pour, quelle Aktion fonctionnement volonté soll et comment qui Koordinaten trop interpretieren sommes =>
$8000 = qui angegebenen Mauskoordinaten sommes absolute Koordinaten.
1 = souris wurde bewegt
2 = linker Mausbutton gedrückt
4 = linker Mausbutton losgelassen
8 = rechter Mausbutton gedrückt
$10 = rechter Mausbutton losgelassen
$20 = mittlerer Mausbutton gedrückt
$40 = mittlerer Mausbutton losgelassen
$0800 = Am roue qui Wheelmaus gedreht

P:L2: X-Koordinate qui souris comme LongInt.

P:L3: Y-Koordinate qui souris comme LongInt.

P:L4: encore sans Funktion (0).

P:L5: Longint ou bien P:B5 ou bien 0 (zéro). ici peut chez besoin zusätzliche données übertragen volonté, qui qui Empfänger avec qui API GetMessageExtraInfo auslesen peux (communication entre deux Programmen).
 
Programmieren, das spannendste Detektivspiel der Welt.
06.07.2005  
 




E.T.
un Beispiel en supplément:
KompilierenMarqueSéparation
Def mouse_action(5) !"User32","mouse_event"
declare X&, Y&
cls
X& = (%MaxX/2)*65535/%MaxX'x-zentriert
Y& = (%MaxY/2)*65535/%MaxY'y-zentriert
mouse_action($8000 + 1, X&, Y&, 0, 0)
Print "Startposition : " + @str$(%MouseX) + " - " + @str$(%MouseY)
sleep 500
randomize

whileloop 1,10

    X& = @Rnd(%MaxX)'Zufall X-Pos.
    Y& = @Rnd(%MaxY)'Zufall y-Pos.
    print "Ziel " + @str$(&loop) + " : " + @str$(X&) + " - " + @str$(Y&)
    X& = X& * 65535 / %MaxX'Umrechnen!!
    Y& = Y& * 65535 / %MaxY'Umrechnen!!
    mouse_action($8000 + 1, X&, Y&, 0, 0)
    sleep 500

EndWhile

print "Ende mit klick ins Fenster..."
waitinput
end

important ist cela umrechnen qui Koordinaten, siehe hierzu z.B. :
msdn: [...] 
ou bien : [...] 
 
Grüße aus Sachsen... Mario
WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte...
27.11.2010  
 



Note / Question or Comment to the Help--Topic


Topictitle, max. 100 marque.
 

Systemprofile:

ne...aucune Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

s'il te plaît s'inscrire um une Beitrag trop verfassen.
 

Options du sujet

5.365 Views

Untitledvor 0 min.
Sven Bader21.08.2021
RudiB.01.04.2020
Torsten Boo10.03.2019
AndreasS11.12.2018
plus...

Themeninformationen

cet Thema hat 2 participant:

E.T. (1x)
Michael Wodrich (1x)


Admins  |  AGB  |  Applications  |  Auteurs  |  Chat  |  protection des données  |  Télécharger  |  Entrance  |  Aider  |  Merchantportal  |  Empreinte  |  Mart  |  Interfaces  |  SDK  |  Services  |  Jeux  |  cherche  |  Support

un projet aller XProfaner, qui il y a!


Mon XProfan
Privé Nouvelles
Eigenes Ablageforum
Sujets-La liste de voeux
Eigene Posts
Eigene Sujets
Zwischenablage
Annuler
 Deutsch English Français Español Italia
Traductions

protection des données


Wir verwenden Cookies seulement comme Session-Cookies à cause de qui technischen Notwendigkeit et chez uns gibt es aucun Cookies de Drittanbietern.

si du ici sur unsere Webseite klickst ou bien navigierst, stimmst du unserer Erfassung de Informationen dans unseren Cookies sur XProfan.Net trop.

Weitere Informationen trop unseren Cookies et en supplément, comment du qui Kontrolle par-dessus behältst, findest du dans unserer nachfolgenden Datenschutzerklärung.


d'accordDatenschutzerklärung
je voudrais keinen Cookie