123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150 |
- <?xml version="1.0" encoding="UTF-8"?>
- <!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
- <!--
- * This file is part of the LibreOffice project.
- *
- * This Source Code Form is subject to the terms of the Mozilla Public
- * License, v. 2.0. If a copy of the MPL was not distributed with this
- * file, You can obtain one at http://mozilla.org/MPL/2.0/.
- *
- * This file incorporates work covered by the following license notice:
- *
- * Licensed to the Apache Software Foundation (ASF) under one or more
- * contributor license agreements. See the NOTICE file distributed
- * with this work for additional information regarding copyright
- * ownership. The ASF licenses this file to you under the Apache
- * License, Version 2.0 (the "License"); you may not use this file
- * except in compliance with the License. You may obtain a copy of
- * the License at http://www.apache.org/licenses/LICENSE-2.0 .
- -->
- <script:module xmlns:script="http://openoffice.org/2000/script" script:name="Language" script:language="StarBasic">Option Explicit
- Public sMSTemplateCheckbox(2) As String
- Public sMSDocumentCheckbox(2) As String
- Public sTemplateCheckbox(SBMAXAPPLCOUNT-1) As String
- Public sDocumentCheckbox(SBMAXAPPLCOUNT-1) As String
- Public sTemplateGroupName As String
- Public sSearchInSubDir as String
- Public sPathErrorTemplates(SBMAXAPPLCOUNT-1) As String
- Public sPathErrorDocument(SBMAXAPPLCOUNT-1) As String
- Public sPathErrorStarDoc(SBMAXAPPLCOUNT-1) As String
- Public sStarDocLabel(SBMAXAPPLCOUNT-1) As String
- Public sImportLabel As String, sExportLabel As String
- Public SOApplicationName(5) As String
- Public sHelpButton As String, sCancelButton As String, sBackButton As String, sNextButton As String
- Public sSumInclusiveSubDir As String, sSumSaveDocuments As String
- Public sSummaryHeader As String
- Public sWelcometextLabel1 As String, sWelcometextLabel3 As String
- Public sBeginButton As String, sMsgDirNotThere As String
- Public sQueryForNewCreation As String, sPathError3 As String
- Public sNoDirCreation As String
- Public sProgressMoreDocs As String, sProgressMoreTemplates as String
- Public sFileExists As String, sMorePathsError3 As String
- Public sConvertError1 As String, sConvertError2 As String, sPathDialogMessage As String
- Public sRTErrorDesc As String, sRTErrorHeader As String
- Public sProgressPage_1 As String, sProgressPage_2 As String, sProgressPage_3 as String
- Public sProgressFound as String, sProgresspage_5 as String
- Public sContainerName(1) as String
- Public sReady as String, sTitle as String
- Public sCloseButton as String
- Public sSourceDocuments as String
- Public sTargetDocuments as String
- Public sSumMSDocuments(3) as String
- Public sSumMSTemplates(3) as String
- Public ModuleList(3) as String
- Public sLogSummary as String
- Public sReeditMacro as String
- Public sOverwriteallFiles as String
- Public sCouldnotopenDocument as String
- Public sCurcouldnotopenDocument as String
- Public sCouldnotsaveDocument as String
- Public sCurcouldnotsaveDocument as String
- Sub LoadLanguage()
- If InitResources("ImportWizard") then
- sHelpButton = GetResText("HelpButton")
- sCancelButton = GetResText("CancelButton")
- sBackButton = GetResText("BackButton")
- sNextButton = GetResText("NextButton")
- sBeginButton = GetResText("BeginButton")
- sCloseButton = GetResText("CloseButton")
- sWelcometextLabel1 = ReplaceString(GetResText("WelcometextLabel1"), GetProductName(),"%PRODUCTNAME")
- sWelcometextLabel3 = GetResText("WelcometextLabel3")
- ' Microsoft Documents
- sMSTemplateCheckBox(0) = GetResText("MSTemplateCheckbox_1_")
- sMSTemplateCheckBox(1) = GetResText("MSTemplateCheckbox_2_")
- sMSTemplateCheckBox(2) = GetResText("MSTemplateCheckbox_3_")
- ' DocumentCheckbox- Captions
- sMSDocumentCheckBox(0) = GetResText("MSDocumentCheckbox_1_")
- sMSDocumentCheckBox(1) = GetResText("MSDocumentCheckbox_2_")
- sMSDocumentCheckBox(2) = GetResText("MSDocumentCheckbox_3_")
- 'StarOffice Applicationnames
- sContainerName(0) = GetResText("MSContainerName")
- sSummaryHeader = GetResText("SummaryHeader")
- sTemplateGroupName = GetResText("GroupnameDefault")
- sProgressMoreDocs = GetResText("ProgressMoreDocs")
- sProgressMoreTemplates = GetResText("ProgressMoreTemplates")
- sNoDirCreation = GetResText("NoDirCreation")
- sMsgDirNotThere = GetResText("MsgDirNotThere")
- sQueryForNewCreation = GetResText("QueryfornewCreation")
- sFileExists = GetResText("FileExists")
- sMorePathsError3 = GetResText("MorePathsError3")
- sConvertError1 = GetResText("ConvertError1")
- sConvertError2 = GetResText("ConvertError2")
- sRTErrorDesc = GetResText("RTErrorDesc")
- sRTErrorHeader = GetResText("RTErrorHeader")
- sOverwriteallFiles = GetResText("OverwriteallFiles")
- sReeditMacro = GetResText("ReeditMacro")
- sCouldnotsaveDocument = GetResText("CouldNotsaveDocument")
- sCouldnotopenDocument = GetResText("CouldNotopenDocument")
- sPathDialogMessage = GetResText("PathDialogMessage")
- sTitle = GetResText("DialogTitle")
- sProgressPage_1 = GetResText("ProgressPage1")
- sProgressPage_2 = GetResText("ProgressPage2")
- sProgressPage_3 = GetResText("ProgressPage3")
- sProgressFound = GetResText("ProgressFound")
- sProgressPage_5 = GetResText("ProgressPage5")
- sReady = GetResText("Ready")
- sSourceDocuments = GetResText("SourceDocuments")
- sTargetDocuments = GetResText("TargetDocuments")
- sLogSummary = GetResText("LogfileSummary")
- sSumInclusiveSubDir = GetResText("SumInclusiveSubDir")
- sSumSaveDocuments = GetResText("SumSaveDokumente")
- sSumMSDocuments(0) = GetResText("SumMSTextDocuments")
- sSumMSDocuments(1) = GetResText("SumMSTableDocuments")
- sSumMSDocuments(2) = GetResText("SumMSDrawDocuments")
- sSumMSTemplates(0) = GetResText("SumMSTextTemplates")
- sSumMSTemplates(1) = GetResText("SumMSTableTemplates")
- sSumMSTemplates(2) = GetResText("SumMSDrawTemplates")
- With ImportDialog
- sImportLabel = GetResText("TextImportLabel")
- sExportLabel = GetResText("TextExportLabel")
- sSearchInSubDir = GetResText("SearchInSubDir")
- .chkTemplateSearchSubDir.Label = sSearchInSubDir
- .lblDocumentImport.Label = sImportLabel
- .lblDocumentExport.Label = sExportLabel
- .chkDocumentSearchSubDir.Label = sSearchInSubDir
- .lblTemplateImport.Label = sImportLabel
- .lblTemplateExport.Label = sExportLabel
- .chkLogfile.Label = GetResText("CreateLogfile")
- .chkLogfile.Helptext = GetResText("LogfileHelpText")
- .cmdShowLogFile.Label = GetResText("ShowLogfile")
- End With
- ModuleList(0) = "com.sun.star.text.TextDocument"
- ModuleList(1) = "com.sun.star.sheet.SpreadsheetDocument"
- ModuleList(2) = "com.sun.star.drawing.DrawingDocument/com.sun.star.presentation.PresentationDocument"
- ModuleList(3) = "com.sun.star.formula.FormulaProperties/com.sun.star.text.GlobalDocument"
- End If
- End Sub
- </script:module>
|