COM Setting Font in Calendar

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


   Here is a small sample just for normal event in day view. As you can see
you have control over almost all fonts int he calendar so you must set
them all separately. Here is an example:

  Dim objThemeOfice2007 As CalendarThemeOffice2007
  Set objThemeOfice2007 = CalendarControl.Theme
  
  If objThemeOfice2007 Is Nothing Then Exit Sub
  
  objThemeOfice2007.BaseFont.SIZE = 14
  objThemeOfice2007.DayView.Day.Group.SingleDayEvent.Normal.Subject.Font.SIZE = 14
  objThemeOfice2007.DayView.Day.Group.SingleDayEvent.Normal.Body.Font.SIZE = 14
  objThemeOfice2007.DayView.Day.Group.SingleDayEvent.Normal.Location.Font.SIZE = 14

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
SuperMario Members Profile Send Private Message Find Members Posts Add to Buddy List Admin Group Joined: 14 February 2004 Status: Offline Points: 18057	Post Options Post Reply Quote SuperMario Report Post Thanks(0) Quote Reply Topic: COM Setting Font in Calendar Posted: 21 March 2011 at 9:16am
	Here is a small sample just for normal event in day view. As you can see you have control over almost all fonts int he calendar so you must set them all separately. Here is an example: Dim objThemeOfice2007 As CalendarThemeOffice2007 Set objThemeOfice2007 = CalendarControl.Theme If objThemeOfice2007 Is Nothing Then Exit Sub objThemeOfice2007.BaseFont.SIZE = 14 objThemeOfice2007.DayView.Day.Group.SingleDayEvent.Normal.Subject.Font.SIZE = 14 objThemeOfice2007.DayView.Day.Group.SingleDayEvent.Normal.Body.Font.SIZE = 14 objThemeOfice2007.DayView.Day.Group.SingleDayEvent.Normal.Location.Font.SIZE = 14