cleanandvalidate/Redaction/Translations.xba

382 lines
19 KiB
Text
Raw Normal View History

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( &quot;Tools&quot; )
Dim lang As String
lang = GetStarOfficeLocale().Language
2020-04-23 14:15:18 +02:00
Select Case lang
Case &quot;ru&quot;
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 &quot;noFileWithStylesFound&quot;
getRussian = &quot;Файл-шаблон, содержащий стили для загрузки в документ не был задан. &quot; &amp; chr(10) &amp;&quot;Вы можете выбрать новый файл-шаблон. &quot; &amp; chr(10) &amp; &quot;Если файл-шаблон не будет выбран, то данный этап чистки будет пропущен.&quot;
Exit Function
Case &quot;startQuietCleaningDescription&quot;
getRussian = &quot;Вы хотите запустить чистку документа? &quot; &amp; chr(10) &amp; &quot;Здесь Вы можете также указать новый файл-шаблон.&quot; &amp; chr(10) &amp; &quot;Стили из шаблона будут загружены в документ.&quot;
Exit Function
Case &quot;buttonYes&quot;
getRussian = &quot;Да&quot;
Exit Function
Case &quot;quietStartCleaningTitle&quot;
getRussian = &quot;Подтверждение запуска чистки&quot;
Exit Function
Case &quot;noStylesFileDialogTitle&quot;
getRussian = &quot;Файл со стилями не найден&quot;
Exit Function
Case &quot;buttonTemplateNotFoundSkip&quot;
getRussian = &quot;Продолжить&quot;
Exit Function
Case &quot;buttonStop&quot;
getRussian = &quot;Нет&quot;
Exit Function
Case &quot;buttonLoad&quot;
getRussian = &quot;Указать шаблон&quot;
Exit Function
2020-04-23 14:15:18 +02:00
Case &quot;buttonNameToSelectFileWithStyles&quot;
2020-05-04 14:28:39 +02:00
getRussian = &quot;Указать файл&quot;
Exit Function
2020-04-23 14:55:56 +02:00
Case &quot;cleaningFinished&quot;
2020-05-04 14:28:39 +02:00
getRussian = &quot;Чистка завершена&quot;
Exit Function
Case &quot;advancedMenuDialogTitle&quot;
getRussian = &quot;Чистка в экспертном режиме &quot;
Exit Function
Case &quot;buttonCancel&quot;
getRussian = &quot;Отмена&quot;
Exit Function
Case &quot;buttonOK&quot;
getRussian = &quot;Запуск&quot;
Exit Function
Case &quot;advancedMenuRemoveBasic&quot;
getRussian = &quot;Удалить макросы из файла&quot;
Exit Function
Case &quot;advancedMenuRemoveManualPageBreaks&quot;
getRussian = &quot;Удалить ручные разрывы страниц&quot;
Exit Function
Case &quot;advancedMenuLoadStandardStyles&quot;
getRussian = &quot;Загрузить стили из шаблона&quot;
Exit Function
Case &quot;advancedMenuRemovePageStyles&quot;
getRussian = &quot;Удалить пользовательские стили страниц&quot;
Exit Function
Case &quot;advancedMenuRemoveInitPageBreak&quot;
getRussian = &quot;Удалить разрыв страницы в начале документа&quot;
Exit Function
Case &quot;advancedMenuFixMistakes&quot;
getRussian = &quot;Исправить часто встречающиеся ошибки&quot;
Exit Function
Case &quot;advancedMenuConfigAnchors&quot;
getRussian = &quot;Настроить привязки изображений для электронных публикаций&quot;
Exit Function
Case &quot;advancedMenuConfigTables&quot;
getRussian = &quot;Настроить таблицы для электронных публикаций&quot;
Exit Function
Case &quot;advancedMenuRemoveBookmarks&quot;
getRussian = &quot;Удалить закладки&quot;
Exit Function
Case &quot;advancedMenuRemoveLinks&quot;
getRussian = &quot;Удалить ссылки&quot;
Exit Function
Case &quot;advancedMenuRemoveUnusedStyles&quot;
getRussian = &quot;Удалить неиспользуемые стили&quot;
Exit Function
Case &quot;advancedMenuReplaceWhiteBackground&quot;
getRussian = &quot;Заменить белый фон символов на прозрачный&quot;
Exit Function
Case &quot;advancedMenuCleanFormatting&quot;
getRussian = &quot;Очистить форматирование&quot;
Exit Function
Case &quot;advancedMenuSymbolsConversion&quot;
2020-05-04 15:02:31 +02:00
getRussian = &quot;Конвертировать символы в целевые свободные шрифты&quot;
2020-05-04 14:28:39 +02:00
Exit Function
Case &quot;advancedMenuReplaceFontsInStyles&quot;
getRussian = &quot;Заменить шрифты стилях&quot;
Exit Function
2020-05-04 15:02:31 +02:00
Case &quot;statusStarted&quot;
getRussian = &quot;Чистка документа начата, подождите&quot;
Exit Function
Case &quot;statusReplaceFontsInStyles&quot;
getRussian = &quot;Заменяем шрифты в стилях&quot;
Exit Function
Case &quot;statusConvertSymbolsInTargetFonts&quot;
getRussian = &quot;Конвертируем символы в целевые шрифты&quot;
Exit Function
Case &quot;statusCleaningManualFormatting&quot;
getRussian = &quot;Чистим ручное форматирование&quot;
Exit Function
Case &quot;statusLoadingStylesFromTemplate&quot;
getRussian = &quot;Загружаем стили из шаблона&quot;
Exit Function
Case &quot;statusRemoveCustomPageStyles&quot;
getRussian = &quot;Удаляем пользовательские стили страниц&quot;
Exit Function
Case &quot;statusRemovePageBreakAtStart&quot;
getRussian = &quot;Удаляем разрыв страницы, если он задан в начале документа&quot;
Exit Function
Case &quot;statusFixFrequentMistakes&quot;
getRussian = &quot;Исправляем часто встречающиеся ошибки&quot;
Exit Function
Case &quot;statusConfigureImagesAnchors&quot;
getRussian = &quot;Настраиваем привязки изображений&quot;
Exit Function
Case &quot;statusConfigureTables&quot;
getRussian = &quot;Настраиваем таблицы&quot;
Exit Function
Case &quot;statusRemoveLinks&quot;
getRussian = &quot;Удаляем гиперссылки&quot;
Exit Function
Case &quot;statusRemoveBookmarks&quot;
getRussian = &quot;Удаляем закладки&quot;
Exit Function
Case &quot;statusReplaceWhiteBackground&quot;
getRussian = &quot;Замеяем белый фон символов на прозрачный&quot;
Exit Function
Case &quot;statusRemovedUnusedStyles&quot;
getRussian = &quot;Удаляем неиспользуемые стили&quot;
Exit Function
2020-05-04 15:52:04 +02:00
Case &quot;validationSuccess&quot;
getRussian = &quot;Документ успешно прошел проверку. &quot; &amp; chr(10) &amp; &quot;Проблем не было найдено&quot;
Exit Function
Case &quot;validationWarning&quot;
getRussian = &quot;Перед публикацией документа следует исправить все найденные замечания.&quot;
Exit Function
Case &quot;validationBadSymbolsNotification&quot;
getRussian = &quot;В тексте обнаружены неподходящие для публикции символы.&quot; &amp; chr(10) &amp; &quot; Далее будет представлен список отрывков текста с подобными символами.&quot;
Exit Function
Case &quot;validationBadDrawings&quot;
getRussian = &quot;В документе найдены рисунки (&quot;
Exit Function
Case &quot;validationBadEmbeededObjects&quot;
getRussian = &quot;В документе найдены встроенные объекты (&quot;
Exit Function
Case &quot;validationExcerptNotSuitable&quot;
getRussian = &quot;), неподходящие для публикации. &quot;
Exit Function
Case &quot;validateFootnotes1&quot;
getRussian = &quot;Символ&quot;
Exit Function
Case &quot;validateFootnotes2&quot;
getRussian = &quot;в сноске (абсолютный номер)&quot;
Exit Function
Case &quot;validateFootnotes3&quot;
getRussian = &quot;не подходит для публикации&quot;
Exit Function
Case &quot;validateNumberingsReportFonts&quot;
getRussian = &quot;В следующих списках нумерации найдены шрифты&quot;
Exit Function
Case &quot;validateNumberingsReportSymbols&quot;
getRussian = &quot;В качестве маркера в следующих списках нумерации задан некорректный символ&quot;
Exit Function
Case &quot;validateNumberingLevel&quot;
getRussian = &quot;Уровень&quot;
Exit Function
Case &quot;validateNumberingFont&quot;
getRussian = &quot;шрифт&quot;
Exit Function
Case &quot;validateNumberingSymbol&quot;
getRussian = &quot;символ&quot;
Exit Function
2020-05-04 16:43:15 +02:00
Case &quot;dialogConfigComplexity&quot;
getRussian = &quot;Включить режим эксперта&quot;
Exit Function
Case &quot;dialogConfigTitle&quot;
getRussian = &quot;Настройка чистки и проверки&quot;
Exit Function
2020-04-23 14:15:18 +02:00
Case Else
2020-05-04 14:28:39 +02:00
getRussian = &quot;Перевод не найден&quot;
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 &quot;noFileWithStylesFound&quot;
getEnglish = &quot;Template with styles wasn&apos;t found. You can choose template on your computer.&quot; &amp; chr(10) &amp;&quot; This stage of cleaning will be skipped if no file chosen.&quot;
Exit Function
Case &quot;startQuietCleaningDescription&quot;
getEnglish = &quot;Do you want to start document cleaning?&quot; &amp; chr(10) &amp; &quot;You can choose template with styles.&quot; &amp; chr(10) &amp; &quot;Styles will be loaded in process of cleaning.&quot;
Exit Function
Case &quot;buttonYes&quot;
getEnglish = &quot;Ok&quot;
Exit Function
Case &quot;quietStartCleaningTitle&quot;
getEnglish = &quot;Confirmation&quot;
Exit Function
Case &quot;noStylesFileDialogTitle&quot;
getEnglish = &quot;Template file not found&quot;
Exit Function
2020-04-23 14:33:18 +02:00
Case &quot;buttonTemplateNotFoundSkip&quot;
2020-05-04 14:28:39 +02:00
getEnglish = &quot;Proceed&quot;
Exit Function
Case &quot;buttonStop&quot;
getEnglish = &quot;Cancel&quot;
Exit Function
Case &quot;buttonLoad&quot;
getEnglish = &quot;Set template&quot;
Exit Function
2020-04-23 14:15:18 +02:00
Case &quot;buttonNameToSelectFileWithStyles&quot;
2020-05-04 14:28:39 +02:00
getEnglish = &quot;Select file&quot;
Exit Function
2020-04-23 14:55:56 +02:00
Case &quot;cleaningFinished&quot;
2020-05-04 14:28:39 +02:00
getEnglish = &quot;Cleaning is completed&quot;
Exit Function
Case &quot;advancedMenuDialogTitle&quot;
getEnglish = &quot;Advanced cleaning&quot;
Exit Function
Case &quot;buttonCancel&quot;
getEnglish = &quot;Cancel&quot;
Exit Function
Case &quot;buttonOK&quot;
getEnglish = &quot;Start&quot;
Exit Function
Case &quot;advancedMenuRemoveBasic&quot;
getEnglish = &quot;Remove macro from file&quot;
Exit Function
Case &quot;advancedMenuRemoveManualPageBreaks&quot;
getEnglish = &quot;Remove manual page breaks&quot;
Exit Function
Case &quot;advancedMenuLoadStandardStyles&quot;
getEnglish = &quot;Load styles from template&quot;
Exit Function
Case &quot;advancedMenuRemovePageStyles&quot;
getEnglish = &quot;Remove custom page styles&quot;
Exit Function
Case &quot;advancedMenuRemoveInitPageBreak&quot;
getEnglish = &quot;Remove page break at document start&quot;
Exit Function
Case &quot;advancedMenuFixMistakes&quot;
getEnglish = &quot;Remove frequent mistakes&quot;
Exit Function
Case &quot;advancedMenuConfigAnchors&quot;
getEnglish = &quot;Configure image anchors for digital publications&quot;
Exit Function
Case &quot;advancedMenuConfigTables&quot;
getEnglish = &quot;Configure tables for digital publications&quot;
Exit Function
Case &quot;advancedMenuRemoveBookmarks&quot;
getEnglish = &quot;Remove bookmarks&quot;
Exit Function
Case &quot;advancedMenuRemoveLinks&quot;
getEnglish = &quot;Remove links&quot;
Exit Function
Case &quot;advancedMenuRemoveUnusedStyles&quot;
getEnglish = &quot;Remove unused styles&quot;
Exit Function
Case &quot;advancedMenuReplaceWhiteBackground&quot;
getEnglish = &quot;Replace white symbol back with transparent&quot;
Exit Function
Case &quot;advancedMenuCleanFormatting&quot;
getEnglish = &quot;Clean manual formatting&quot;
Exit Function
Case &quot;advancedMenuSymbolsConversion&quot;
2020-05-04 15:02:31 +02:00
getEnglish = &quot;Convert symbols to target (free) fonts&quot;
2020-05-04 14:28:39 +02:00
Exit Function
Case &quot;advancedMenuReplaceFontsInStyles&quot;
getEnglish = &quot;Replace fonts in styles&quot;
Exit Function
2020-05-04 15:02:31 +02:00
Case &quot;statusStarted&quot;
getEnglish = &quot;Cleaning started&quot;
Exit Function
Case &quot;statusReplaceFontsInStyles&quot;
getEnglish = &quot;Replacing fonts in styles&quot;
Exit Function
Case &quot;statusConvertSymbolsInTargetFonts&quot;
getEnglish = &quot;Converting symbols to target (free) fonts&quot;
Exit Function
Case &quot;statusCleaningManualFormatting&quot;
getEnglish = &quot;Cleaning manual formatting&quot;
Exit Function
Case &quot;statusLoadingStylesFromTemplate&quot;
getEnglish = &quot;Loading styles from template&quot;
Exit Function
Case &quot;statusRemoveCustomPageStyles&quot;
getEnglish = &quot;Removing custom pages styles&quot;
Exit Function
Case &quot;statusRemovePageBreakAtStart&quot;
getEnglish = &quot;Removing page break at start of document&quot;
Exit Function
Case &quot;statusFixFrequentMistakes&quot;
getEnglish = &quot;Fixing frequent mistakes&quot;
Exit Function
Case &quot;statusConfigureImagesAnchors&quot;
getEnglish = &quot;Configuring image anchors&quot;
Exit Function
Case &quot;statusConfigureTables&quot;
getEnglish = &quot;Configuring tables&quot;
Exit Function
Case &quot;statusRemoveLinks&quot;
getEnglish = &quot;Removing links&quot;
Exit Function
Case &quot;statusRemoveBookmarks&quot;
getEnglish = &quot;Removing bookmarks&quot;
Exit Function
Case &quot;statusReplaceWhiteBackground&quot;
getEnglish = &quot;Replacing white symbol back with transparent&quot;
Exit Function
Case &quot;statusRemovedUnusedStyles&quot;
getEnglish = &quot;Removing unused styles&quot;
Exit Function
2020-05-04 15:52:04 +02:00
Case &quot;validationSuccess&quot;
getEnglish = &quot;Validation completed successfully&quot; &amp; chr(10) &amp; &quot;No problems found.&quot;
Exit Function
Case &quot;validationWarning&quot;
getEnglish = &quot;It is recommended to fix all problems before publication.&quot;
Exit Function
Case &quot;validationBadSymbolsNotification&quot;
getEnglish = &quot;Unsuitable symbols were found&quot; &amp; chr(10) &amp; &quot; Now you will get the list with bad symbols.&quot;
Exit Function
Case &quot;validationBadDrawings&quot;
getEnglish = &quot;Drawings was found (&quot;
Exit Function
Case &quot;validationBadEmbeededObjects&quot;
getEnglish = &quot;Embeeded objects were found (&quot;
Exit Function
Case &quot;validationExcerptNotSuitable&quot;
getEnglish = &quot;), which are not suitable for digital publication&quot;
Exit Function
Case &quot;validateFootnotes1&quot;
getEnglish = &quot;Symbol&quot;
Exit Function
Case &quot;validateFootnotes2&quot;
getEnglish = &quot;in footnote (absolute number)&quot;
Exit Function
Case &quot;validateFootnotes3&quot;
getEnglish = &quot;is not suitable for publication&quot;
Exit Function
Case &quot;validateNumberingsReportFonts&quot;
getEnglish = &quot;In next numbering lists found fonts &quot;
Exit Function
Case &quot;validateNumberingsReportSymbols&quot;
getEnglish = &quot;Incorrect symbol used as a marker in following numbering lists&quot;
Exit Function
Case &quot;validateNumberingLevel&quot;
getEnglish = &quot;Level&quot;
Exit Function
Case &quot;validateNumberingFont&quot;
getEnglish = &quot;font&quot;
Exit Function
Case &quot;validateNumberingSymbol&quot;
getEnglish = &quot;symbol&quot;
Exit Function
2020-05-04 16:43:15 +02:00
Case &quot;dialogConfigComplexity&quot;
getEnglish = &quot;Enable advanced mode&quot;
Exit Function
Case &quot;dialogConfigTitle&quot;
getEnglish = &quot;Clean and validation configuration&quot;
Exit Function
2020-04-23 14:15:18 +02:00
Case Else
getEnglish = &quot;No translation&quot;
End Select
End Function
</script:module>