2020-04-23 14:15:18 +02:00
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Translations" script:language="StarBasic" script:moduleType="normal">
2020-05-04 14:28:39 +02:00
Function getTranslation(identifier As String) As String
Globalscope.BasicLibraries.LoadLibrary( "Tools" )
Dim lang As String
lang = GetStarOfficeLocale().Language
2020-04-23 14:15:18 +02:00
Select Case lang
Case "ru"
getTranslation = getRussian(identifier)
Exit Function
Case Else
getTranslation = getEnglish(identifier)
Exit Function
End Select
End Function
Function getRussian(identifier As String) As String
2020-05-04 14:28:39 +02:00
Select Case identifier
Case "noFileWithStylesFound"
getRussian = "Файл-шаблон, содержащий стили для загрузки в документ не был задан. " & chr(10) &"Вы можете выбрать новый файл-шаблон. " & chr(10) & "Если файл-шаблон не будет выбран, то данный этап чистки будет пропущен."
Exit Function
Case "startQuietCleaningDescription"
getRussian = "Вы хотите запустить чистку документа? " & chr(10) & "Здесь Вы можете также указать новый файл-шаблон." & chr(10) & "Стили из шаблона будут загружены в документ."
Exit Function
Case "buttonYes"
getRussian = "Да"
Exit Function
Case "quietStartCleaningTitle"
getRussian = "Подтверждение запуска чистки"
Exit Function
Case "noStylesFileDialogTitle"
getRussian = "Файл с о
Exit Function
Case "buttonTemplateNotFoundSkip"
getRussian = "Продолжить"
Exit Function
Case "buttonStop"
getRussian = "Нет"
Exit Function
Case "buttonLoad"
getRussian = "Указать шаблон"
Exit Function
2020-04-23 14:15:18 +02:00
Case "buttonNameToSelectFileWithStyles"
2020-05-04 14:28:39 +02:00
getRussian = "Указать файл"
Exit Function
2020-04-23 14:55:56 +02:00
Case "cleaningFinished"
2020-05-04 14:28:39 +02:00
getRussian = "Чистка завершена"
Exit Function
Case "advancedMenuDialogTitle"
getRussian = "Чистка в экспертном режиме "
Exit Function
Case "buttonCancel"
getRussian = "Отмена"
Exit Function
Case "buttonOK"
getRussian = "Запуск"
Exit Function
Case "advancedMenuRemoveBasic"
getRussian = "Удалить макросы из файла"
Exit Function
Case "advancedMenuRemoveManualPageBreaks"
getRussian = "Удалить ручные разрывы страниц"
Exit Function
Case "advancedMenuLoadStandardStyles"
getRussian = "Загрузить стили из шаблона"
Exit Function
Case "advancedMenuRemovePageStyles"
getRussian = "Удалить пользовательские стили страниц"
Exit Function
Case "advancedMenuRemoveInitPageBreak"
getRussian = "Удалить разрыв страницы в начале документа"
Exit Function
Case "advancedMenuFixMistakes"
getRussian = "Исправить часто встречающиеся ошибки"
Exit Function
Case "advancedMenuConfigAnchors"
getRussian = "Настроить привязки изображений для электронных публикаций"
Exit Function
Case "advancedMenuConfigTables"
getRussian = "Настроить таблицы для электронных публикаций"
Exit Function
Case "advancedMenuRemoveBookmarks"
getRussian = "Удалить закладки"
Exit Function
Case "advancedMenuRemoveLinks"
getRussian = "Удалить ссылки"
Exit Function
Case "advancedMenuRemoveUnusedStyles"
getRussian = "Удалить неиспользуемые стили"
Exit Function
Case "advancedMenuReplaceWhiteBackground"
getRussian = "Заменить белый фон символов на прозрачный"
Exit Function
Case "advancedMenuCleanFormatting"
getRussian = "Очистить форматирование"
Exit Function
Case "advancedMenuSymbolsConversion"
getRussian = "Произвести конвертацию символов"
Exit Function
Case "advancedMenuReplaceFontsInStyles"
getRussian = "Заменить шрифты стилях"
Exit Function
2020-04-23 14:15:18 +02:00
Case Else
2020-05-04 14:28:39 +02:00
getRussian = "Перевод не найден"
2020-04-23 14:15:18 +02:00
End Select
End Function
Function getEnglish(identifier As String) As String
Select Case identifier
2020-05-04 14:28:39 +02:00
Case "noFileWithStylesFound"
getEnglish = "Template with styles wasn't found. You can choose template on your computer." & chr(10) &" This stage of cleaning will be skipped if no file chosen."
Exit Function
Case "startQuietCleaningDescription"
getEnglish = "Do you want to start document cleaning?" & chr(10) & "You can choose template with styles." & chr(10) & "Styles will be loaded in process of cleaning."
Exit Function
Case "buttonYes"
getEnglish = "Ok"
Exit Function
Case "quietStartCleaningTitle"
getEnglish = "Confirmation"
Exit Function
Case "noStylesFileDialogTitle"
getEnglish = "Template file not found"
Exit Function
2020-04-23 14:33:18 +02:00
Case "buttonTemplateNotFoundSkip"
2020-05-04 14:28:39 +02:00
getEnglish = "Proceed"
Exit Function
Case "buttonStop"
getEnglish = "Cancel"
Exit Function
Case "buttonLoad"
getEnglish = "Set template"
Exit Function
2020-04-23 14:15:18 +02:00
Case "buttonNameToSelectFileWithStyles"
2020-05-04 14:28:39 +02:00
getEnglish = "Select file"
Exit Function
2020-04-23 14:55:56 +02:00
Case "cleaningFinished"
2020-05-04 14:28:39 +02:00
getEnglish = "Cleaning is completed"
Exit Function
Case "advancedMenuDialogTitle"
getEnglish = "Advanced cleaning"
Exit Function
Case "buttonCancel"
getEnglish = "Cancel"
Exit Function
Case "buttonOK"
getEnglish = "Start"
Exit Function
Case "advancedMenuRemoveBasic"
getEnglish = "Remove macro from file"
Exit Function
Case "advancedMenuRemoveManualPageBreaks"
getEnglish = "Remove manual page breaks"
Exit Function
Case "advancedMenuLoadStandardStyles"
getEnglish = "Load styles from template"
Exit Function
Case "advancedMenuRemovePageStyles"
getEnglish = "Remove custom page styles"
Exit Function
Case "advancedMenuRemoveInitPageBreak"
getEnglish = "Remove page break at document start"
Exit Function
Case "advancedMenuFixMistakes"
getEnglish = "Remove frequent mistakes"
Exit Function
Case "advancedMenuConfigAnchors"
getEnglish = "Configure image anchors for digital publications"
Exit Function
Case "advancedMenuConfigTables"
getEnglish = "Configure tables for digital publications"
Exit Function
Case "advancedMenuRemoveBookmarks"
getEnglish = "Remove bookmarks"
Exit Function
Case "advancedMenuRemoveLinks"
getEnglish = "Remove links"
Exit Function
Case "advancedMenuRemoveUnusedStyles"
getEnglish = "Remove unused styles"
Exit Function
Case "advancedMenuReplaceWhiteBackground"
getEnglish = "Replace white symbol back with transparent"
Exit Function
Case "advancedMenuCleanFormatting"
getEnglish = "Clean manual formatting"
Exit Function
Case "advancedMenuSymbolsConversion"
getEnglish = "Convert symbols"
Exit Function
Case "advancedMenuReplaceFontsInStyles"
getEnglish = "Replace fonts in styles"
Exit Function
2020-04-23 14:15:18 +02:00
Case Else
getEnglish = "No translation"
End Select
End Function
</script:module>
