Translations

This commit is contained in:
Georgy Litvinov 2020-05-05 14:01:41 +02:00
parent fd39bd91ff
commit dc13387975
11 changed files with 187 additions and 70 deletions

View file

@ -7,7 +7,15 @@ Sub openFootNotesDialog
Dim dialog As Object
DialogLibraries.LoadLibrary("ePublishing")
dialog = CreateUnoDialog(DialogLibraries.ePublishing.FootnotesConfig)
dialog.setVisible(true)
dialog.getControl("buttonOK").Label = getTranslation("buttonOk")
dialog.getControl("buttonCancel").Label = getTranslation("buttonCancel")
dialog.getControl("configText1").setText(getTranslation("configText1"))
dialog.getControl("configText2").setText(getTranslation("configText2"))
dialog.getControl("configText3").setText(getTranslation("configText3"))
dialog.getControl("configText4").setText(getTranslation("configText4"))
dialog.getControl("configText5").setText(getTranslation("configText5"))
dialog.Title = getTranslation("footnotesConfigDialogTitle")
dialog.setVisible(true)
Select Case dialog.Execute()
Case 1
setFootnotesNumberingFrom(dialog)
@ -25,10 +33,10 @@ Sub setFootnotesNumberingFrom(dialog)
targetLevel = dialog.getControl("level").Value
If targetLevel > -1 AND targetLevel < 11 Then
statusIndicator.Start("Нумерую сноски",100)
statusIndicator.Start(getTranslation("statusNumberingInProcess"),100)
setFootnotesNumberingLevel(targetLevel)
Else
MsgBox "Значение уровня заголовков вне допустимого диапазона. Введите число от 0 до 10."
MsgBox getTranslation("numberingInputOutOfRange")
EndIf
statusIndicator.end()
@ -50,7 +58,7 @@ Sub setFootnotesNumberingLevel(level)
Dim statusIndicator as Object
statusIndicator = ThisComponent.getCurrentController.statusIndicator
statusIndicator.Start("Нумерация сносок запущена, подождите",30)
statusIndicator.Start(getTranslation("statusNumberingInProcess"),30)
curNum = 1
@ -126,7 +134,7 @@ Sub setFootnotesNumberingLevel(level)
EndIf
Wend
statusIndicator.end()
MsgBox "Нумерация сносок успешно завершена."
MsgBox getTranslation("statusNumberingFinished")
End Sub
Private Sub doNotTrack