| |
|
|
dr.dirk | Salut,
gibt es qui Possibilité un "Wait" seulement par qui Bewegung qui Souris auszulösen? je voudrais cela mon Programmschleife steht si rien im Programme passiert, mais wieder fonctionne sobald je qui Souris 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 | merci Andreas,
werde je juste la fois ausprobieren.
Dirk |
|
|
| |
|
|
|
dr.dirk | funktioniert SubClassProc aussi sous XProfan10?
je bekomme es pas hin
Dirk |
|
|
| |
|
|
|
Andreas Miethe
| non, seulement ab XProfan11
so sollte es avec Ver.10 marcher. KompilierenMarqueSéparationDEF &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
ou bien so KompilierenMarqueSéparation |
|
|
| 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 maintenant zum courir.
Dirk |
|
|
| |
|
|