Codejock Developer Community : Event Border Color http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Tue, 12 May 2026 23:56:24 +0000 Thu, 28 Jul 2016 03:46:14 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=23082 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[Event Border Color : I am developing in VB6 and using...]]> http://forum.codejock.com/forum_posts.asp?TID=23082&PID=74924&title=event-border-color#74924 Author: stefp76
Subject: 23082
Posted: 28 July 2016 at 3:46am

I am developing in VB6 and using Calendar v17.2

I have specified in the form load event of the form that has the calendar control

Dim pTheme2007 As CalendarThemeOffice2007
Set pTheme2007 = OrderSchedule.Theme

pTheme2007.MonthView.Day.SingleDayEvent.Normal.subject.Font.Bold = True
pTheme2007.DayView.Event.Normal.subject.Font.Size = 11
pTheme2007.DayView.Event.Normal.Location.Font.Size = 11
pTheme2007.WeekView.Event.Normal.subject.Font.Size = 11
pTheme2007.WeekView.Event.Normal.Location.Font.Size = 11
pTheme2007.MonthView.Day.SingleDayEvent.Normal.BorderColor = vbBlack

All of the theme settings are working correctly except the last one on the list

"pTheme2007.MonthView.Day.SingleDayEvent.Normal.BorderColor = vbBlack"

It's supposed to show a black border around each event but it only works for events that either don't have a label value specified or the label value = 0 - this is true for default label values and custom label values.

See screenshot below...

Is this normal behavior?  If not is there a workaround or a different method to achieve this?

PS. I am using a custom data provider (SQL) if it make a difference.

Thanks


]]> Thu, 28 Jul 2016 03:46:14 +0000 http://forum.codejock.com/forum_posts.asp?TID=23082&PID=74924&title=event-border-color#74924