feat: Added selected template info on cleaning dialogs
This commit is contained in:
parent
c98848aae4
commit
003e1d4033
8 changed files with 163 additions and 71 deletions
|
|
@ -1,6 +1,6 @@
|
||||||
<?xml version="1.0" encoding="UTF-8"?>
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
|
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
|
||||||
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub mark85
|
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub mark87
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|
@ -23,44 +23,45 @@ Sub cleanButton
|
||||||
EndIf
|
EndIf
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Dim advancedCleaningDialog As Object
|
||||||
|
|
||||||
Private Sub makerUpMenu
|
Private Sub makerUpMenu
|
||||||
Dim dialog As Object
|
|
||||||
DialogLibraries.LoadLibrary("Redaction")
|
DialogLibraries.LoadLibrary("Redaction")
|
||||||
dialog = CreateUnoDialog(DialogLibraries.Redaction.CleaningDialog)
|
advancedCleaningDialog = CreateUnoDialog(DialogLibraries.Redaction.CleaningDialog)
|
||||||
|
advancedCleaningDialog.getControl("fontsInStyles").Label = getTranslation("advancedMenuReplaceFontsInStyles")
|
||||||
dialog.getControl("fontsInStyles").Label = getTranslation("advancedMenuReplaceFontsInStyles")
|
advancedCleaningDialog.getControl("symbolsConversion").Label = getTranslation("advancedMenuSymbolsConversion")
|
||||||
dialog.getControl("symbolsConversion").Label = getTranslation("advancedMenuSymbolsConversion")
|
advancedCleaningDialog.getControl("cleanFormatting").Label = getTranslation("advancedMenuCleanFormatting")
|
||||||
dialog.getControl("cleanFormatting").Label = getTranslation("advancedMenuCleanFormatting")
|
advancedCleaningDialog.getControl("replaceWhiteBackground").Label = getTranslation("advancedMenuReplaceWhiteBackground")
|
||||||
dialog.getControl("replaceWhiteBackground").Label = getTranslation("advancedMenuReplaceWhiteBackground")
|
advancedCleaningDialog.getControl("removeUnusedStyles").Label = getTranslation("advancedMenuRemoveUnusedStyles")
|
||||||
dialog.getControl("removeUnusedStyles").Label = getTranslation("advancedMenuRemoveUnusedStyles")
|
advancedCleaningDialog.getControl("removeLinks").Label = getTranslation("advancedMenuRemoveLinks")
|
||||||
dialog.getControl("removeLinks").Label = getTranslation("advancedMenuRemoveLinks")
|
advancedCleaningDialog.getControl("removeAllFields").Label = getTranslation("advancedMenuRemoveAllFields")
|
||||||
dialog.getControl("removeAllFields").Label = getTranslation("advancedMenuRemoveAllFields")
|
advancedCleaningDialog.getControl("removeBookmarks").Label = getTranslation("advancedMenuRemoveBookmarks")
|
||||||
dialog.getControl("removeBookmarks").Label = getTranslation("advancedMenuRemoveBookmarks")
|
advancedCleaningDialog.getControl("configTables").Label = getTranslation("advancedMenuConfigTables")
|
||||||
dialog.getControl("configTables").Label = getTranslation("advancedMenuConfigTables")
|
advancedCleaningDialog.getControl("configAnchors").Label = getTranslation("advancedMenuConfigAnchors")
|
||||||
dialog.getControl("configAnchors").Label = getTranslation("advancedMenuConfigAnchors")
|
advancedCleaningDialog.getControl("fixMistakes").Label = getTranslation("advancedMenuFixMistakes")
|
||||||
dialog.getControl("fixMistakes").Label = getTranslation("advancedMenuFixMistakes")
|
advancedCleaningDialog.getControl("fixDOI").Label = getTranslation("advancedMenuFixDOI")
|
||||||
dialog.getControl("fixDOI").Label = getTranslation("advancedMenuFixDOI")
|
advancedCleaningDialog.getControl("replaceNumHyphen").Label = getTranslation("replaceNumHyphen")
|
||||||
dialog.getControl("replaceNumHyphen").Label = getTranslation("replaceNumHyphen")
|
advancedCleaningDialog.getControl("removeInitPageBreak").Label = getTranslation("advancedMenuRemoveInitPageBreak")
|
||||||
dialog.getControl("removeInitPageBreak").Label = getTranslation("advancedMenuRemoveInitPageBreak")
|
advancedCleaningDialog.getControl("removePageStyles").Label = getTranslation("advancedMenuRemovePageStyles")
|
||||||
dialog.getControl("removePageStyles").Label = getTranslation("advancedMenuRemovePageStyles")
|
advancedCleaningDialog.getControl("loadStandardStyles").Label = getTranslation("advancedMenuLoadStandardStyles")
|
||||||
dialog.getControl("loadStandardStyles").Label = getTranslation("advancedMenuLoadStandardStyles")
|
advancedCleaningDialog.getControl("removeManualPageBreaks").Label = getTranslation("advancedMenuRemoveManualPageBreaks")
|
||||||
dialog.getControl("removeManualPageBreaks").Label = getTranslation("advancedMenuRemoveManualPageBreaks")
|
advancedCleaningDialog.getControl("removeBasic").Label = getTranslation("advancedMenuRemoveBasic")
|
||||||
dialog.getControl("removeBasic").Label = getTranslation("advancedMenuRemoveBasic")
|
advancedCleaningDialog.getControl("resetChapterNumberingRules").Label = getTranslation("advancedMenuResetChapterNumberingRules")
|
||||||
dialog.getControl("resetChapterNumberingRules").Label = getTranslation("advancedMenuResetChapterNumberingRules")
|
advancedCleaningDialog.getControl("convertFontsToCharStyles").Label = getTranslation("advancedMenuconvertFontsToCharStyles")
|
||||||
dialog.getControl("convertFontsToCharStyles").Label = getTranslation("advancedMenuconvertFontsToCharStyles")
|
advancedCleaningDialog.getControl("fixBrokenCharBackTransparent").Label = getTranslation("fixBrokenCharBackTransparentMenuItem")
|
||||||
dialog.getControl("fixBrokenCharBackTransparent").Label = getTranslation("fixBrokenCharBackTransparentMenuItem")
|
advancedCleaningDialog.getControl("removeNotTransparentBackgrounds").Label = getTranslation("removeNotTransparentBackgrounds")
|
||||||
dialog.getControl("removeNotTransparentBackgrounds").Label = getTranslation("removeNotTransparentBackgrounds")
|
advancedCleaningDialog.getControl("Cancel").Label = getTranslation("buttonCancel")
|
||||||
dialog.getControl("Cancel").Label = getTranslation("buttonCancel")
|
advancedCleaningDialog.getControl("OK").Label = getTranslation("buttonOK")
|
||||||
dialog.getControl("OK").Label = getTranslation("buttonOK")
|
advancedCleaningDialog.getControl("buttonLoad").Label = getTranslation("buttonLoad")
|
||||||
dialog.getControl("buttonLoad").Label = getTranslation("buttonLoad")
|
advancedCleaningDialog.Title = getTranslation("advancedMenuDialogTitle")
|
||||||
dialog.Title = getTranslation("advancedMenuDialogTitle")
|
setAdvancedDialogDescription()
|
||||||
dialog.setVisible(true)
|
advancedCleaningDialog.setVisible(true)
|
||||||
Select Case dialog.Execute()
|
Select Case advancedCleaningDialog.Execute()
|
||||||
Case 1
|
Case 1
|
||||||
cleanAccordingTo(dialog)
|
cleanAccordingTo(dialog)
|
||||||
Case 0
|
Case 0
|
||||||
End Select
|
End Select
|
||||||
dialog.dispose()
|
advancedCleaningDialog.dispose()
|
||||||
Exit sub
|
Exit sub
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -1,10 +1,10 @@
|
||||||
<?xml version="1.0" encoding="UTF-8"?>
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
|
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
|
||||||
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="CleaningDialog" dlg:left="107" dlg:top="22" dlg:width="237" dlg:height="247" dlg:help-text="&21.CleaningDialog.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&22.CleaningDialog.Title">
|
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="CleaningDialog" dlg:left="107" dlg:top="22" dlg:width="237" dlg:height="265" dlg:help-text="&21.CleaningDialog.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&22.CleaningDialog.Title">
|
||||||
<dlg:bulletinboard>
|
<dlg:bulletinboard>
|
||||||
<dlg:button dlg:id="Cancel" dlg:tab-index="0" dlg:left="28" dlg:top="232" dlg:width="40" dlg:height="12" dlg:value="Отмена" dlg:button-type="cancel"/>
|
<dlg:button dlg:id="Cancel" dlg:tab-index="0" dlg:left="28" dlg:top="251" dlg:width="40" dlg:height="12" dlg:value="Отмена" dlg:button-type="cancel"/>
|
||||||
<dlg:button dlg:id="CommandButton1" dlg:tab-index="1" dlg:left="24" dlg:top="180" dlg:width="2" dlg:height="0" dlg:value="CommandButton1"/>
|
<dlg:button dlg:id="CommandButton1" dlg:tab-index="1" dlg:left="24" dlg:top="180" dlg:width="2" dlg:height="0" dlg:value="CommandButton1"/>
|
||||||
<dlg:button dlg:id="OK" dlg:tab-index="2" dlg:left="92" dlg:top="232" dlg:width="40" dlg:height="12" dlg:value="OK" dlg:button-type="ok"/>
|
<dlg:button dlg:id="OK" dlg:tab-index="2" dlg:left="92" dlg:top="251" dlg:width="40" dlg:height="12" dlg:value="OK" dlg:button-type="ok"/>
|
||||||
<dlg:checkbox dlg:id="fontsInStyles" dlg:tab-index="3" dlg:left="11" dlg:top="10" dlg:width="218" dlg:height="7" dlg:value="Заменить названия шрифтов в стилях" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="fontsInStyles" dlg:tab-index="3" dlg:left="11" dlg:top="10" dlg:width="218" dlg:height="7" dlg:value="Заменить названия шрифтов в стилях" dlg:checked="false"/>
|
||||||
<dlg:checkbox dlg:id="removeLinks" dlg:tab-index="6" dlg:left="11" dlg:top="60" dlg:width="218" dlg:height="7" dlg:value="Удалить гиперссылки" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="removeLinks" dlg:tab-index="6" dlg:left="11" dlg:top="60" dlg:width="218" dlg:height="7" dlg:value="Удалить гиперссылки" dlg:checked="false"/>
|
||||||
<dlg:checkbox dlg:id="cleanFormatting" dlg:tab-index="5" dlg:left="11" dlg:top="30" dlg:width="218" dlg:height="7" dlg:value="Очистить форматирование" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="cleanFormatting" dlg:tab-index="5" dlg:left="11" dlg:top="30" dlg:width="218" dlg:height="7" dlg:value="Очистить форматирование" dlg:checked="false"/>
|
||||||
|
|
@ -20,7 +20,7 @@
|
||||||
<dlg:checkbox dlg:id="removeManualPageBreaks" dlg:tab-index="15" dlg:left="11" dlg:top="160" dlg:width="218" dlg:height="7" dlg:value="Удалить все разрывы страниц" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="removeManualPageBreaks" dlg:tab-index="15" dlg:left="11" dlg:top="160" dlg:width="218" dlg:height="7" dlg:value="Удалить все разрывы страниц" dlg:checked="false"/>
|
||||||
<dlg:checkbox dlg:id="replaceWhiteBackground" dlg:tab-index="16" dlg:left="11" dlg:top="40" dlg:width="218" dlg:height="7" dlg:value="Заменить белый фон символов на прозрачный" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="replaceWhiteBackground" dlg:tab-index="16" dlg:left="11" dlg:top="40" dlg:width="218" dlg:height="7" dlg:value="Заменить белый фон символов на прозрачный" dlg:checked="false"/>
|
||||||
<dlg:checkbox dlg:id="removeBasic" dlg:tab-index="17" dlg:left="11" dlg:top="170" dlg:width="218" dlg:height="7" dlg:value="Удалить макросы" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="removeBasic" dlg:tab-index="17" dlg:left="11" dlg:top="170" dlg:width="218" dlg:height="7" dlg:value="Удалить макросы" dlg:checked="false"/>
|
||||||
<dlg:button dlg:id="buttonLoad" dlg:tab-index="18" dlg:left="158" dlg:top="232" dlg:width="65" dlg:height="12" dlg:value="loadTemplate">
|
<dlg:button dlg:id="buttonLoad" dlg:tab-index="18" dlg:left="158" dlg:top="251" dlg:width="65" dlg:height="12" dlg:value="loadTemplate">
|
||||||
<script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.configureStyleFileDialog?language=Basic&location=application" script:language="Script"/>
|
<script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.configureStyleFileDialog?language=Basic&location=application" script:language="Script"/>
|
||||||
</dlg:button>
|
</dlg:button>
|
||||||
<dlg:checkbox dlg:id="removeAllFields" dlg:tab-index="19" dlg:left="11" dlg:top="180" dlg:width="218" dlg:height="7" dlg:value="Удалить все поля" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="removeAllFields" dlg:tab-index="19" dlg:left="11" dlg:top="180" dlg:width="218" dlg:height="7" dlg:value="Удалить все поля" dlg:checked="false"/>
|
||||||
|
|
@ -30,5 +30,6 @@
|
||||||
<dlg:checkbox dlg:id="convertFontsToCharStyles" dlg:tab-index="23" dlg:left="11" dlg:top="210" dlg:width="218" dlg:height="7" dlg:value="Конвертировать шрифты в стили символов" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="convertFontsToCharStyles" dlg:tab-index="23" dlg:left="11" dlg:top="210" dlg:width="218" dlg:height="7" dlg:value="Конвертировать шрифты в стили символов" dlg:checked="false"/>
|
||||||
<dlg:checkbox dlg:id="fixBrokenCharBackTransparent" dlg:tab-index="24" dlg:left="11" dlg:top="220" dlg:width="218" dlg:height="7" dlg:value="fixBrokenCharBackTransparent" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="fixBrokenCharBackTransparent" dlg:tab-index="24" dlg:left="11" dlg:top="220" dlg:width="218" dlg:height="7" dlg:value="fixBrokenCharBackTransparent" dlg:checked="false"/>
|
||||||
<dlg:checkbox dlg:id="removeNotTransparentBackgrounds" dlg:tab-index="25" dlg:left="11" dlg:top="50" dlg:width="218" dlg:height="7" dlg:value="Удалить непрозрачные фоны в тексте" dlg:checked="false"/>
|
<dlg:checkbox dlg:id="removeNotTransparentBackgrounds" dlg:tab-index="25" dlg:left="11" dlg:top="50" dlg:width="218" dlg:height="7" dlg:value="Удалить непрозрачные фоны в тексте" dlg:checked="false"/>
|
||||||
|
<dlg:text dlg:id="description" dlg:tab-index="26" dlg:left="11" dlg:top="231" dlg:width="217" dlg:height="16" dlg:value="Label1" dlg:multiline="true"/>
|
||||||
</dlg:bulletinboard>
|
</dlg:bulletinboard>
|
||||||
</dlg:window>
|
</dlg:window>
|
||||||
|
|
@ -1,7 +1,7 @@
|
||||||
<?xml version="1.0" encoding="UTF-8"?>
|
<?xml version="1.0" encoding="UTF-8"?>
|
||||||
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
|
<!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
|
||||||
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Configuration" script:language="StarBasic" script:moduleType="normal">Public Const redactionExtensionName = "cleanAndValidate"
|
<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Configuration" script:language="StarBasic" script:moduleType="normal">Public Const redactionExtensionName = "cleanAndValidate"
|
||||||
Public Const redactionExtensionVersion = "0.9.38"
|
Public Const redactionExtensionVersion = "0.10.0"
|
||||||
Public Const template_name_monography = "Монография"
|
Public Const template_name_monography = "Монография"
|
||||||
Public Const template_name_pj = "Философский журнал"
|
Public Const template_name_pj = "Философский журнал"
|
||||||
Public Const template_name_pq = "Вопросы философии"
|
Public Const template_name_pq = "Вопросы философии"
|
||||||
|
|
@ -123,39 +123,81 @@ Private Sub configurationDialog
|
||||||
Exit sub
|
Exit sub
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Dim queitCleaningDialog As Object
|
||||||
|
|
||||||
Private Sub quietStartDialog
|
Private Sub quietStartDialog
|
||||||
Dim dialog As Object
|
|
||||||
DialogLibraries.LoadLibrary("Redaction")
|
DialogLibraries.LoadLibrary("Redaction")
|
||||||
dialog = CreateUnoDialog(DialogLibraries.Redaction.StartQuietCleaning)
|
queitCleaningDialog = CreateUnoDialog(DialogLibraries.Redaction.StartQuietCleaning)
|
||||||
Dim description As String
|
|
||||||
Dim buttonNameOk As String
|
Dim buttonNameOk As String
|
||||||
Dim buttonNameStop As String
|
Dim buttonNameStop As String
|
||||||
Dim buttonNameLoad As String
|
Dim buttonNameLoad As String
|
||||||
Dim dialogTitle As String
|
Dim dialogTitle As String
|
||||||
description = getTranslation("startQuietCleaningDescription")
|
|
||||||
buttonNameOk = getTranslation("buttonYes")
|
buttonNameOk = getTranslation("buttonYes")
|
||||||
buttonNameStop = getTranslation("buttonStop")
|
buttonNameStop = getTranslation("buttonStop")
|
||||||
buttonNameLoad = getTranslation("buttonLoad")
|
buttonNameLoad = getTranslation("buttonLoad")
|
||||||
dialogTitle = getTranslation("quietStartCleaningTitle")
|
dialogTitle = getTranslation("quietStartCleaningTitle")
|
||||||
dialog.Title = dialogTitle
|
queitCleaningDialog.Title = dialogTitle
|
||||||
dialog.getControl("Description").setText(description)
|
setQuietDialogDescription()
|
||||||
dialog.getControl("buttonOk").Label = buttonNameOk
|
queitCleaningDialog.getControl("buttonOk").Label = buttonNameOk
|
||||||
dialog.getControl("buttonStop").Label = buttonNameStop
|
queitCleaningDialog.getControl("buttonStop").Label = buttonNameStop
|
||||||
dialog.getControl("buttonLoad").Label = buttonNameLoad
|
queitCleaningDialog.getControl("buttonLoad").Label = buttonNameLoad
|
||||||
dialog.setVisible(true)
|
queitCleaningDialog.setVisible(true)
|
||||||
Select Case dialog.Execute()
|
Select Case queitCleaningDialog.Execute()
|
||||||
Case 1
|
Case 1
|
||||||
dialog.setVisible(false)
|
queitCleaningDialog.setVisible(false)
|
||||||
dialog.dispose()
|
queitCleaningDialog.dispose()
|
||||||
quietCleaning
|
quietCleaning
|
||||||
Case 0
|
Case 0
|
||||||
dialog.setVisible(false)
|
queitCleaningDialog.setVisible(false)
|
||||||
dialog.dispose()
|
queitCleaningDialog.dispose()
|
||||||
End Select
|
End Select
|
||||||
|
|
||||||
Exit sub
|
Exit sub
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
Function setAdvancedDialogDescription()
|
||||||
|
If IsNull(advancedCleaningDialog) Then
|
||||||
|
Exit Function
|
||||||
|
EndIf
|
||||||
|
Dim config As Object
|
||||||
|
Dim description As String
|
||||||
|
Dim predefined As String
|
||||||
|
Dim customFile As String
|
||||||
|
config = initRedactionConfiguration()
|
||||||
|
predefined = config.getPropertyValue("predefined_template")
|
||||||
|
customFile = config.getPropertyValue("defaultTemplate")
|
||||||
|
If predefined = "false" Then
|
||||||
|
description = getTranslation("templateNotSelected")
|
||||||
|
ElseIf predefined = template_manual Then
|
||||||
|
description = getTranslation("templateChosen") & " «" & customFile & "»"
|
||||||
|
Else
|
||||||
|
description = getTranslation("templateChosen") & " «" & predefined & "»"
|
||||||
|
EndIf
|
||||||
|
advancedCleaningDialog.getControl("description").setText(description)
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Function setQuietDialogDescription()
|
||||||
|
If IsNull(queitCleaningDialog) Then
|
||||||
|
Exit Function
|
||||||
|
EndIf
|
||||||
|
Dim config As Object
|
||||||
|
Dim description As String
|
||||||
|
Dim predefined As String
|
||||||
|
Dim customFile As String
|
||||||
|
config = initRedactionConfiguration()
|
||||||
|
predefined = config.getPropertyValue("predefined_template")
|
||||||
|
customFile = config.getPropertyValue("defaultTemplate")
|
||||||
|
If predefined = "false" Then
|
||||||
|
description = getTranslation("startQuietCleaningDescription1") & " " & getTranslation("startQuietCleaningDescription2")
|
||||||
|
ElseIf predefined = template_manual Then
|
||||||
|
description = getTranslation("startQuietCleaningDescription1") & " «" & customFile & "» " & getTranslation("startQuietCleaningDescription2")
|
||||||
|
Else
|
||||||
|
description = getTranslation("startQuietCleaningDescription1") & " «" & predefined & "» " & getTranslation("startQuietCleaningDescription2")
|
||||||
|
EndIf
|
||||||
|
queitCleaningDialog.getControl("Description").setText(description)
|
||||||
|
End Function
|
||||||
|
|
||||||
Dim styleFileDialog As Object
|
Dim styleFileDialog As Object
|
||||||
|
|
||||||
Private Sub configureStyleFileDialog
|
Private Sub configureStyleFileDialog
|
||||||
|
|
@ -185,8 +227,11 @@ Private Sub configureStyleFileDialog
|
||||||
Select Case styleFileDialog.Execute()
|
Select Case styleFileDialog.Execute()
|
||||||
Case 0
|
Case 0
|
||||||
End Select
|
End Select
|
||||||
|
setQuietDialogDescription()
|
||||||
|
setAdvancedDialogDescription()
|
||||||
styleFileDialog.setVisible(false)
|
styleFileDialog.setVisible(false)
|
||||||
styleFileDialog.dispose()
|
styleFileDialog.dispose()
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -2,10 +2,10 @@
|
||||||
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
|
<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd">
|
||||||
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="StartQuietCleaning" dlg:left="124" dlg:top="101" dlg:width="222" dlg:height="96" dlg:help-text="&29.StartQuietCleaning.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&30.StartQuietCleaning.Title">
|
<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="StartQuietCleaning" dlg:left="124" dlg:top="101" dlg:width="222" dlg:height="96" dlg:help-text="&29.StartQuietCleaning.HelpText" dlg:closeable="true" dlg:moveable="true" dlg:title="&30.StartQuietCleaning.Title">
|
||||||
<dlg:bulletinboard>
|
<dlg:bulletinboard>
|
||||||
<dlg:text dlg:id="Description" dlg:tab-index="1" dlg:left="15" dlg:top="18" dlg:width="194" dlg:height="40" dlg:help-text="&33.StartQuietCleaning.Description.HelpText" dlg:value="&34.StartQuietCleaning.Description.Label"/>
|
<dlg:text dlg:id="Description" dlg:tab-index="1" dlg:left="15" dlg:top="8" dlg:width="194" dlg:height="56" dlg:help-text="&33.StartQuietCleaning.Description.HelpText" dlg:value="&34.StartQuietCleaning.Description.Label" dlg:multiline="true"/>
|
||||||
<dlg:button dlg:id="buttonOk" dlg:tab-index="0" dlg:left="15" dlg:top="71" dlg:width="56" dlg:height="17" dlg:help-text="&55.StartQuietCleaning.buttonOk.HelpText" dlg:value="&56.StartQuietCleaning.buttonOk.Label" dlg:button-type="ok"/>
|
<dlg:button dlg:id="buttonOk" dlg:tab-index="0" dlg:left="15" dlg:top="71" dlg:width="60" dlg:height="17" dlg:help-text="&55.StartQuietCleaning.buttonOk.HelpText" dlg:value="&56.StartQuietCleaning.buttonOk.Label" dlg:button-type="ok"/>
|
||||||
<dlg:button dlg:id="buttonStop" dlg:tab-index="3" dlg:left="84" dlg:top="71" dlg:width="56" dlg:height="17" dlg:help-text="&57.StartQuietCleaning.buttonStop.HelpText" dlg:value="&58.StartQuietCleaning.buttonStop.Label" dlg:button-type="cancel"/>
|
<dlg:button dlg:id="buttonStop" dlg:tab-index="3" dlg:left="83" dlg:top="71" dlg:width="60" dlg:height="17" dlg:help-text="&57.StartQuietCleaning.buttonStop.HelpText" dlg:value="&58.StartQuietCleaning.buttonStop.Label" dlg:button-type="cancel"/>
|
||||||
<dlg:button dlg:id="buttonLoad" dlg:tab-index="2" dlg:left="152" dlg:top="71" dlg:width="56" dlg:height="17" dlg:help-text="&59.StartQuietCleaning.buttonLoad.HelpText" dlg:value="&60.StartQuietCleaning.buttonLoad.Label">
|
<dlg:button dlg:id="buttonLoad" dlg:tab-index="2" dlg:left="149" dlg:top="71" dlg:width="60" dlg:height="17" dlg:help-text="&59.StartQuietCleaning.buttonLoad.HelpText" dlg:value="&60.StartQuietCleaning.buttonLoad.Label">
|
||||||
<script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.configureStyleFileDialog?language=Basic&location=application" script:language="Script"/>
|
<script:event script:event-name="on-performaction" script:macro-name="vnd.sun.star.script:Redaction.Configuration.configureStyleFileDialog?language=Basic&location=application" script:language="Script"/>
|
||||||
</dlg:button>
|
</dlg:button>
|
||||||
</dlg:bulletinboard>
|
</dlg:bulletinboard>
|
||||||
|
|
|
||||||
|
|
@ -29,8 +29,11 @@ Function getRussian(identifier As String) As String
|
||||||
Case "noFileWithStylesFound"
|
Case "noFileWithStylesFound"
|
||||||
getRussian = "Файл-шаблон, содержащий стили для загрузки в документ не был задан. " & chr(10) &"Вы можете выбрать новый файл-шаблон. " & chr(10) & "Если файл-шаблон не будет выбран, то загрузка стилей из шаблона при чистке не будет выполняться."
|
getRussian = "Файл-шаблон, содержащий стили для загрузки в документ не был задан. " & chr(10) &"Вы можете выбрать новый файл-шаблон. " & chr(10) & "Если файл-шаблон не будет выбран, то загрузка стилей из шаблона при чистке не будет выполняться."
|
||||||
Exit Function
|
Exit Function
|
||||||
Case "startQuietCleaningDescription"
|
Case "startQuietCleaningDescription1"
|
||||||
getRussian = "Вы хотите запустить чистку документа? " & chr(10) & "Здесь Вы можете также указать новый файл-шаблон." & chr(10) & "Стили из шаблона будут загружены в документ."
|
getRussian = "Вы хотите запустить чистку документа? " & chr(10) & "Вы можете также указать новый файл-шаблон." & chr(10) & "Стили из шаблона "
|
||||||
|
Exit Function
|
||||||
|
Case "startQuietCleaningDescription2"
|
||||||
|
getRussian = "будут загружены в документ."
|
||||||
Exit Function
|
Exit Function
|
||||||
Case "buttonYes"
|
Case "buttonYes"
|
||||||
getRussian = "Да"
|
getRussian = "Да"
|
||||||
|
|
@ -335,6 +338,12 @@ Function getRussian(identifier As String) As String
|
||||||
Case "selectTemplateDialogTitle"
|
Case "selectTemplateDialogTitle"
|
||||||
getRussian = "Выберите шаблон из списка"
|
getRussian = "Выберите шаблон из списка"
|
||||||
Exit Function
|
Exit Function
|
||||||
|
Case "templateNotSelected"
|
||||||
|
getRussian = "Шаблон не выбран"
|
||||||
|
Exit Function
|
||||||
|
Case "templateChosen"
|
||||||
|
getRussian = "Выбран шаблон"
|
||||||
|
Exit Function
|
||||||
Case Else
|
Case Else
|
||||||
getRussian = "Перевод не найден"
|
getRussian = "Перевод не найден"
|
||||||
End Select
|
End Select
|
||||||
|
|
@ -346,8 +355,11 @@ Function getEnglish(identifier As String) As String
|
||||||
Case "noFileWithStylesFound"
|
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."
|
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
|
Exit Function
|
||||||
Case "startQuietCleaningDescription"
|
Case "startQuietCleaningDescription1"
|
||||||
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." & chr(10) & ""
|
getEnglish = "Do you want to start document cleaning?" & chr(10) & "You can choose template with styles." & chr(10) & "Styles from template "
|
||||||
|
Exit Function
|
||||||
|
Case "startQuietCleaningDescription2"
|
||||||
|
getEnglish = "will be loaded in process of cleaning." & chr(10) & ""
|
||||||
Exit Function
|
Exit Function
|
||||||
Case "buttonYes"
|
Case "buttonYes"
|
||||||
getEnglish = "Ok"
|
getEnglish = "Ok"
|
||||||
|
|
@ -652,6 +664,12 @@ Function getEnglish(identifier As String) As String
|
||||||
Case "selectTemplateDialogTitle"
|
Case "selectTemplateDialogTitle"
|
||||||
getEnglish = "Select a template from the list "
|
getEnglish = "Select a template from the list "
|
||||||
Exit Function
|
Exit Function
|
||||||
|
Case "templateNotSelected"
|
||||||
|
getEnglish = "Template not selected"
|
||||||
|
Exit Function
|
||||||
|
Case "templateChosen"
|
||||||
|
getEnglish = "Selected template"
|
||||||
|
Exit Function
|
||||||
Case Else
|
Case Else
|
||||||
getEnglish = "No translation"
|
getEnglish = "No translation"
|
||||||
End Select
|
End Select
|
||||||
|
|
@ -662,8 +680,11 @@ Function getCroatian(identifier As String) As String
|
||||||
Case "noFileWithStylesFound"
|
Case "noFileWithStylesFound"
|
||||||
getCroatian = "Datoteka šablona koja sadrži stilove za učitavanje u dokument nije navedena. " & chr(10) &"Možete izabrati novi šablon na računaru. " & chr(10) & "Ako datoteka šablona nije izabrana, ovaj korak čišćenja će se preskočiti."
|
getCroatian = "Datoteka šablona koja sadrži stilove za učitavanje u dokument nije navedena. " & chr(10) &"Možete izabrati novi šablon na računaru. " & chr(10) & "Ako datoteka šablona nije izabrana, ovaj korak čišćenja će se preskočiti."
|
||||||
Exit Function
|
Exit Function
|
||||||
Case "startQuietCleaningDescription"
|
Case "startQuietCleaningDescription1"
|
||||||
getCroatian = "Da li želite da počnete sa čišćenjem dokumenta?" & chr(10) & "Ovde možete da odredite i novu datoteku šablona." & chr(10) & "Stilovi iz šablona biće učitani u dokument."
|
getCroatian = "Da li želite da počnete sa čišćenjem dokumenta?" & chr(10) & "Ovde možete da odredite i novu datoteku šablona." & chr(10) & "Stilovi iz šablona "
|
||||||
|
Exit Function
|
||||||
|
Case "startQuietCleaningDescription2"
|
||||||
|
getCroatian = "biće učitani u dokument."
|
||||||
Exit Function
|
Exit Function
|
||||||
Case "buttonYes"
|
Case "buttonYes"
|
||||||
getCroatian = "Da"
|
getCroatian = "Da"
|
||||||
|
|
@ -968,6 +989,12 @@ Function getCroatian(identifier As String) As String
|
||||||
Case "selectTemplateDialogTitle"
|
Case "selectTemplateDialogTitle"
|
||||||
getCroatian = "Izaberite obrazac sa liste"
|
getCroatian = "Izaberite obrazac sa liste"
|
||||||
Exit Function
|
Exit Function
|
||||||
|
Case "templateNotSelected"
|
||||||
|
getCroatian = "Šablon nije izabran"
|
||||||
|
Exit Function
|
||||||
|
Case "templateChosen"
|
||||||
|
getCroatian = "Izabrani šablon"
|
||||||
|
Exit Function
|
||||||
Case Else
|
Case Else
|
||||||
getCroatian = "No translation"
|
getCroatian = "No translation"
|
||||||
End Select
|
End Select
|
||||||
|
|
@ -978,8 +1005,11 @@ Function getSerbian(identifier As String) As String
|
||||||
Case "noFileWithStylesFound"
|
Case "noFileWithStylesFound"
|
||||||
getSerbian = "Датотека шаблона која садржи стилове за учитавање у документ није наведена." & chr(10) &"Можете изабрати нови šablon на рачунару. " & chr(10) & "Ако датотека шаблона није изабрана, овај корак чишћења ће се прескочити."
|
getSerbian = "Датотека шаблона која садржи стилове за учитавање у документ није наведена." & chr(10) &"Можете изабрати нови šablon на рачунару. " & chr(10) & "Ако датотека шаблона није изабрана, овај корак чишћења ће се прескочити."
|
||||||
Exit Function
|
Exit Function
|
||||||
Case "startQuietCleaningDescription"
|
Case "startQuietCleaningDescription1"
|
||||||
getSerbian = "Да ли желите да почнете са чишћењем документа?" & chr(10) & "Овде можете да одредите и нову датотеку шаблона." & chr(10) & "Стилови из шаблона биће учитани у документ."
|
getSerbian = "Да ли желите да почнете са чишћењем документа?" & chr(10) & "Овде можете да одредите и нову датотеку шаблона." & chr(10) & "Стилови из шаблона "
|
||||||
|
Exit Function
|
||||||
|
Case "startQuietCleaningDescription2"
|
||||||
|
getSerbian = "биће учитани у документ."
|
||||||
Exit Function
|
Exit Function
|
||||||
Case "buttonYes"
|
Case "buttonYes"
|
||||||
getSerbian = "Да"
|
getSerbian = "Да"
|
||||||
|
|
@ -1284,6 +1314,12 @@ Function getSerbian(identifier As String) As String
|
||||||
Case "selectTemplateDialogTitle"
|
Case "selectTemplateDialogTitle"
|
||||||
getSerbian = "Изаберите образац са листе"
|
getSerbian = "Изаберите образац са листе"
|
||||||
Exit Function
|
Exit Function
|
||||||
|
Case "templateNotSelected"
|
||||||
|
getSerbian = "Шаблон није изабран"
|
||||||
|
Exit Function
|
||||||
|
Case "templateChosen"
|
||||||
|
getSerbian = "Изабрани шаблон"
|
||||||
|
Exit Function
|
||||||
Case Else
|
Case Else
|
||||||
getSerbian = "No translation"
|
getSerbian = "No translation"
|
||||||
End Select
|
End Select
|
||||||
|
|
@ -1294,8 +1330,11 @@ Function getBosnian(identifier As String) As String
|
||||||
Case "noFileWithStylesFound"
|
Case "noFileWithStylesFound"
|
||||||
getBosnian = "Datoteka predloška koja sadrži stilove za učitavanje u dokument nije navedena." & chr(10) &" Na računaru možete odabrati novi predložak. " & chr(10) &"Ako datoteka predloška nije odabrana, ovaj korak čišćenja će se preskočiti."
|
getBosnian = "Datoteka predloška koja sadrži stilove za učitavanje u dokument nije navedena." & chr(10) &" Na računaru možete odabrati novi predložak. " & chr(10) &"Ako datoteka predloška nije odabrana, ovaj korak čišćenja će se preskočiti."
|
||||||
Exit Function
|
Exit Function
|
||||||
Case "startQuietCleaningDescription"
|
Case "startQuietCleaningDescription1"
|
||||||
getBosnian = "Želite li započeti s čišćenjem dokumenta?" & chr(10) & "Ovdje možete odrediti i novu datoteku predloška." & chr(10) & "Stilovi iz predloška bit će učitani u dokument."
|
getBosnian = "Želite li započeti s čišćenjem dokumenta?" & chr(10) & "Ovdje možete odrediti i novu datoteku predloška." & chr(10) & "Stilovi iz predloška"
|
||||||
|
Exit Function
|
||||||
|
Case "startQuietCleaningDescription2"
|
||||||
|
getBosnian = " bit će učitani u dokument."
|
||||||
Exit Function
|
Exit Function
|
||||||
Case "buttonYes"
|
Case "buttonYes"
|
||||||
getBosnian = "Da"
|
getBosnian = "Da"
|
||||||
|
|
@ -1600,6 +1639,12 @@ Function getBosnian(identifier As String) As String
|
||||||
Case "selectTemplateDialogTitle"
|
Case "selectTemplateDialogTitle"
|
||||||
getBosnian = "Изаберите образац са листе"
|
getBosnian = "Изаберите образац са листе"
|
||||||
Exit Function
|
Exit Function
|
||||||
|
Case "templateNotSelected"
|
||||||
|
getBosnian = "Šablon nije izabran"
|
||||||
|
Exit Function
|
||||||
|
Case "templateChosen"
|
||||||
|
getBosnian = "Izabrani šablon"
|
||||||
|
Exit Function
|
||||||
Case Else
|
Case Else
|
||||||
getBosnian = "No translation"
|
getBosnian = "No translation"
|
||||||
End Select
|
End Select
|
||||||
|
|
|
||||||
|
|
@ -11,7 +11,7 @@
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
<version value="0.9.38"/>
|
<version value="0.10.0"/>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
@ -186,13 +186,13 @@
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
<default xlink:href="icons/addon_icon.png"/>
|
<default xlink:href="icons/addon_icon.svg"/>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
<high-contrast xlink:href="icons/addon_icon.png"/>
|
<high-contrast xlink:href="icons/addon_icon.svg"/>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -1 +1 @@
|
||||||
version=0.9.38
|
version=0.10.0
|
||||||
|
|
|
||||||
BIN
translations.ods
BIN
translations.ods
Binary file not shown.
Loading…
Add table
Reference in a new issue