vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Fortgeschrittene
Diese Zeile löst dein Problem  
Autor: Dartrax
Datum: 20.04.04 23:05

Abgeleitet vom oberen Lösungsvorschlag habe ich eine Version entwickelt, die das Problem in einer Zeile umgeht. Ich weiß zwar nicht, warum es diesen Fehler gibt, aber ich glaube, das ist die einfachste Lösung, das Problem zu umgehen:
CtmKontaktÜbertragen = CtmKontaktÜbertragen.CloneMenu
Zur Erklärung:
Da ja, wie bereits gesagt, zum Menü keine weiteren Untereinträge angelegt werden können, nachdem es einmal aufgerufen wurde, wird bei jedem Aufruf des Menüs durch CloneMenu eine neue Instanz erzeugt und diese dem Menü selbst zugewiesen. So haben wir immer einen Zustand wie beim ersten Aufruf, bei dem es ja problemlos funktionierte.
Die Clear-Zeile kannst du theoretisch weglassen. Ich würde es zur Sicherheit trotzdem verwenden, man weiß ja nie, ob Microsoft uns nicht mal unbemerkt einen Patch dafür unterjubelt

Insgesamt sieht dein Code dann so aus:
    Private Sub AxVSFlex7L_MouseDownEvent(ByVal sender As Object, ByVal e As _
      AxMSFlexGridLib.DMSFlexGridEvents_MouseDownEvent) Handles _
      AxVSFlex7L.MouseDownEvent
        CtmKontaktÜbertragen.MenuItems.Clear()
        CtmKontaktÜbertragen.MenuItems.Add("Test1")
        CtmKontaktÜbertragen.MenuItems.Add("Test2")
        CtmKontaktÜbertragen = CtmKontaktÜbertragen.CloneMenu
        ctmListe.Show(Me, New System.Drawing.Point(e.x / 15, e.y / 15))
    End Sub
Dartrax

Meine Homepage: www.dartrax.de


Posting wie es leibt und lebt
. . . und voll daneben geht!
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Immer diese Untermenüs858Solution20.04.04 19:31
Re: Immer diese Untermenüs484Solution20.04.04 19:43
Re: Immer diese Untermenüs486spike2420.04.04 20:59
Re: Immer diese Untermenüs505Dartrax20.04.04 21:51
Re: Immer diese Untermenüs528Dartrax20.04.04 22:39
Diese Zeile löst dein Problem 506Dartrax20.04.04 23:05
Re: Diese Zeile löst dein Problem 481Solution21.04.04 07:34
Re: Diese Zeile löst dein Problem 529Dartrax21.04.04 16:59

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel