Calendar - Not Saved Event Label Color

Print Page | Close Window

Not Saved Event Label Color

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Calendar
Forum Description: Topics Related to Codejock Calendar
URL: http://forum.codejock.com/forum_posts.asp?TID=15517
Printed Date: 06 October 2024 at 5:19pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: Not Saved Event Label Color

Posted By: chavnick
Subject: Not Saved Event Label Color
Date 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