From 37c469c866df12001c92031355ab42ddfa26558c Mon Sep 17 00:00:00 2001 From: Georgy Litvinov Date: Tue, 5 May 2020 18:47:09 +0200 Subject: [PATCH] Save --- ePublishing/PageConfig.xdl | 30 +- ePublishing/PageStyles.xba | 25 +- ePublishing/journals.xba | 2 +- images/panel.svg | 2002 ++++++++++++++++++++++++++++++++++++ 4 files changed, 2049 insertions(+), 10 deletions(-) create mode 100644 images/panel.svg diff --git a/ePublishing/PageConfig.xdl b/ePublishing/PageConfig.xdl index e3ac501..934b5eb 100644 --- a/ePublishing/PageConfig.xdl +++ b/ePublishing/PageConfig.xdl @@ -1,14 +1,28 @@ - + - - + - - - - + + + + + + + + + + + + + + + + + + + - \ No newline at end of file + diff --git a/ePublishing/PageStyles.xba b/ePublishing/PageStyles.xba index 46ccab8..3034779 100644 --- a/ePublishing/PageStyles.xba +++ b/ePublishing/PageStyles.xba @@ -1,6 +1,29 @@ -Sub setDimensions +Sub pageStylesDialog + DialogLibraries.LoadLibrary("ePublishing") + Dim dialog As Object + Dim listBox As Object + Dim oStyles As Object + Dim pageStyles As Object + Dim pageStyleNames() As String + oStyles = ThisComponent.StyleFamilies + pageStyles = oStyles.getByName(oStyles.elementNames(2)) + pageStyleNames = pageStyles.getElementNames + 'Globalscope.BasicLibraries.LoadLibrary( "MRILib" ) + 'MRI pageStyles + + + dialog = CreateUnoDialog( DialogLibraries.ePublishing.PageConfig ) + listBox = dialog.getControl("pageStyles") + listBox.addItems(pageStyleNames , 0) + dialog.Title = getTranslation("batchChangePageStyleProperties") + dialog.Execute() +End Sub + + + +Sub setDimensions Dim oStyles As Object Dim curStyle As Object Dim inputHeight As String diff --git a/ePublishing/journals.xba b/ePublishing/journals.xba index fe96723..0729ac8 100644 --- a/ePublishing/journals.xba +++ b/ePublishing/journals.xba @@ -1,6 +1,6 @@ -Private sub journalsMark13 +Private sub journalsMark14 End sub Dim templateName As String diff --git a/images/panel.svg b/images/panel.svg new file mode 100644 index 0000000..498bab4 --- /dev/null +++ b/images/panel.svg @@ -0,0 +1,2002 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + image/svg+xml + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +