Nochmal BalloonTip Message Duration - Neuer Ansatz

  • VB.NET
  • .NET (FX) 4.5–4.8

Es gibt 31 Antworten in diesem Thema. Der letzte Beitrag () ist von Dideldum.

    @-Franky-
    Die von mir verwendete Funktion:

    VB.NET-Quellcode

    1. icn_TaskleistenSymbol.ShowBalloonTip(My.Settings.Fragen_Balloontip_Anzeigedauer)
    gehört zur NotifyIcon-Klasse. ;)
    Und aus der NotifyIcon-Klasse hat MS klammheimlich den Parameter geklaut und greift bei der Ausführung nur noch auf die Systemsteuerungs-Werte zurück.
    Anständig, wie MS nun mal ist (und wohl auch aus Abwärtskompatibilitätsgründen) hat MS den Parameter im Aufruf drin gelassen.
    Die Verwender wundern sich dann, warum deren Params nicht übernommen werden.
    Bin auch nur durch Zufall auf einer Webseite darauf gestossen, bei meiner Suche nach den Ursachen...

    @DTF
    Danke Dir! ^^
    Wow, ich habe 15min gebraucht, um Dein Script zu verstehen.
    Bin ja erst seit einem guten Jahr mit .net zugange.
    Das ist aber High-End-Stufe, was Du da zusammengeschnitzt hast.
    Aber klar - so ist es für jeden Verwender absolut idiotensicher. ;)
    Nur halt auch schwer verständlich.

    Dein Tip mit der Frage, wenn sich beide Werte unterscheiden, ist sehr gut - den baue ich ein. :)

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „Dideldum“ ()

    Naja, High-End finde ich das noch nicht. Aber wenn du am Ball bleibst, wirst du das bald auch so sehen. Das was ich gemacht habe, ist nichts weiter als minimal erweiterete Nutzung der ComboBox(Richtung Datenbindung). Die meisten Beginner nutzen die ComboBox ja simpel indem sie CBB.Items.Add oder AddRange nutzen. Aber wenn du den Code soweit verstanden hast, bist du auf einem guten Weg.
    Zitat von mir 2023:
    Was interessiert mich Rechtschreibung? Der Compiler wird meckern wenn nötig :D

    @Dideldum Ahh, die NotifyIcon Klasse und da der BalloonTip. Jupp, da dürfte die Duration aus Abwärtskompatibilität noch drin sein. Ab Win8?, zumindest ab Win10 (falls per RegKey nicht wieder umgestellt auf die alten BalloonTips) sollte der Aufruf des NotifyIcon.BalloonTip auf die Windows ToastNotification umgeleitet werden wenn ich nicht falsch liege. Allerdings dann auch nur mit beschränkten Gestalltungsmöglichkeiten. Also wenn ich nicht komplett daneben liege, dann kannst auch gleich direkt die ToastNotification per WinRT nutzen. Da hast auch viel mehr Gestaltungsmöglichkeiten. learn.microsoft.com/en-us/wind…active-toasts?tabs=appsdk
    Mfg -Franky-

    @-Franky-
    wow, danke Dir heftigst! :)
    Von diesem Toastbrot, äh, ToastNotification höre ich eben zum ersten mal.
    Aber was ich in Deinem Link so lese, kommen mir unverschämt gute Ideen dazu, was ich damit in meinem Proggi so alles anstellen könnte.
    Da muss ich wirklich dazu recherchieren, wie ich diese in mein Proggi einbauen kann. ;)
    Die Dinger scheinen ja wollmilchlegende Eiersauen unter den Notifications zu sein.

    EDIT: Wow...
    Muss dazu wohl ein NuGet-Pakets Microsoft.Windows.SDK einbinden und dann noch eine App-ID erstellen.
    Ersteres sollte ja kein Probli sein - aber das mit der App-ID stellt sich wohl nicht gerade als trivial dar. :S

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Dideldum“ ()

    Dideldum schrieb:

    Von diesem Toastbrot, äh, ToastNotification höre ich eben zum ersten mal.
    Aber gesehen hast die sicher schon zigmal. ;) Am einfachsten sind die Standard-Toast. Bei Generic-Toast hast noch mehr Möglichkeiten aber hier müssen auch bestimmte Bedingungen erfüllt sein. Scheduled-Toast die Zeitgesteuert angezeigt werden können usw. Es gibt wohl ein entsprechendes CommunityToolKit dafür, hab das aber bisher nicht genutzt. Hier noch ein Link was so mit der ToastNotification geht: docs.telerik.com/devtools/winf…on/notification-templates
    Mfg -Franky-

    Oh jeh...

    @-Franky-
    habe mir mal das mit der AppID angelesen.
    Anforderungen:
    Desktop Bridge: Eine sauberere Lösung ist die Verwendung der Desktop Bridge (Project Centennial), um Ihre WinForms-oder WPF-Anwendung in eine UWP-App zu konvertieren. Dadurch erhalten Sie eine offizielle AppID im Windows Store, die dann für Toast-Benachrichtigungen verwendet werden kann. Dieser Prozess erfordert jedoch zusätzliche Schritte und die Einreichung Ihrer App in den Microsoft Store.
    Das überreisse ich mal so überhaupt nicht - das scheint mir mehr Arbeit zu sein, als die bisherige Entwicklung meines Programms. ;(
    Und ohne diese AppID keine Toastbrote... =O

    Dideldum schrieb:

    Dadurch erhalten Sie eine offizielle AppID im Windows Store, die dann für Toast-Benachrichtigungen verwendet werden kann. Dieser Prozess erfordert jedoch zusätzliche Schritte und die Einreichung Ihrer App in den Microsoft Store.
    Nö. Ja, Dein Programm benötigt eine AppID. Das ist aber auch nur eine eindeutige GUID oder Name um Dein Programm von den anderen zu unterscheiden bzw. damit eine ToastMessage dein Programm zugeordnet werden kann bzw. damit Du über den ToastManager auch nur auf Deine ToastMessages zugreifen kannst. Hat aber null komma nix mit dem Windows Store, WPF, UWP oder WinForms zu tun. Ich habe ein komplettes VB6 Beispiel für die ToastNotification und das funktioniert bestens. Eigentlich brauch man auch für .NET kein CommunityToolKit dafür. Nur ein paar Kenntnisse in direkter COM Programmierung bzw. da Du noch mit .NET Framework unterwegs bist, kannst Dir auch den Verweis auf die Windows.Winmd einbinden und schon stehen Dir alle Namespaces und Klassen der WinRT zur Verfügung.

    Edit: Fahrplan für Deine erste ToastMessage. Mach Dir erstmal ein neues .NET Framework Testprojekt.
    Ab .NET5! -> Da ab hier keine Verweise auf Winmd's mehr unterstützt werden, kann man wohl das dafür vorgesehene CommunityToolKit nutzen. Ich persöhnlich ziehe es vor direkt mit den WinRT COM Interfaces zu arbeiten
    Bis .NET Framework 4.8.xx! -> Mach Dir einen Verweis auf die "C:\Program Files (x86)\Windows Kits\10\UnionMetadata\10.0.22621.0\Windows.winmd" Wobei die "10.0.22621.0" auch eine andere sein kann. Je nachdem welche Version des Windows SDK bei Dir installiert ist bzw. müsstest Du, falls noch nicht vorhanden, das Windows SDK nachinstallieren.
    2 wichtige Imports

    VB.NET-Quellcode

    1. ​
    2. Imports Windows.Data.Xml.Dom
    3. Imports Windows.UI.Notifications

    1 Const -> Deine AppID. Ist nur zur Identifizierung Deiner Toast.

    VB.NET-Quellcode

    1. ​
    2. Private Const AppID As String = "Toast Notify"

    Ich hab hier noch ein PNG geladen das dann im Toast angezeigt werden soll.

    VB.NET-Quellcode

    1. ​
    2. Private ToastImage As String = New System.Uri(Path.GetFullPath("Logo.png")).AbsoluteUri

    Im Button Click
    Spoiler anzeigen
    ​

    VB.NET-Quellcode

    1. ​
    2. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    4. 'https://docs.microsoft.com/en-us/uwp/schemas/tiles/toastschema/schema-root
    5. 'https://docs.microsoft.com/en-us/uwp/api/windows.ui.notifications.toasttemplatetype
    7. Dim toastTemplate As ToastTemplateType = ToastTemplateType.ToastImageAndText04
    8. Dim toastXml As XmlDocument = ToastNotificationManager.GetTemplateContent(toastTemplate)
    10. Dim toastNode As IXmlNode = toastXml.SelectSingleNode("/toast")
    11. Dim toastXmlElement As XmlElement = CType(toastNode, XmlElement)
    12. toastXmlElement.SetAttribute("duration", "short")
    13. toastXmlElement.SetAttribute("launch", "toast://my_arguments")
    15. Dim visualNode As IXmlNode = toastXml.SelectSingleNode("/toast/visual")
    16. Dim visualXmlElement As XmlElement = CType(visualNode, XmlElement)
    17. 'visualXmlElement.SetAttribute("addImageQuery", "false")
    18. 'visualXmlElement.SetAttribute("baseUri", "ms-appx:///")
    19. 'visualXmlElement.SetAttribute("branding", "none")
    20. 'visualXmlElement.SetAttribute("lang", "de-DE")
    21. 'visualXmlElement.SetAttribute("version", "1")
    23. Dim bindingNode As IXmlNode = toastXml.SelectSingleNode("/toast/visual/binding")
    24. Dim bindingXmlElement As XmlElement = CType(bindingNode, XmlElement)
    25. 'bindingXmlElement.SetAttribute("addImageQuery", "false")
    26. 'bindingXmlElement.SetAttribute("baseUri", "ms-appx:///")
    27. 'bindingXmlElement.SetAttribute("branding", "none")
    28. 'bindingXmlElement.SetAttribute("fallback", "")
    29. 'bindingXmlElement.SetAttribute("lang", "de-DE")
    30. 'bindingXmlElement.SetAttribute("template", "ToastImageAndText04")
    32. If toastTemplate <= ToastTemplateType.ToastImageAndText04 Then
    33. Dim imageElements As XmlNodeList = toastXml.GetElementsByTagName("image")
    34. Dim imageXmlElement As XmlElement = CType(imageElements(0), XmlElement)
    35. 'imageXmlElement.SetAttribute("addImageQuery", "false")
    36. imageXmlElement.SetAttribute("alt", "Logo")
    37. 'imageXmlElement.SetAttribute("id", "1")
    38. imageXmlElement.SetAttribute("src", ToastImage)
    39. End If
    41. Debug.Print(ToastImage)
    43. Dim textElements As XmlNodeList = toastXml.GetElementsByTagName("text")
    44. Select Case toastTemplate
    45. Case = ToastTemplateType.ToastText01, ToastTemplateType.ToastImageAndText01
    46. textElements(0).AppendChild(toastXml.CreateTextNode("Text"))
    47. Case = ToastTemplateType.ToastText02, ToastTemplateType.ToastImageAndText02
    48. textElements(0).AppendChild(toastXml.CreateTextNode("Titel"))
    49. textElements(1).AppendChild(toastXml.CreateTextNode("Text 1"))
    50. Case = ToastTemplateType.ToastText03, ToastTemplateType.ToastImageAndText03
    51. textElements(0).AppendChild(toastXml.CreateTextNode("Titel"))
    52. textElements(1).AppendChild(toastXml.CreateTextNode("Text 1"))
    53. Case = ToastTemplateType.ToastText04, ToastTemplateType.ToastImageAndText04
    54. textElements(0).AppendChild(toastXml.CreateTextNode("Titel"))
    55. textElements(1).AppendChild(toastXml.CreateTextNode("Text 1"))
    56. textElements(2).AppendChild(toastXml.CreateTextNode("Text 2"))
    57. End Select
    59. ' ms-winsoundevent:Notification.Default
    60. ' ms-winsoundevent:Notification.IM
    61. ' ms-winsoundevent:Notification.Mail
    62. ' ms-winsoundevent:Notification.Reminder
    63. ' ms-winsoundevent:Notification.SMS
    64. ' ms-winsoundevent:Notification.Looping.Alarm
    65. ' ms-winsoundevent:Notification.Looping.Alarm2
    66. ' ms-winsoundevent:Notification.Looping.Alarm3
    67. ' ms-winsoundevent:Notification.Looping.Alarm4
    68. ' ms-winsoundevent:Notification.Looping.Alarm5
    69. ' ms-winsoundevent:Notification.Looping.Alarm6
    70. ' ms-winsoundevent:Notification.Looping.Alarm7
    71. ' ms-winsoundevent:Notification.Looping.Alarm8
    72. ' ms-winsoundevent:Notification.Looping.Alarm9
    73. ' ms-winsoundevent:Notification.Looping.Alarm10
    74. ' ms-winsoundevent:Notification.Looping.Call
    75. ' ms-winsoundevent:Notification.Looping.Call2
    76. ' ms-winsoundevent:Notification.Looping.Call3
    77. ' ms-winsoundevent:Notification.Looping.Call4
    78. ' ms-winsoundevent:Notification.Looping.Call5
    79. ' ms-winsoundevent:Notification.Looping.Call6
    80. ' ms-winsoundevent:Notification.Looping.Call7
    81. ' ms-winsoundevent:Notification.Looping.Call8
    82. ' ms-winsoundevent:Notification.Looping.Call9
    83. ' ms-winsoundevent:Notification.Looping.Call10
    85. Dim audioXmlElement As XmlElement = toastXml.CreateElement("audio")
    86. audioXmlElement.SetAttribute("src", "ms-winsoundevent:Notification.Looping.Alarm")
    87. 'audioXmlElement.SetAttribute("loop", "false")
    88. 'audioXmlElement.SetAttribute("silent", "false")
    89. toastNode.AppendChild(audioXmlElement)
    91. Dim commandsXmlElement As XmlElement = toastXml.CreateElement("commands")
    92. commandsXmlElement.SetAttribute("scenario", "alarm")
    93. Dim commandsNode As IXmlNode = toastNode.AppendChild(commandsXmlElement)
    95. Dim commandXmlElement0 As XmlElement = toastXml.CreateElement("command")
    96. commandXmlElement0.SetAttribute("id", "dismiss")
    97. commandXmlElement0.SetAttribute("arguments", "dismiss")
    98. commandsNode.AppendChild(commandXmlElement0)
    100. Dim commandXmlElement1 As XmlElement = toastXml.CreateElement("command")
    101. commandXmlElement1.SetAttribute("id", "snooze")
    102. commandXmlElement1.SetAttribute("arguments", "snooze")
    103. commandsNode.AppendChild(commandXmlElement1)
    105. 'https://docs.microsoft.com/en-us/uwp/api/windows.ui.notifications.toastnotification
    106. Dim toast As ToastNotification = New ToastNotification(toastXml)
    107. With toast
    108. '.Content
    109. '.Data
    110. .ExpirationTime = DateTimeOffset.Now.AddDays(1)
    111. '.ExpiresOnReboot = False
    112. .Group = "Group"
    113. '.NotificationMirroring = NotificationMirroring.Disabled
    114. '.Priority = ToastNotificationPriority.High
    115. '.RemoteId ="ID"
    116. '.SuppressPopup=True
    117. .Tag = "123456"
    118. End With
    120. AddHandler toast.Activated, AddressOf ToastActivated
    121. AddHandler toast.Dismissed, AddressOf ToastDismissed
    122. AddHandler toast.Failed, AddressOf ToastFailed
    124. TextBox1.Text = Replace(toast.Content.GetXml, "><", ">" & vbNewLine & "<")
    126. 'https://docs.microsoft.com/en-us/uwp/api/windows.ui.notifications.toastnotificationmanager
    127. ToastNotificationManager.CreateToastNotifier(AppID).Show(toast)
    129. End Sub


    Die Event Handler
    Spoiler anzeigen
    ​

    VB.NET-Quellcode

    1. ​
    2. Private Sub ToastActivated(ByVal sender As ToastNotification, ByVal e As Object)
    4. ClearText()
    6. ChangeText("The user activated the toast.")
    7. ChangeText("Toastgroup: " & sender.Group)
    8. ChangeText("Toasttag: " & sender.Tag)
    9. ChangeText("ExpirationTime: " & sender.ExpirationTime.ToString)
    11. If TypeOf e Is ToastActivatedEventArgs Then
    13. Dim args As ToastActivatedEventArgs = CType(e, ToastActivatedEventArgs)
    15. If Not String.IsNullOrWhiteSpace(args.Arguments) Then
    17. Dim toastLaunch As Match = Regex.Match(args.Arguments, "^toast://(?<arguments>.*)$")
    18. Dim toastActivationArgs = toastLaunch.Groups("arguments")
    20. If toastActivationArgs.Success Then
    21. ChangeText("ActivationArgs: " & toastActivationArgs.Value)
    22. End If
    24. ChangeText("Arguments: " & args.Arguments)
    26. End If
    28. End If
    30. ChangeText("")
    32. End Sub
    34. Private Sub ToastDismissed(ByVal sender As ToastNotification, ByVal e As ToastDismissedEventArgs)
    36. ClearText()
    38. Select Case e.Reason
    40. Case ToastDismissalReason.ApplicationHidden
    41. ChangeText("The app hide the toast using ToastNotifier.Hide")
    43. Case ToastDismissalReason.UserCanceled
    44. ChangeText("The user dismissed the toast")
    46. Case ToastDismissalReason.TimedOut
    47. ChangeText("The toast has timed out")
    49. End Select
    51. ChangeText("Toastgroup: " & sender.Group)
    52. ChangeText("Toasttag: " & sender.Tag)
    53. ChangeText("ExpirationTime: " & sender.ExpirationTime.ToString)
    54. ChangeText("")
    56. End Sub
    58. Private Sub ToastFailed(ByVal sender As ToastNotification, ByVal e As ToastFailedEventArgs)
    60. ClearText()
    61. ChangeText("The toast encountered an error. Error: " & e.ErrorCode.Message)
    62. ChangeText("Toastgroup: " & sender.Group)
    63. ChangeText("Toasttag: " & sender.Tag)
    64. ChangeText("ExpirationTime: " & sender.ExpirationTime.ToString)
    65. ChangeText("")
    67. End Sub


    Hier ein Beispiel für ein Generic-Toast. Dafür müssen aber bestimmte Bedingungen erfüllt sein. Komme ich vllt. später drauf zurück. Was ich aber damit zeigen möchte ist, anstatt den XML über die Windows.Data.Xml.Dom zusammen zu bauen, kannst auch gleich direkt einen XML-String übergeben.
    Spoiler anzeigen
    ​

    VB.NET-Quellcode

    1. ​
    2. Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
    4. Dim toastXML As New Windows.Data.Xml.Dom.XmlDocument
    5. toastXML.LoadXml("<toast launch='action'>" &
    6. "<visual>" &
    7. "<binding template='ToastGeneric'>" &
    8. "<text>Text1</text>" &
    9. "<text>Text2</text>" &
    10. "</binding>" &
    11. "</visual>" &
    12. "</toast>")
    14. Dim toast As New ToastNotification(toastXML)
    15. With toast
    16. '.Content
    17. '.Data
    18. .ExpirationTime = DateTimeOffset.Now.AddDays(1)
    19. '.ExpiresOnReboot = False
    20. .Group = "Group"
    21. '.NotificationMirroring = NotificationMirroring.Disabled
    22. '.Priority = ToastNotificationPriority.High
    23. '.RemoteId ="ID"
    24. '.SuppressPopup=True
    25. .Tag = "123457"
    26. End With
    28. AddHandler toast.Activated, AddressOf ToastActivated
    29. AddHandler toast.Dismissed, AddressOf ToastDismissed
    30. AddHandler toast.Failed, AddressOf ToastFailed
    32. TextBox1.Text = Replace(toast.Content.GetXml, "><", ">" & vbNewLine & "<")
    34. ToastNotificationManager.CreateToastNotifier(AppID).Show(toast)
    36. End Sub


    Denke das das für den Anfang, wie man Standard-Toast erstellt, reicht. Für Generic-Toast müsstest Du eine Shortcut im Startmenü anlegen und Deine App als COM-Server registrieren wofür auch die AppID und eine AppActivatorCLSID benötigt werden. Ansonsten findest ja im Button1_Click weitere Links zu den Toast.
    Mfg -Franky-

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „-Franky-“ ()

    Dideldum schrieb:

    Und ohne diese AppID keine Toastbrote...


    Man kann sich auch selbst so ein Toast machen. Man nehme Mehl, Wasser, Salz, Hefe......

    Ach ne, man nehme ein Form und bastelt sich ein dynamisches UI drauf. Bedenkt das es User gibt(ich z.B.), die solche ToastsNotifications nervig finden und Windows so eingestellt haben, das Apps diese nicht mit den Toasts nerven. Ich lasse mir nur das absolut Notwendige anzeigen. Windows kann nicht wissen welche Meldungen wichtig für den User sind, von daher finde ich eine eigene Implementation besser, denn da hat man die volle Kontrolle und kann den User das einstellen lasse, bietet man eine Option an, "Nur wichtige Meldungen anzeigen", kann der User trotzdem informiert werden.
    Zitat von mir 2023:
    Was interessiert mich Rechtschreibung? Der Compiler wird meckern wenn nötig :D

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „DTF“ ()

    DTF schrieb:

    die solche ToastsNotifications nervig finden

    Ja klar, man sollte den User nicht mit ToastMessages überschwemmen. ;)

    DTF schrieb:

    Man kann sich auch selbst so ein Toast machen. Man nehme Mehl, Wasser, Salz, Hefe......
    ...und zum Nachtisch gibt es ... Nee was mir gestern Abend noch so durch den Kopf ging ist: Wenn man sich nun ein eigenes PopUp bastelt, worüber man als User nun gar keine Kontrolle hat wie oft der aufplöpt, kann man den User auch mit Messages überschwemmen. Dann doch eher eine Lösung wo der User die Möglichkeit besitzt die ToastMessages einzuschränken. Na dann, guten Appetit. ;)
    Mfg -Franky-

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „-Franky-“ ()

    Hi @DTF und @-Franky-
    Da habt Ihr ganz recht. ;)
    Mich nerven solche Popups auch.

    Daher haben in meinem Proggi die User volle Kontrolle über die nicht unbedingt erforderlichen Anzeigen. ^^
    Die nicht überlebensnotwendigen Ausgaben können die User deaktivieren und z.T. sogar auswählen, ob sie die gewollten in einem Fenster (mit "OK"-Bestätigung) oder als selbstlöschendes Ballöönchen haben wollen.
    Bilder

    • Tab_15_Sicherheitsfragen.jpg

      149,89 kB, 1.006×611, 17 mal angesehen

    Hi @-Franky-
    Ups, fast überlesen, Deine Anleitung.
    Danke Dir vielmals dafür! :)
    Habe mir den Link gesichert.
    Im Moment klappt es ja noch mit meinen NotifyIcons.

    Deine Lösung mit den Toasts kommt dann - so ich es hingefummelt bekomme - in einem Update, welches dann mehr Funktionen ins Proggi bringt.

    Im Moment plage ich mich eher mit der Übersetzung von 241 Dokumenten im Hilfe-Archiv DE, um diese für das englische Hilfe-Archiv zu übersetzen.
    Eine Sch... öne Arbeit... ;(

Facebook
Telefonspende