Not Saved Event Label Color

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

    Dim pLabel As CalendarEventLabel
I have put the following code on Form_Load event but when I run the sample 
althoughI can choose on the compo the following names and colors 
only the names are saved not the colors of the Labels.
What's wrong?

      Dim pLabel As CalendarEventLabel
     frmMain.CalendarControl.DataProvider.LabelList.Item(0).Name = "GENERAL"
     frmMain.CalendarControl.DataProvider.LabelList.Item(10).Name = "FIXED"
     frmMain.CalendarControl.DataProvider.LabelList.Item(2).Name = "FILLINGS"
     frmMain.CalendarControl.DataProvider.LabelList.Item(5).Name = "IMPLANTS"
     frmMain.CalendarControl.DataProvider.LabelList.Item(3).Name = "ENDO"
     frmMain.CalendarControl.DataProvider.LabelList.Item(4).Name = "ENDO FINAL"
     frmMain.CalendarControl.DataProvider.LabelList.Item(9).Name = "VISITOR"
     frmMain.CalendarControl.DataProvider.LabelList.Item(1).Name = "REMOVABLE"
     frmMain.CalendarControl.DataProvider.LabelList.Item(8).Name = "PERIO"
     frmMain.CalendarControl.DataProvider.LabelList.Item(6).Name = "PLAN"
     frmMain.CalendarControl.DataProvider.LabelList.Item(7).Name = "SURGICAL"

    For Each pLabel In frmMain.CalendarControl.DataProvider.LabelList
        cmbLabel.AddItem pLabel.Name
        cmbLabel.ItemData(cmbLabel.NewIndex) = pLabel.LabelID

    Next
      frmMain.CalendarControl.Populate

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
chavnick Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 23 October 2009 Location: Greece Status: Offline Points: 2	Post Options Post Reply Quote chavnick Report Post Thanks(0) Quote Reply Topic: Not Saved Event Label Color Posted: 01 November 2009 at 7:45am
	Dim pLabel As CalendarEventLabel I have put the following code on Form_Load event but when I run the sample althoughI can choose on the compo the following names and colors only the names are saved not the colors of the Labels. What's wrong? Dim pLabel As CalendarEventLabel frmMain.CalendarControl.DataProvider.LabelList.Item(0).Name = "GENERAL" frmMain.CalendarControl.DataProvider.LabelList.Item(10).Name = "FIXED" frmMain.CalendarControl.DataProvider.LabelList.Item(2).Name = "FILLINGS" frmMain.CalendarControl.DataProvider.LabelList.Item(5).Name = "IMPLANTS" frmMain.CalendarControl.DataProvider.LabelList.Item(3).Name = "ENDO" frmMain.CalendarControl.DataProvider.LabelList.Item(4).Name = "ENDO FINAL" frmMain.CalendarControl.DataProvider.LabelList.Item(9).Name = "VISITOR" frmMain.CalendarControl.DataProvider.LabelList.Item(1).Name = "REMOVABLE" frmMain.CalendarControl.DataProvider.LabelList.Item(8).Name = "PERIO" frmMain.CalendarControl.DataProvider.LabelList.Item(6).Name = "PLAN" frmMain.CalendarControl.DataProvider.LabelList.Item(7).Name = "SURGICAL" For Each pLabel In frmMain.CalendarControl.DataProvider.LabelList cmbLabel.AddItem pLabel.Name cmbLabel.ItemData(cmbLabel.NewIndex) = pLabel.LabelID Next frmMain.CalendarControl.Populate