| |
|
|
dr.dirk | Ciao,
gibt es die Möglichkeit ein "Wait" nur durch die Bewegung der Mouse auszulösen? Ich möchte das meine Programmschleife steht wenn nichts im Programm passiert, aber wieder corre sobald ich die Mouse bewege.
Dirk |
|
|
| |
|
|
|
Andreas Miethe
| |
|
| Gruss Andreas ________ ________ ________ ________ _ Profan 3.3 - XProfanX2 Win 95,98,ME,2000,XP,Vista - Win 7 32 / 64 Bit ASUS X93S - Intel Core I7-NVIDIA GForce 540M 8GB Arbeitsspeicher Homepage : [...] | 16.08.2009 ▲ |
|
|
|
|
dr.dirk | Danke Andreas,
werde ich gleich mal ausprobieren.
Dirk |
|
|
| |
|
|
|
dr.dirk | funktioniert SubClassProc auch unter XProfan10?
Ich bekomme es nicht hin
Dirk |
|
|
| |
|
|
|
Andreas Miethe
| Nein, erst ab XProfan11
so sollte es mit Ver.10 funktionieren. KompilierenMarkierenSeparierenDEF &WM_MOUSEMOVE 512
Declare Ende&,Point#
Cls
Usermessages &WM_MOUSEMOVE
Whilenot Ende&
WaitInput
If %Umessage = &WM_MOUSEMOVE
Dim Point#,8
External("User32.dll","GetCursorPos",Point#)
External("User32.dll","MapWindowPoints",0,%hwnd,Point#,1)
Locate 0,0
Print Long(Point#,0),Long(Point#,4)
Dispose Point#
Endif
Endwhile
oder so KompilierenMarkierenSeparieren |
|
|
| Gruss Andreas ________ ________ ________ ________ _ Profan 3.3 - XProfanX2 Win 95,98,ME,2000,XP,Vista - Win 7 32 / 64 Bit ASUS X93S - Intel Core I7-NVIDIA GForce 540M 8GB Arbeitsspeicher Homepage : [...] | 16.08.2009 ▲ |
|
|
|
|
| |
|
| |
|
|
|
dr.dirk | Vielen Dank euch beiden,
hab es jetzt zum laufen.
Dirk |
|
|
| |
|
|