How to change all of font name
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=19339
Printed Date: 31 May 2025 at 7:01am
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com
Topic: How to change all of font name
Posted By: Norika
Subject: How to change all of font name
Date Posted: 20 December 2011 at 11:18pm
|
Hi,
I want to change all font name to "MS UI Gothic" of a CalendarControl for Japanese users but some part of CalenderControl cannot change.
Do you know how to change the font of below parts?
Private Sub Form_Load()
Dim objThemeOfice2007 As CalendarThemeOffice2007
Set objThemeOfice2007 = CalendarControl.Theme objThemeOfice2007.BaseFont.Name = "MS UI Gothic" objThemeOfice2007.BaseFont.SIZE = 12 objThemeOfice2007.BaseFont.Charset = 128 'Japanese objThemeOfice2007.DayView.Event.Normal.Subject.Font.Name = "MS UI Gothic" objThemeOfice2007.DayView.Event.Normal.Subject.Font.SIZE = 12 objThemeOfice2007.DayView.Event.Normal.Subject.Font.Charset = 128 'Japanese objThemeOfice2007.Header.TextCenter.Normal.Font.Name = "MS UI Gothic" objThemeOfice2007.Header.TextLeftRight.Normal.Font.Name = "MS UI Gothic" objThemeOfice2007.Header.TextLeftRight.Normal.Font.Charset = 128 'Japanese objThemeOfice2007.MonthView.Header.TextCenter.Normal.Font.Name = "MS UI Gothic" objThemeOfice2007.MonthView.Event.Normal.Subject.Font.Name = "MS UI Gothic" objThemeOfice2007.MonthView.Event.Normal.Subject.Font.Charset = 128 'Japanese CalendarControl.SetTheme objThemeOfice2007 ---
OS: Windows XP
IDE: Visual Studio 6.0 with SP6
Product Version: Xtreme Suite ActiveX v15.2.1
 |