<?xml version="1.0" encoding="UTF-8" ?>
<?xml-stylesheet type="text/xsl" href="https://www.dotnetzone.gr:443/cs/utility/FeedStylesheets/rss.xsl" media="screen"?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:slash="http://purl.org/rss/1.0/modules/slash/" xmlns:wfw="http://wellformedweb.org/CommentAPI/"><channel><title>WinForms</title><link>https://www.dotnetzone.gr:443/cs/forums/12/ShowForum.aspx</link><description>Θέματα για rich client / windows εφαρμογές, σε οποιαδήποτε γλώσσα (VB.NET, C#, managed C++, κ.α.)</description><dc:language>el</dc:language><generator>CommunityServer 2.1 SP3 (Build: 20423.1)</generator><item><title>Databinding checkbox και otionbutton group</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/15273.aspx</link><pubDate>Fri, 28 Jul 2006 00:38:48 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:15273</guid><dc:creator>nts</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/15273.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=15273</wfw:commentRss><description>Γειά σας,
προσπαθώ να κάνω κάτι φαινομενικά απλό.
&lt;br&gt;να συνδέσω ένα checkbox και ένα radiobutton group με τα αντίστοιχα πεδία του dataset.
&lt;br&gt;χρησιμοποιώ τις format και parse για να μετατρέψω τις τιμές 0 και 1 σε false true και τις τιμές 1,2,3... σε επιλογές των optionbuttons του group
&lt;br&gt;έχω προσπαθήσει από τα απλά ώς πιο περίπλοκα χωρίς όμως σωστό αποτέλεσμα.
&lt;br&gt;το ίδιο πρόβλημα είχα και με το combobox για το οποίο βρήκα επιτέλους κάτι που δουλεύει γιαυτό αν και δεν μ'αρέσει δεν το αγγίζω

    &lt;br&gt;&lt;br&gt;Friend Sub ByteToUIComboValue(ByVal sender As Object, ByVal e As ConvertEventArgs)
        &lt;br&gt;Try&lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; If e.Value Is System.DBNull.Value Then&lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; Exit Sub
            &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Else
                &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; Dim c As ComboBox
                c = sender.control
                &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; Dim v As Byte = e.Value&lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; For Each i As ComboBoxItem In c.Items
                    &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; If i.Value = v Then
                        &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; e.Value = i.Text&lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; End If
                &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp; Next
            &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; End If
        &lt;br&gt;Catch ex As Exception&lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; MsgBox(ex.Message)
        &lt;br&gt;End Try&lt;br&gt;&amp;nbsp;&lt;br&gt;End Sub

    &lt;br&gt;&lt;br&gt;Friend Sub UIComboValueToByte(ByVal sender As Object, ByVal e As ConvertEventArgs)
        &lt;br&gt;Try
            &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim c As ComboBox
            &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; c = sender.control

            &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; e.Value = c.SelectedItem.Value
        &lt;br&gt;Catch ex As Exception
            &lt;br&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp; MsgBox(ex.Message)
        &lt;br&gt;End Try
    &lt;br&gt;End Sub

&lt;br&gt;&lt;br&gt;υπάρχει πουθενά κανένα δείγμα κώδικα???
&lt;br&gt;&lt;br&gt;το δείγμα στα 101 παραγείγματα της ms δεν με βοήθησαν ιδιαίτερα γιατί δοκιμάσα το checkbox και δεν παίζει.

&lt;br&gt;&lt;br&gt;ευχαριστώ&lt;br&gt;&lt;br&gt;</description></item></channel></rss>