Forms-Eigenschaftenfenster: Platzieren einer benutzerdefinierten Eigenschaft in eine SubCategory

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

Es gibt 10 Antworten in diesem Thema. Der letzte Beitrag () ist von VB1963.

    Forms-Eigenschaftenfenster: Platzieren einer benutzerdefinierten Eigenschaft in eine SubCategory

    Hallo Community,

    Wie kann man eine selbst definierte Eigenschaft im Eigenschaftenfenster einer Form in eine vorhandene SubCategory, wie Appearance/​FlatAppearance (siehe Bild) plazieren?
    Ist das überhaupt möglich?

    VB.NET-Quellcode

    1. <Browsable(True)>
    2. <Category("Appearance")>
    3. <Description("Frame color of the button when it has the focus...")>
    4. Public Property FocusedBorderColor As Color = SystemColors.Highlight
    6. <[ReadOnly](True)>
    7. Public Overloads Property Flatstyle As FlatStyle = FlatStyle.Flat​



    lg
    VB1963

    Hm BorderSize ist zum Beispiel eine Eigenschaft von FlatButtonAppearance nicht von Button; vielleicht hat das damit zutun?
    Mich erinnert das ein wenig an WPF da macht man ja eine Darstellung aus einer beliebigen Klasse. Und da im Eigenschaftsfenster ja nicht der Button dargestellt ist, sondern dessen Eigenschaften wäre das so gemünzt BorderSize ja eine Darstellung der FlatAppearance und nicht des Buttons.

    @VB1963 Sieh Dir mal die Quellen im IlSpy an, ob da was verzeichnet ist.
    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!

    Achso, also ist deine FocusBorderColor schon eine Eigenschaft von FlatButtonAppearance ich dachte, die wäre in deiner Button Klasse

    Mit einem Converter krieg ich einen Node im Eigenschaftsfenster erzeugt. Werden die Eigenschaft von Point ausgeschildert (X, Y), weil ich nen PointConverter geklaut habe. Aber ob man da noch Eigenschaften dazu wursteln kann... (Da Test kein Point ist meckert er da natürlich gewaltig, aber ich würde denken wenn man eine Klasse und einen Converter entsprechend bastelt, dann kann man so einen Node frei gestalten)

    VB.NET-Quellcode

    1. Public Class ButtonTest
    2. Inherits Button
    3. <Browsable(True)>
    4. Public Property Test As Test = New Test
    5. End Class
    7. Public Class TestX
    8. Inherits PointConverter
    9. End Class
    11. <TypeConverter(GetType(TestX))>
    12. Public Class Test
    13. End Class

    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „Haudruferzappeltnoch“ ()

    FocusedBorderColor kann nicht Teil von FlatAppearance werden, da FlatAppearance eine Klasse ist, deren Konstruktor versteckt ist, sodass man nicht davon erben kann, um die Klasse zu erweitern.
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.

    Also ich hätte es so nie hingekriegt, aber mit ein bisschen Glück konnte ich es GPT entlocken, das ergibt einen CustomButton mit einer Custom Eigenschaft, die wiederum customizable Eigenschaften in einer SubCategory beinhaltet:

    VB.NET-Quellcode

    1. Public Class CustomFlatAppearance
    2. <Browsable(True)>
    3. <Description("Die Farbe des Rahmens.")>
    4. Public Property BorderColor As Color
    5. <Browsable(True)>
    6. <Description("Die Größe des Rahmens.")>
    7. Public Property BorderSize As Integer
    8. End Class
    10. Public Class CustomFlatAppearanceConverter
    11. Inherits ExpandableObjectConverter
    13. Public Overrides Function CanConvertTo(ByVal context As ITypeDescriptorContext, ByVal destinationType As Type) As Boolean
    14. If destinationType = GetType(CustomFlatAppearance) Then Return True
    15. Return MyBase.CanConvertTo(context, destinationType)
    16. End Function
    17. End Class
    19. Public Class CustomButton
    20. Inherits Button
    22. Private _customFlatAppearance As CustomFlatAppearance = New CustomFlatAppearance()
    24. <Browsable(True)>
    25. <Description("Die benutzerdefinierte Darstellung des Buttons.")>
    26. <TypeConverter(GetType(CustomFlatAppearanceConverter))>
    27. Public Property CustomFlatAppearance As CustomFlatAppearance
    28. Get
    29. Return _customFlatAppearance
    30. End Get
    31. Set(value As CustomFlatAppearance)
    32. _customFlatAppearance = value
    33. End Set
    34. End Property
    35. End Class
    FlatAppearance selbst anzwacken geht ja leider nicht wie @VaporiZed geschrieben hat, aber vielleicht kannst du die schlicht austauschen...

    Du könntest dir auch eine eigene FlatButtonAppearance Klasse, basierend auf der Originalen Klasse, erstellen.



    Beispiel

    C#-Quellcode

    1. using System;
    2. using System.ComponentModel;
    3. using System.Drawing;
    4. using System.Globalization;
    5. using System.Windows.Forms;
    7. namespace MyButton
    8. {
    9. internal sealed class ApplicableToButtonAttribute : Attribute
    10. {
    11. public ApplicableToButtonAttribute()
    12. {
    13. }
    14. }
    16. internal class FlatButtonAppearanceConverter : ExpandableObjectConverter
    17. {
    19. // Don't let the property grid display the full type name in the value cell
    20. public override object ConvertTo(ITypeDescriptorContext context, CultureInfo culture, object value, Type destinationType)
    21. {
    22. if (destinationType == typeof(string))
    23. {
    24. return "";
    25. }
    27. return base.ConvertTo(context, culture, value, destinationType);
    28. }
    30. // Don't let the property grid display the CheckedBackColor property for Button controls
    31. public override PropertyDescriptorCollection GetProperties(ITypeDescriptorContext context, object value, Attribute[] attributes)
    32. {
    33. if (context != null && context.Instance is Button)
    34. {
    35. Attribute[] attributes2 = new Attribute[attributes.Length + 1];
    36. attributes.CopyTo(attributes2, 0);
    37. attributes2[attributes.Length] = new ApplicableToButtonAttribute();
    38. attributes = attributes2;
    39. }
    41. return TypeDescriptor.GetProperties(value, attributes);
    42. }
    44. }
    46. [TypeConverter(typeof(FlatButtonAppearanceConverter))]
    47. public class FlatButtonAppearance
    48. {
    49. [Browsable(true), ApplicableToButton(), NotifyParentProperty(true), EditorBrowsable(EditorBrowsableState.Always), DefaultValue(1)]
    50. public int BorderSize
    51. {
    52. get => buttonOwner.FlatAppearance.BorderSize;
    53. set => buttonOwner.FlatAppearance.BorderSize = value;
    54. }
    56. [Browsable(true), ApplicableToButton(), NotifyParentProperty(true), EditorBrowsable(EditorBrowsableState.Always), DefaultValue(typeof(Color), "")]
    57. public Color BorderColor
    58. {
    59. get => buttonOwner.FlatAppearance.BorderColor;
    60. set => buttonOwner.FlatAppearance.BorderColor = value;
    61. }
    63. [Browsable(true), ApplicableToButton(), NotifyParentProperty(true),EditorBrowsable(EditorBrowsableState.Always),DefaultValue(typeof(Color), "")]
    64. public Color CheckedBackColor
    65. {
    66. get => buttonOwner.FlatAppearance.CheckedBackColor;
    67. set => buttonOwner.FlatAppearance.CheckedBackColor = value;
    68. }
    70. [Browsable(true), ApplicableToButton(), NotifyParentProperty(true),EditorBrowsable(EditorBrowsableState.Always),DefaultValue(typeof(Color), "")]
    71. public Color MouseDownBackColor
    72. {
    73. get => buttonOwner.FlatAppearance.MouseDownBackColor;
    74. set => buttonOwner.FlatAppearance.MouseDownBackColor = value;
    75. }
    77. [Browsable(true), ApplicableToButton(), NotifyParentProperty(true),EditorBrowsable(EditorBrowsableState.Always),DefaultValue(typeof(Color), "")]
    78. public Color MouseOverBackColor
    79. {
    80. get => buttonOwner.FlatAppearance.MouseOverBackColor;
    81. set => buttonOwner.FlatAppearance.MouseOverBackColor = value;
    82. }
    84. [Browsable(true), ApplicableToButton(), NotifyParentProperty(true), EditorBrowsable(EditorBrowsableState.Always), DefaultValue(typeof(Color), "")]
    85. public string MyFancyCustomFlatAppearanceProperty
    86. {
    87. get => "Change me if you can ;)";
    88. }
    90. private readonly Button buttonOwner;
    92. public FlatButtonAppearance(Button owner) => buttonOwner = owner ?? new Button();
    93. }
    94. }


    C#-Quellcode

    1. using System.ComponentModel;
    2. using System.Windows.Forms;
    4. namespace MyButton
    5. {
    6. public class MyButton : Button
    7. {
    8. [Browsable(true), Category("Appearance"), DesignerSerializationVisibility(DesignerSerializationVisibility.Content)]
    9. public new FlatButtonAppearance FlatAppearance { get; private set; }
    11. public MyButton() : base() => FlatAppearance = new FlatButtonAppearance(this);
    12. }
    13. }

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Fakiz“ () aus folgendem Grund: Category-Attribute ergänzt

Facebook
Telefonspende