| |
|
|
 Georg Teles | Korrigiere justement eines meiner Tools 1Click-Screenshot, wobei ici cela TrayIcon angeklickt wird et lieu beim Testen fest, qui normale Linksklick et Droit sous Windows 11 garnicht réagir ... Doppelklicks aussi pas.
Windows 11 reagiert offensichtlich seulement beim Loslassen, alle Source alors beim Anklicken avec Messages $201 (souris à gauche Vous pouvez) / $204 (souris à droite Vous pouvez) sommes somit avec $202 (souris à gauche loslassen) / $205 (souris à droite loslassen) trop ersetzen. Tricolore sous Windows XP, 7, 8, 10 et 11 getestet, cela allez. qui doppelklick allerdings c'est moi sous Windows 11 pas bekannt.
Habe maintenant pas dans qui Tiefe gebohrt, mais ... Windows 11 reagiert beim Mittleren Mausklick avec Message des linken Mausklicks (loslassen) avec qui Message $202 (514) 
Ansonsten sommes qui durchgestrichenen Messages sous 11 pas aktuell
TrayIcon("Msg", N1):
$201 (513): Linke Bouton de la souris gedrückt $202 (514): Linke Bouton de la souris losgelassen
$203 (515): Double-cliquez sur avec linker Bouton de la souris
$204 (516): Rechte Bouton de la souris gedrückt $205 (517): Rechte Bouton de la souris losgelassen
$206 (518): Double-cliquez sur avec rechter Bouton de la souris
$207 (519): Mittlere Bouton de la souris gedrückt
$208 (520): Mittlere Bouton de la souris losgelassen
$209 (521): Double-cliquez sur avec mittlerer Bouton de la souris
Grüße |
|
|
| |
|
|
|
 H.Brill | là scheint wirklich quoi chez WIN11 geändert worden trop son. mon Programme de autrefois fonctionne aussi pas plus, comme soll. Lediglich wm_LButtonDown bzw. wm_RButtonDown wird encore erkannt.
Déclarer Long MNummer[], ende, pos, String MString[]
MNummer[0] = $0201 : MString[0] = "wm_LButtonDown"
MNummer[1] = $0202 : MString[1] = "wm_LButtonUp"
MNummer[2] = $0204 : MString[2] = "wm_RButtonDown"
MNummer[3] = $0205 : MString[3] = "wm_RButtonUp"
MNummer[4] = $0207 : MString[4] = "wm_MButtonDown"
MNummer[5] = $0208 : MString[5] = "wm_MButtonUp"
MNummer[6] = $20A : MString[6] = "Mausrad"
MNummer[7] = $000F : MString[7] = "WM_PAINT"
MNummer[8] = $0214 : MString[8] = "WM_SIZING"
MNummer[9] = $0203 : MString[9] = "Maus - Doppel - Klick"
ende = 0
'Utilisateur Messages $201, $202, $203, $204, $205, $207, $208, $20A, $000F, $0214, $10
Fenêtre 600, 400
WhileNot ende
WaitInput
pos = IndexOf(MNummer[], %Message, 0)
Si pos > - 1
Localiser 10, 2
Imprimer Space$(50)
Localiser 10, 2
Imprimer MString[pos], Hex$(MNummer[pos])
EndIf
Si %Message = $10
ende = 1
EndIf
Endwhile
Fin
avec den Utilisateur Messages scheint es mais pour aller :
Déclarer Long MNummer[], ende, pos, String MString[]
MNummer[0] = $0201 : MString[0] = "wm_LButtonDown"
MNummer[1] = $0202 : MString[1] = "wm_LButtonUp"
MNummer[2] = $0204 : MString[2] = "wm_RButtonDown"
MNummer[3] = $0205 : MString[3] = "wm_RButtonUp"
MNummer[4] = $0207 : MString[4] = "wm_MButtonDown"
MNummer[5] = $0208 : MString[5] = "wm_MButtonUp"
MNummer[6] = $20A : MString[6] = "Mausrad"
MNummer[7] = $000F : MString[7] = "WM_PAINT"
MNummer[8] = $0214 : MString[8] = "WM_SIZING"
MNummer[9] = $0203 : MString[9] = "Maus - Doppel - Klick"
ende = 0
Fenêtre 600, 400
Utilisateur Messages $201, $202, $203, $204, $205, $207, $208, $20A, $000F, $0214
WhileNot ende
WaitInput
Si %Message = %UMessage
pos = IndexOf(MNummer[], %UMessage, 0)
Si pos > -1
Localiser 10, 2
Imprimer Space$(50)
Localiser 10, 2
Imprimer MString[pos], Hex$(MNummer[pos])
EndIf
EndIf
Si %Message = $10
ende = 1
EndIf
Endwhile
Fin
Pour qui Doppelklicks wäre que voici trop verwenden :
trouvé ici im Forum. |
|
|
| Benutze XPROFAN X3 + FREEPROFAN Wir sind die XProfaner. Sie werden von uns assimiliert. Widerstand ist zwecklos! Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.
Was die Borg können, können wir schon lange. | vor 7 Tagen ▲ |
|
|
|
|
 H.Brill | Ah, habe justement gesehen, qui je encore Windows 10 sur elle habe. Müßtest du arrêt la fois avec Ver 11 essayer. |
|
|
| Benutze XPROFAN X3 + FREEPROFAN Wir sind die XProfaner. Sie werden von uns assimiliert. Widerstand ist zwecklos! Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.
Was die Borg können, können wir schon lange. | vor 7 Tagen ▲ |
|
|
|
|
 Georg Teles | Hi,
qui Messages marcher im la fenêtre einwandfrei chez Win 11, lediglich sur dem TrayIcon comment dessus beschrieben reagiert Win 11 seulement avec Loslassen qui Linken/Rechten Bouton de la souris statt gedrückter (mittlere Bouton de la souris garnicht ou bien interpretiert comme Linksklick/Loaslassen) - sur Doppelklicks reagiert cela TrayIcon sous Win 11 absolu pas.
jusqu'à Win 10 ist hierbei alles tip top 
je vermute, dass chez Win 11 "Badges" dazukamen, z.B. comment chez Handys sous Email-App le nombre ungelesener Mails comme Beispiel s. [...] . Möglicherweise hat sich à qui Messagesierung (hehe) sous Win 11 c'est pourquoi quoi geändert hat ? Habe là absolu je n'en sais rien, quoi cela sous Win 11 angeht...


Grüße |
|
|
| |
|
|
|
 H.Brill | Nunja, qui Badges gibt es oui aussi déjà dans Windows 10. chez mir vous êtes aktiviert. vois vous oui selber ab et à dans qui Taskleiste.
Windows 10: Badges dans Taskleiste aktivieren / désactiver Um qui Badges dans qui Windows-10-Taskleiste trop aktivieren, allez son folgendermaßen avant:
Öffnet qui Windows-Einstellungen avec qui Tastenkombination Windows + i. Klickt sur qui Schaltfläche Personalisierung et wählt à gauche den Menüpunkt Taskleiste aus. Scrollt quelque chose herunter. Stellt den commutateur chez Badges sur Taskleisten-Schaltflächen Montrer de Aus sur un, um vous trop aktivieren. si qui commutateur bereits sur un steht, peut son ihn betätigen, à Badges trop désactiver.
Müßtest du ensuite oui aussi zum Testen désactiver peut. |
|
|
| Benutze XPROFAN X3 + FREEPROFAN Wir sind die XProfaner. Sie werden von uns assimiliert. Widerstand ist zwecklos! Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.
Was die Borg können, können wir schon lange. | vor 3 Tagen ▲ |
|
|
|