The Application Programming Interface and the OASIS Open Document Format
wertual
Posts: 1 Joined: Wed Jul 15, 2020 5:00 pm
Post
by wertual Wed Jul 15, 2020 6:09 pm
Hi Tim!
Let me ask you a question that is not related to the subject of your message.
Please tell me, where you can read about options storeProps [0] .Name = "FilterName",
as well as a list of properties for saving the PDF file, example: aFilterData [0] .Name = "InitialView" and others.
The security question is very interested: aFilterData [6] .Name = "PermissionPassword".
I’ve been looking for a manual for this data for a very long time, but I can’t find it anywhere. I would be very grateful if you tell me where to look for it.
Last edited by
MrProgrammer on Wed Sep 30, 2020 5:17 pm, edited 4 times in total.
Reason: Off-topic, but valuable, question requires new topic; Tagged ✓ [Solved] Windows 10. LibreOffice 6.4.3
RoryOF
Moderator
Posts: 33490 Joined: Sat Jan 31, 2009 9:30 pmLocation: Ireland
Post
by RoryOF Wed Jul 15, 2020 7:56 pm
There is some discussion on Properties at
https://wiki.openoffice.org/wiki/Docume ... Properties
You ,may have to write some macro code to retrieve the properties in which you are interested.
Apache OpenOffice 4.1.12 on Xubuntu 20.04.4 and very infrequently on Win2K/XP
ms777
Volunteer
Posts: 145 Joined: Mon Oct 08, 2007 1:33 am
Post
by ms777 Fri Sep 25, 2020 2:09 pm
Hi,
these are the filter options:
/org.openoffice.Office.Common/Filter/PDF/Export/AllowDuplicateFieldNames: False
This list has been generated on AOO 4.1.6 using the following code:
Code: Select all
Sub Main
Dim kRow as Integer
'sXCU = "/org.openoffice.Office.UI.CalcWindowState/"
'sXCU = "/org.openoffice.Office.UI.WriterWindowState/"
'sXCU = "/org.openoffice.Office.UI.WriterCommands/"
'sXCU = "/org.openoffice.Office.Common/"
'sXCU = "/org.openoffice.Office.Writer/"
'sXCU = "/org.openoffice.Office.UI/"
sXCU = "/org.openoffice.Office.Common/Filter/PDF/Export/"
oDoc = StarDesktop.LoadComponentFromURL("private:factory/scalc","_default",0,Array())
oSheet = oDoc.sheets.getByIndex(0)
kRow = 0
call addConfig(oSheet, kRow, 0, sXCU )
end sub
sub addConfig(oSheet as Any, kRow as Integer, kCol as Integer, sXCU as String)
asElNames = getConfigurationValues( sXCU)
if UBound(asElNames) < 0 then exit sub
oSheet.getCellByPosition(kCol, kRow).String = sXCU
kRow = kRow + 1
for k=LBound(asElNames) to UBound(asElNames)
sXCU1 = sXCU & asElNames(k) & "/"
oo = getConfigurationValue(sXCU, asElNames(k))
if Typename(oo)="Object" then
' if HasUnoInterfaces(oo, "com.sun.star.container.XHierarchicalName") then
call addConfig(oSheet, kRow, kCol+1, oo.HierarchicalName)
' endif
elseif (Typename(oo)="String") or (Typename(oo)="Long") or (Typename(oo)="Boolean") then
oSheet.getCellByPosition(kCol+1, kRow).String = sXCU & asElNames(k) & ": " & oo
kRow = kRow + 1
else
oSheet.getCellByPosition(kCol+1, kRow).String = sXCU & asElNames(k) & ": " & Typename(oo)
kRow = kRow + 1
endif
next k
End Sub
Hope that helps,
ms777
