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 - Ein- und Umsteiger
Re: Selber Code in mehreren Projekten/Forms 
Autor: Novatlan
Datum: 22.03.15 19:34

Geniale Tips, vielen Dank!

Ich probiere jetzt grad ein paar Sachen in allgemeine Subs umzubauen.

z.B.

 If EinstellungenReader.ReadBoolean("widgetLocations", "veProHidden") = True _
   Then
            hea_vePro.Enabled = False
            hea_vePro.Visible = False
            Highlighter1.SetHighlightColor(btn_widgets_vePro, _
              eHighlightColor.None)
        Else
            hea_vePro.Enabled = True
            hea_vePro.Visible = True
            Highlighter1.SetHighlightColor(btn_widgets_vePro, _
              eHighlightColor.Green)
            hea_vePro.Location = New System.Drawing.Point( _
            EinstellungenReader.ReadInteger("widgetLocations", "veProX"), _
            EinstellungenReader.ReadInteger("widgetLocations", "veProY"))
            If EinstellungenReader.ReadBoolean("widgetLocations", _
            "veProCollapsed") = True Then
                hea_vePro.Collapsed = True
                btn_veProCollapse.Type = PaletteButtonSpecStyle.ArrowDown
            Else
                hea_vePro.Collapsed = False
                btn_veProCollapse.Type = PaletteButtonSpecStyle.ArrowUp
            End If
        End If
wollte ich umwandeln. Klappt auch alles soweit, nur bei ein paar Buttons einer KryptonSpecHeaderGroup finde ich keine Möglichkeit den Namen als Variable einzufügen.

Hier die zeile wie ich es gedacht hätte:
   DirectCast(Me.Controls.Find("btn_" & widgetName & "Collapse", True)(0), _
     ComponentFactory.Krypton.Toolkit.ButtonSpecHeaderGroup).Type = _
     PaletteButtonSpecStyle.ArrowDown
VS meckert "Value of System.Windows.Forms.Control cannot be converted to ComponentFactory.Krypton.Toolkit.ButtonSpecHeaderGroup".

Ansonsten scheint alles zu funktionieren, aber diese Buttons wollen irgendwie nicht...
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Selber Code in mehreren Projekten/Forms1.567Novatlan22.03.15 15:33
Re: Selber Code in mehreren Projekten/Forms936Manfred X22.03.15 15:53
Re: Selber Code in mehreren Projekten/Forms824Novatlan22.03.15 16:04
Re: Selber Code in mehreren Projekten/Forms902Manfred X22.03.15 16:23
Re: Selber Code in mehreren Projekten/Forms828Novatlan22.03.15 16:29
Re: Selber Code in mehreren Projekten/Forms842Manfred X22.03.15 16:36
Re: Selber Code in mehreren Projekten/Forms772Novatlan22.03.15 16:40
Re: Selber Code in mehreren Projekten/Forms823Manfred X22.03.15 16:44
Re: Selber Code in mehreren Projekten/Forms778Novatlan22.03.15 16:48
Re: Selber Code in mehreren Projekten/Forms887Manfred X22.03.15 16:53
Re: Selber Code in mehreren Projekten/Forms800Novatlan22.03.15 16:57
Re: Selber Code in mehreren Projekten/Forms824Manfred X22.03.15 17:04
Re: Selber Code in mehreren Projekten/Forms869cookstdu22.03.15 17:07
Re: Selber Code in mehreren Projekten/Forms927Novatlan22.03.15 19:34
Re: Selber Code in mehreren Projekten/Forms761Manfred X22.03.15 21:29
Re: Selber Code in mehreren Projekten/Forms767Manfred X22.03.15 21:52
Re: Selber Code in mehreren Projekten/Forms784Novatlan22.03.15 21:36

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