or
							  //some Subclasses      [Category("Detail")]     public class WorktypeInfo     {         private string _WorktypeNo;         private   string _WorktypeName;           [Category("Detail")]         public string WorktypeNo         {             get             {                 return _WorktypeNo;             }             set             {                 _WorktypeNo = value;             }           }     //used in Mainclass            [Category("Detail")]         [Description("Tätigkeitscode")]         public WorktypeInfo WorktypeInfo         {             get             {                 return _WorktypeInfo;             }             set             {                 _WorktypeInfo = value;             }         }   ... 
Private Sub LoadSupplierCombo()        Cursor = Cursors.WaitCursor        tsstatus.Text = "Loading Suppliers, please wait..."        Refresh()        '     cbSuppliers..MasterTemplate.AutoGenerateColumns = True        Dim TicketsDA As SqlDataAdapter        Dim TicketsDS As DataSet        Dim TicketsDV As DataView        Dim SQLString As String = ""        DBOpen()        Try            SQLString = "SELECT     Supplier.SupplierName AS Supplier, Supplier.SupplierAccountNo AS [Account No] " & _"FROM         SZTickets INNER JOIN " & _                     " SZTicketStatus ON SZTickets.statusId = SZTicketStatus.id INNER JOIN " & _                     " SZTicketPriority ON SZTickets.priorityId = SZTicketPriority.id INNER JOIN " & _                     " Supplier ON SZTickets.supplierId = Supplier.SupplierID " & _"GROUP BY Supplier.SupplierName, Supplier.SupplierAccountNo " & _"ORDER BY Supplier DESC"            Dim SQLcmd As New SqlCommand(SQLString, cnn1)            TicketsDA = New SqlDataAdapter(SQLcmd)            TicketsDS = New DataSet            TicketsDV = New DataView            TicketsDA.Fill(TicketsDS, "Suppliers")            TicketsDV.Table = TicketsDS.Tables("Suppliers")            cbSuppliers.DataSource = TicketsDV            SQLcmd.Dispose()            TicketsDA.Dispose()        Catch ex As Exception            g_error.DBErrorMsg("Failure to load tickets", SQLString, ex)        Finally            dgTickets.ResumeLayout()            DBClose()        End Try        Cursor = Cursors.Default        tsstatus.Text = ""        Dim columns As RadMultiColumnComboBoxElement = cbSuppliers.MultiColumnComboBoxElement        For Each column As GridViewDataColumn In columns.Columns            column.BestFit()        Next            End Sub
Hi
The above code loads my multi-column list box. However I would like to add <All Suppliers> at the beginning of the list as well as the supplier. I would like this to be the item selected on load.
Also, I cant find the equivalent command for combobox.items.clear() 
How do I remove all the items?
Cheers
Baz
for (int iRow = 0; iRow < ProductsRadGridView.Rows.Count; iRow++)
{
          for (int iCell = 2; iCell < 6; iCell++)
          {
                    if (ProductsRadGridView.Rows[iRow].Cells[iCell].Style.BackColor == Color.Red)
                    {
}
                    //valid = false;
                    //MessageBox.Show("One or more Line Item Values needs modification. Please make the necessary change.);
                    //return valid;
          }
}
However, the Style.BackColor returns some ambigous name called "ControlDarkDark". This is the value regardless of the back color.
How can I check what the back color really is?
Lee

Dim appt As IEvent = Nothingappt = GetAppointment(CLng(msSearchID))If appt IsNot Nothing Then   SchedulerUIHelper.SelectAppointment(radScheduler1, appt, True)End IfPrivate Function GetAppointment(ByVal nID As Long) As IEvent        Dim appt As IEvent = Nothing        Try            For Each a As IEvent In radScheduler1.Appointments                If a.UniqueId.KeyValue = CStr(nID) Then                    appt = a                End If            Next            Return appt        Catch ex As Exception            Return appt        End TryEnd Function



