diff options
author | Rüdiger Timm <rt@openoffice.org> | 2005-01-28 14:57:48 +0000 |
---|---|---|
committer | Rüdiger Timm <rt@openoffice.org> | 2005-01-28 14:57:48 +0000 |
commit | 1d44016988dd18ffaefe4fb93daf58ac8a68edef (patch) | |
tree | 47e136526bf5854ebfc464b70e56cc356f15f947 /wizards/source | |
parent | fc5fe4c1e7d2ad33ab2d9276e88525e32907c587 (diff) |
INTEGRATION: CWS extras16 (1.25.96); FILE MERGED
2005/01/10 10:59:50 ih 1.25.96.1: #i34961# corrected fonts
Diffstat (limited to 'wizards/source')
-rw-r--r-- | wizards/source/schedule/CalendarMain.xba | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/wizards/source/schedule/CalendarMain.xba b/wizards/source/schedule/CalendarMain.xba index 338906e6f871..46e500681406 100644 --- a/wizards/source/schedule/CalendarMain.xba +++ b/wizards/source/schedule/CalendarMain.xba @@ -92,19 +92,19 @@ Dim iThisMonth as Integer .lstMonth.StringItemList() = cCalShortMonthNames() Select Case sCurLangLocale Case cLANGUAGE_JAPANESE - .lstOwnData.FontName = "HG Mincho Light J" - .txtEvent.FontName = "HG Mincho Light J" + .lstOwnData.FontName = "HG MinochoL" + .txtEvent.FontName = "HG MinchoL" Case cLANGUAGE_CHINESE If oDocument.CharLocale.Country = "CN" Then - .lstOwnData.FontName = "HG MSung Light SC" - .txtEvent.FontName = "HG MSung Light SC" + .lstOwnData.FontName = "FZ Song Ti" + .txtEvent.FontName = "FZ Song Ti" Else - .lstOwnData.FontName = "HG MSung Light TC" - .txtEvent.FontName = "HG MSung Light TC" + .lstOwnData.FontName = "FZ Ming Ti" + .txtEvent.FontName = "FZ Ming Ti" End If Case "ko" - .lstOwnData.FontName = "HG MyeongJo Light K" - .txtEvent.FontName = "HG MyeongJo Light K" + .lstOwnData.FontName = "Sun Gulim" + .txtEvent.FontName = "Sun Gulim" End Select .lstOwnEventMonth.StringItemList() = cCalShortMonthNames() .optYear.State = 1 |