public void SetArraySource()
{
RadioGroupCellType radio = new RadioGroupCellType();
radio.ItemsSource = new string[] { "Alice", "Robert", "Ken", "Alen" };
gcSpreadGrid1[0, 0].CellType = radio;
}
public void SetItemsSource()
{
RadioGroupCellType radio = new RadioGroupCellType();
radio.ItemsSource = new NameList();
radio.DisplayMemberPath = "FirstName";
radio.SelectedValuePath = "LastName";
gcSpreadGrid1[0, 0].CellType = radio;
}
public class NameList : ObservableCollection<PersonName>
{
public NameList()
: base()
{
Add(new PersonName("Alice", "Cather"));
Add(new PersonName("Robert", "Dinesen"));
Add(new PersonName("Ken", "Hugo"));
Add(new PersonName("Alen", "Verne"));
}
}
public class PersonName
{
private string firstName;
private string lastName;
public PersonName(string first, string last)
{
this.firstName = first;
this.lastName = last;
}
public string FirstName
{
get { return firstName; }
set { firstName = value; }
}
public string LastName
{
get { return lastName; }
set { lastName = value; }
}
}
Public Sub SetArraySource()
Dim radio As New RadioGroupCellType()
radio.ItemsSource = New String() {"Alice", "Robert", "Ken", "Alen"}
gcSpreadGrid1(0, 0).CellType = radio
End Sub
Public Sub SetItemsSource()
Dim radio As New RadioGroupCellType()
radio.ItemsSource = New NameList()
radio.DisplayMemberPath = "FirstName"
radio.SelectedValuePath = "LastName"
gcSpreadGrid1(0, 0).CellType = radio
End Sub
Public Class NameList
Inherits ObservableCollection(Of PersonName)
Public Sub New()
MyBase.New()
Add(New PersonName("Alice", "Cather"))
Add(New PersonName("Robert", "Dinesen"))
Add(New PersonName("Ken", "Hugo"))
Add(New PersonName("Alen", "Verne"))
End Sub
End Class
Public Class PersonName
Private m_firstName As String
Private m_lastName As String
Public Sub New(first As String, last As String)
Me.m_firstName = first
Me.m_lastName = last
End Sub
Public Property FirstName() As String
Get
Return m_firstName
End Get
Set(value As String)
m_firstName = value
End Set
End Property
Public Property LastName() As String
Get
Return m_lastName
End Get
Set(value As String)
m_lastName = value
End Set
End Property
End Class