diff options
| -rw-r--r-- | wizards/source/schedule/CalendarMain.xba | 4 | ||||
| -rw-r--r-- | wizards/source/schedule/DlgCalendar.xdl | 2 | ||||
| -rw-r--r-- | wizards/source/schedule/Language.xba | 1 | ||||
| -rw-r--r-- | wizards/source/schedule/dialog.xlb | 6 | ||||
| -rw-r--r-- | wizards/source/schedule/script.xlb | 20 |
5 files changed, 16 insertions, 17 deletions
diff --git a/wizards/source/schedule/CalendarMain.xba b/wizards/source/schedule/CalendarMain.xba index 46a31763b..764cc4172 100644 --- a/wizards/source/schedule/CalendarMain.xba +++ b/wizards/source/schedule/CalendarMain.xba @@ -129,11 +129,10 @@ End Sub Sub CalcmdCancel() Call CalSaveOwnData() - DlgCalendar.EndExecute 'Visible = False + DlgCalendar.EndExecute ' Visible = False End Sub - Sub CalcmdOk() ' cmdOk is called when the Button 'Read' is clicked on ' It is either given out a month or a year @@ -146,7 +145,6 @@ Dim SelYear as String UnprotectSheets(oSheets) oSheets.RemovebyName(oSheets.GetbyIndex(0).Name) iSelYear = DlgCalModel.txtYear.Value - sCurLangLocale = cLANGUAGE_CHINESE Select Case sCurLangLocale Case cLANGUAGE_GERMAN If Ubound(DlgCalModel.lstHolidays.SelectedItems()) > -1 Then diff --git a/wizards/source/schedule/DlgCalendar.xdl b/wizards/source/schedule/DlgCalendar.xdl index 4038d9167..9817ad87e 100644 --- a/wizards/source/schedule/DlgCalendar.xdl +++ b/wizards/source/schedule/DlgCalendar.xdl @@ -17,7 +17,7 @@ <script:event script:event-name="on-performaction" script:location="application" script:macro-name="Schedule.CalendarMain.CalChooseCalendar" script:language="StarBasic"/> </dlg:radio> </dlg:radiogroup> - <dlg:text dlg:id="lblHolidays" dlg:tab-index="4" dlg:left="6" dlg:top="6" dlg:width="87" dlg:height="8" dlg:page="1" dlg:value="lblHolidays"/> + <dlg:text dlg:id="lblHolidays" dlg:tab-index="4" dlg:left="6" dlg:top="6" dlg:width="96" dlg:height="8" dlg:page="1" dlg:value="lblHolidays"/> <dlg:img dlg:style-id="0" dlg:id="imgCountry" dlg:tab-index="5" dlg:left="106" dlg:top="6" dlg:width="95" dlg:height="113" dlg:page="1" dlg:help-url="HID:34701"> <script:event script:event-name="on-mousedown" script:location="application" script:macro-name="Schedule.DlgControl.SelectState" script:language="StarBasic"/> <script:event script:event-name="on-mouseout" script:location="application" script:macro-name="Schedule.DlgControl.MouseLeavesImage" script:language="StarBasic"/> diff --git a/wizards/source/schedule/Language.xba b/wizards/source/schedule/Language.xba index 07a55f25c..6a7b6d0a1 100644 --- a/wizards/source/schedule/Language.xba +++ b/wizards/source/schedule/Language.xba @@ -65,6 +65,7 @@ Const dlgShortMonth = 1225 .cmdGoOn.Label = GetResText(1004) .lblHolidays.Label = GetResText(1014) sBitmapFilename = GetResText(1099) +' sBitmapFilename = "china.bmp" DlgCalModel.hlnCalendar.Label = GetResText(1006) .optYear.Label = GetResText(1007) .optMonth.Label = GetResText(1008) diff --git a/wizards/source/schedule/dialog.xlb b/wizards/source/schedule/dialog.xlb index b1afde681..7bfcb7db9 100644 --- a/wizards/source/schedule/dialog.xlb +++ b/wizards/source/schedule/dialog.xlb @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="UTF-8"?> <!DOCTYPE library:library PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "library.dtd"> -<library:library xmlns:library="http://openoffice.org/2000/library" library:name="Schedule" library:readonly="true" library:passwordprotected="false"> - <library:element library:name="DlgCalendar"/> -</library:library> + <library:library xmlns:library="http://openoffice.org/2000/library" library:name="Schedule" library:readonly="false" library:passwordprotected="false"> + <library:element library:name="DlgCalendar"/> + </library:library>
\ No newline at end of file diff --git a/wizards/source/schedule/script.xlb b/wizards/source/schedule/script.xlb index 96dd8da57..aec0ed4a4 100644 --- a/wizards/source/schedule/script.xlb +++ b/wizards/source/schedule/script.xlb @@ -1,12 +1,12 @@ <?xml version="1.0" encoding="UTF-8"?> <!DOCTYPE library:library PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "library.dtd"> -<library:library xmlns:library="http://openoffice.org/2000/library" library:name="Schedule" library:readonly="true" library:passwordprotected="false"> - <library:element library:name="OwnEvents"/> - <library:element library:name="CalendarMain"/> - <library:element library:name="BankHoliday"/> - <library:element library:name="DlgControl"/> - <library:element library:name="Language"/> - <library:element library:name="CreateTable"/> - <library:element library:name="GermanHolidays"/> - <library:element library:name="LocalHolidays"/> -</library:library> + <library:library xmlns:library="http://openoffice.org/2000/library" library:name="Schedule" library:readonly="false" library:passwordprotected="false"> + <library:element library:name="OwnEvents"/> + <library:element library:name="CalendarMain"/> + <library:element library:name="BankHoliday"/> + <library:element library:name="DlgControl"/> + <library:element library:name="Language"/> + <library:element library:name="CreateTable"/> + <library:element library:name="GermanHolidays"/> + <library:element library:name="LocalHolidays"/> + </library:library>
\ No newline at end of file |