Translations
This commit is contained in:
parent
fd39bd91ff
commit
dc13387975
11 changed files with 187 additions and 70 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue