EasyTabs, Tabs kann man nicht mehr über die Tableiste schließen

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

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von RodFromGermany.

    EasyTabs, Tabs kann man nicht mehr über die Tableiste schließen

    Hallo,

    ich kann die Tabs über die Tableiste nicht schließen. Wenn ich zwei Tabs offen habe und den ersten Tab schließen will, bekomme ich folgende Meldung: System.ArgumentException: "The given control has not been added to the taskbar.". Wenn ich aber zwei Tabs offen habe und die zweite(in dem Fall die neue) schließen will, bekomme ich folgende Meldung: System.InvalidOperationException: "Die Sammlung wurde geändert. Der Enumerationsvorgang kann möglicherweise nicht ausgeführt werden."


    VB.NET-Quellcode

    1. Imports EasyTabs
    2. Module Program
    3. Public Sub Main()
    4. Application.EnableVisualStyles()
    5. Application.SetCompatibleTextRenderingDefault(False)
    6. Dim container As frmContainer = New frmContainer()
    7. container.Tabs.Add(New EasyTabs.TitleBarTab(container) With {
    8. .Content = New obeom With {
    9. .Text = "New Tab"
    10. }
    11. })
    12. container.SelectedTabIndex = 0
    13. container.WindowState = FormWindowState.Maximized
    14. container.ControlBox = True
    15. container.FormBorderStyle = FormBorderStyle.Sizable
    16. Dim applicationContext As TitleBarTabsApplicationContext = New TitleBarTabsApplicationContext()
    17. applicationContext.Start(container)
    18. Application.Run(applicationContext) '<- Hier werden beim Abstürzen die Meldungen angezeigt.
    19. End Sub
    20. End Module


    Und hier ist die frmContainer:

    VB.NET-Quellcode

    1. ​Imports EasyTabs
    2. Partial Public Class frmContainer : Inherits TitleBarTabs
    3. Public Sub New()
    4. InitializeComponent()
    5. AeroPeekEnabled = True
    6. TabRenderer = New ChromeTabRenderer(Me)
    7. ' Icon = My.Resources.test
    8. End Sub
    9. Public Overrides Function CreateTab() As TitleBarTab
    10. Return New TitleBarTab(Me) With {
    11. .Content = New obeom With {
    12. .Text = "New Tab"
    13. }
    14. }
    15. End Function
    16. End Class


    Hat einer vielleicht eine Idee worann es liegen könnte? :/

    Liebe Grüße
    @Catfish28 Kannst Du mal das relevante Projekt posten, mach ne Kopie, schmeiß raus, was nicht dazu gehört, überzeuge Dich, dass Dein Effekt reproduziert wird, bereinige das Projekt und zippe es ohne bin, obj und vs-Verzeichnisse.
    Erweiterte Antwort => Dateianhänge => Hochladen.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!