Français
Forum

TrayIcon Msg Windows 11

 

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
 
Alle Sprachen
TC-Programming [...] 
XProfan 8.0 - 10.0 - X2 - X3 - X4

vor 7 Tagen  
 




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 :
Déclarer x&
Def GetClassLong(2) !"User32", "GetClassLongA"
Def SetClassLong(3) !"User32", "SetClassLongA"
Cls
Usermessages $203,$206,$209
x&=GetClassLong(%hwnd,-26)
x& = x& | 8
SetClassLong(%hwnd,-26,x&)'CS_DBLCLKS Class-Style mettons.

Tandis que 1

    waitinput
    Cas %clé=2:BREAK

    Si %umessage=$203

        Imprimer "Linker Double-cliquez sur."

    ElseIf %umessage=$206

        Imprimer "Rechter Double-cliquez sur."

    ElseIf %umessage=$209

        Imprimer "Mittlerer Double-cliquez sur."

    EndIf

Endwhile

Usermessages 0
Fin

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
 
TC-Programming [...] 
XProfan 8.0 - 10.0 - X2 - X3 - X4

vor 3 Tagen  
 




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  
 



répondre


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

124 Views

Untitledvor 0 min.
ByteAttackGestern (18:52)
E.T.Gestern (08:29)
Jürgen StrahlVorgestern (05:09)
H.Brill vor 3 Tagen
plus...

Themeninformationen

cet Thema hat 2 participant:

H.Brill (3x)
Georg Teles (2x)


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