30 using ::com::sun::star::xml::sax::XFastAttributeList;
31 using ::com::sun::star::beans::PropertyValue;
32 using ::com::sun::star::uno::Reference;
33 using ::com::sun::star::uno::Sequence;
36 constexpr OUStringLiteral
gsEventType(u
"EventType");
37 constexpr OUStringLiteral
gsLibrary(u
"Library");
38 constexpr OUStringLiteral
gsMacroName(u
"MacroName");
39 constexpr OUStringLiteral
gsStarBasic(u
"StarBasic");
51 const Reference<XFastAttributeList> & xAttrList,
53 const OUString& rApiEventName)
56 OUString sMacroNameVal;
61 sMacroNameVal = aIter.toString();
67 if( sMacroNameVal.getLength() > rApp.getLength()+1 &&
69 ':' == sMacroNameVal[rApp.getLength()] )
71 sLibraryVal =
"StarOffice";
72 sMacroNameVal = sMacroNameVal.copy( rApp.getLength()+1 );
74 else if( sMacroNameVal.getLength() > rDoc.getLength()+1 &&
76 ':' == sMacroNameVal[rDoc.getLength()] )
79 sMacroNameVal = sMacroNameVal.copy( rDoc.getLength()+1 );
82 Sequence<PropertyValue> aValues(3);
90 aValues[1].Value <<= sLibraryVal;
94 aValues[2].Value <<= sMacroNameVal;
constexpr OUStringLiteral gsMacroName(u"MacroName")
virtual ~XMLStarBasicContextFactory() override
FastAttributeList & castToFastAttributeList(const css::uno::Reference< css::xml::sax::XFastAttributeList > &xAttrList)
void AddEventValues(const OUString &rEventName, const css::uno::Sequence< css::beans::PropertyValue > &rValues)
constexpr OUStringLiteral gsLibrary(u"Library")
XMLStarBasicContextFactory()
virtual SvXMLImportContext * CreateContext(SvXMLImport &rImport, const css::uno::Reference< css::xml::sax::XFastAttributeList > &xAttrList, XMLEventsImportContext *rEvents, const OUString &rApiEventName) override
This class deliberately does not support XWeak, to improve performance when loading large documents...
constexpr OUStringLiteral gsEventType(u"EventType")
bool equalsIgnoreAsciiCase(std::u16string_view s1, std::u16string_view s2)
const OUString & GetXMLToken(enum XMLTokenEnum eToken)
return the OUString representation for eToken
Handling of tokens in XML:
#define XML_ELEMENT(prefix, name)
constexpr OUStringLiteral gsStarBasic(u"StarBasic")