RE: [aus-dotnet] Colour Enumeration


    [Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
    • From: Bill Tinker
    • Subject: RE: [aus-dotnet] Colour Enumeration
    • Date: Thu, 5 Jun 2003 10:27:12 +1000

    
    ----boundary-LibPST-iamunique-1802491982_-_-
    Content-type: text/plain
    
    Thanks Roger
    
    I can use this. Interestingly, the list shows the system colors first, then
    the color colors.
    
    Bill
    
    -----Original Message-----
    From: dotnet-owner@xxxxxxxxxxx [mailto:dotnet-owner@xxxxxxxxxxx]On
    Behalf Of Roger Curtain
    Sent: Thursday, 5 June 2003 8:56 AM
    To: dotnet@xxxxxxxxxxx
    Subject: [aus-dotnet] Colour Enumeration
    
    
        The topic of enumerating the named colours was discussed at the Ausdev
    conference. The following is one solution.
    
    Regards Roger
    
       Private Sub Form1_Load(ByVal sender As Object, ByVal e As
    System.EventArgs) Handles MyBase.Load
            Dim colourName As String
            For Each colourName In [Enum].GetNames(GetType(KnownColor))
                ComboBox1.Items.Add(colourName)
            Next
        End Sub
    
        Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As
    System.Object, ByVal e As System.EventArgs) Handles
    ComboBox1.SelectedIndexChanged
            Panel1.BackColor = Color.FromName(ComboBox1.Text)
        End Sub
    End Class
    
    _________________
    You are a part of the Australian "dotnet" mailing list.
    To unsubscribe send "unsubscribe dotnet" or to re-subscribe send "subscribe
    dotnet Your Name" in the body of the email to: imailsrv@xxxxxxxxxxx
    List managed by: http://www.stanski.com
    
    _________________
    You are a part of the Australian "dotnet" mailing list.
    To unsubscribe send "unsubscribe dotnet" or to re-subscribe send "subscribe dotnet Your Name" in the body of the email to: imailsrv@xxxxxxxxxxx
    List managed by: http://www.stanski.com
    
    ----boundary-LibPST-iamunique-1802491982_-_-
    Content-type: application/rtf
    Content-transfer-encoding: base64
    Content-Disposition: attachment; filename="rtf-body.rtf"
    
    e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
    d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
    c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
    b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
    cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIFRoYW5rcyBSb2dlclxwYXINClxwYXINCkkgY2Fu
    IHVzZSB0aGlzLiBJbnRlcmVzdGluZ2x5LCB0aGUgbGlzdCBzaG93cyB0aGUgc3lzdGVtIGNvbG9y
    cyBmaXJzdCwgdGhlblxwYXINCnRoZSBjb2xvciBjb2xvcnMuXHBhcg0KXHBhcg0KQmlsbFxwYXIN
    ClxwYXINCi0tLS0tT3JpZ2luYWwgTWVzc2FnZS0tLS0tXHBhcg0KRnJvbTogZG90bmV0LW93bmVy
    QHN0YW5za2kuY29tIFttYWlsdG86ZG90bmV0LW93bmVyQHN0YW5za2kuY29tXU9uXHBhcg0KQmVo
    YWxmIE9mIFJvZ2VyIEN1cnRhaW5ccGFyDQpTZW50OiBUaHVyc2RheSwgNSBKdW5lIDIwMDMgODo1
    NiBBTVxwYXINClRvOiBkb3RuZXRAc3RhbnNraS5jb21ccGFyDQpTdWJqZWN0OiBbYXVzLWRvdG5l
    dF0gQ29sb3VyIEVudW1lcmF0aW9uXHBhcg0KXHBhcg0KXHBhcg0KICAgIFRoZSB0b3BpYyBvZiBl
    bnVtZXJhdGluZyB0aGUgbmFtZWQgY29sb3VycyB3YXMgZGlzY3Vzc2VkIGF0IHRoZSBBdXNkZXZc
    cGFyDQpjb25mZXJlbmNlLiBUaGUgZm9sbG93aW5nIGlzIG9uZSBzb2x1dGlvbi5ccGFyDQpccGFy
    DQpSZWdhcmRzIFJvZ2VyXHBhcg0KXHBhcg0KICAgUHJpdmF0ZSBTdWIgRm9ybTFfTG9hZChCeVZh
    bCBzZW5kZXIgQXMgT2JqZWN0LCBCeVZhbCBlIEFzXHBhcg0KU3lzdGVtLkV2ZW50QXJncykgSGFu
    ZGxlcyBNeUJhc2UuTG9hZFxwYXINCiAgICAgICAgRGltIGNvbG91ck5hbWUgQXMgU3RyaW5nXHBh
    cg0KICAgICAgICBGb3IgRWFjaCBjb2xvdXJOYW1lIEluIFtFbnVtXS5HZXROYW1lcyhHZXRUeXBl
    KEtub3duQ29sb3IpKVxwYXINCiAgICAgICAgICAgIENvbWJvQm94MS5JdGVtcy5BZGQoY29sb3Vy
    TmFtZSlccGFyDQogICAgICAgIE5leHRccGFyDQogICAgRW5kIFN1YlxwYXINClxwYXINCiAgICBQ
    cml2YXRlIFN1YiBDb21ib0JveDFfU2VsZWN0ZWRJbmRleENoYW5nZWQoQnlWYWwgc2VuZGVyIEFz
    XHBhcg0KU3lzdGVtLk9iamVjdCwgQnlWYWwgZSBBcyBTeXN0ZW0uRXZlbnRBcmdzKSBIYW5kbGVz
    XHBhcg0KQ29tYm9Cb3gxLlNlbGVjdGVkSW5kZXhDaGFuZ2VkXHBhcg0KICAgICAgICBQYW5lbDEu
    QmFja0NvbG9yID0gQ29sb3IuRnJvbU5hbWUoQ29tYm9Cb3gxLlRleHQpXHBhcg0KICAgIEVuZCBT
    dWJccGFyDQpFbmQgQ2xhc3NccGFyDQpccGFyDQpfX19fX19fX19fX19fX19fX1xwYXINCllvdSBh
    cmUgYSBwYXJ0IG9mIHRoZSBBdXN0cmFsaWFuICJkb3RuZXQiIG1haWxpbmcgbGlzdC5ccGFyDQpU
    byB1bnN1YnNjcmliZSBzZW5kICJ1bnN1YnNjcmliZSBkb3RuZXQiIG9yIHRvIHJlLXN1YnNjcmli
    ZSBzZW5kICJzdWJzY3JpYmVccGFyDQpkb3RuZXQgWW91ciBOYW1lIiBpbiB0aGUgYm9keSBvZiB0
    aGUgZW1haWwgdG86IGltYWlsc3J2QHN0YW5za2kuY29tXHBhcg0KTGlzdCBtYW5hZ2VkIGJ5OiBo
    dHRwOi8vd3d3LnN0YW5za2kuY29tXHBhcg0KXHBhcg0KX19fX19fX19fX19fX19fX19ccGFyDQpZ
    b3UgYXJlIGEgcGFydCBvZiB0aGUgQXVzdHJhbGlhbiAiZG90bmV0IiBtYWlsaW5nIGxpc3QuXHBh
    cg0KVG8gdW5zdWJzY3JpYmUgc2VuZCAidW5zdWJzY3JpYmUgZG90bmV0IiBvciB0byByZS1zdWJz
    Y3JpYmUgc2VuZCAic3Vic2NyaWJlIGRvdG5ldCBZb3VyIE5hbWUiIGluIHRoZSBib2R5IG9mIHRo
    ZSBlbWFpbCB0bzogaW1haWxzcnZAc3RhbnNraS5jb21ccGFyDQpMaXN0IG1hbmFnZWQgYnk6IGh0
    dHA6Ly93d3cuc3RhbnNraX19AC84LjExLjYp
    
    
    ----boundary-LibPST-iamunique-1802491982_-_---
    
    
    



    (Click here for more information on the aus-dotnet mailling list)