29ScVbaCommandBarControl::ScVbaCommandBarControl(
const css::uno::Reference< ov::XHelperInterface >& xParent,
const css::uno::Reference< css::uno::XComponentContext >& xContext, css::uno::Reference< css::container::XIndexAccess > xSettings,
VbaCommandBarHelperRef pHelper, css::uno::Reference< css::container::XIndexAccess > xBarSettings, OUString sResourceUrl ) :
CommandBarControl_BASE( xParent, xContext ), pCBarHelper(
std::move( pHelper )), m_sResourceUrl(
std::move( sResourceUrl )), m_xCurrentSettings(
std::move( xSettings )), m_xBarSettings(
std::move( xBarSettings )),
m_nPosition( 0 )
35 uno::Reference< container::XIndexContainer > xIndexContainer(
m_xCurrentSettings, uno::UNO_QUERY_THROW );
52 OUString sCaption = _caption.replace(
'&',
'~');
74 SAL_INFO(
"vbahelper",
"ScVbaCommandBarControl::setOnAction: " << aCommandURL);
103 bool bEnabled =
true;
156 uno::Reference< container::XIndexContainer > xIndexContainer(
m_xCurrentSettings, uno::UNO_QUERY_THROW );
167 uno::Reference< container::XIndexAccess > xSubMenu;
170 throw uno::RuntimeException();
177 return uno::Any( xCommandBarControls );
183 return "ScVbaCommandBarControl";
186uno::Sequence<OUString>
191 "ooo.vba.CommandBarControl"
198 const css::uno::Reference< css::uno::XComponentContext >& xContext,
199 const css::uno::Reference< css::container::XIndexAccess >& xSettings,
201 const css::uno::Reference< css::container::XIndexAccess >& xBarSettings,
202 const OUString& sResourceUrl,
203 sal_Int32 nPosition )
213 return "ScVbaCommandBarPopup";
216uno::Sequence<OUString>
221 "ooo.vba.CommandBarPopup"
228 const css::uno::Reference< css::uno::XComponentContext >& xContext,
229 const css::uno::Reference< css::container::XIndexAccess >& xSettings,
231 const css::uno::Reference< css::container::XIndexAccess >& xBarSettings,
232 const OUString& sResourceUrl,
233 sal_Int32 nPosition )
243 return "ScVbaCommandBarButton";
246uno::Sequence<OUString>
251 "ooo.vba.CommandBarButton"
css::uno::Reference< css::uno::XComponentContext > mxContext
css::uno::Sequence< css::beans::PropertyValue > m_aPropertyValues
css::uno::Reference< css::container::XIndexAccess > m_xBarSettings
virtual css::uno::Any SAL_CALL Controls(const css::uno::Any &aIndex) override
virtual void SAL_CALL setCaption(const OUString &_caption) override
virtual OUString SAL_CALL getOnAction() override
virtual OUString getServiceImplName() override
virtual OUString SAL_CALL getCaption() override
virtual void SAL_CALL setVisible(sal_Bool _visible) override
VbaCommandBarHelperRef pCBarHelper
virtual css::uno::Sequence< OUString > getServiceNames() override
virtual void SAL_CALL Delete() override
virtual void SAL_CALL setEnabled(sal_Bool _enabled) override
css::uno::Reference< css::container::XIndexAccess > m_xCurrentSettings
virtual void SAL_CALL setOnAction(const OUString &_onaction) override
ScVbaCommandBarControl(const css::uno::Reference< ov::XHelperInterface > &xParent, const css::uno::Reference< css::uno::XComponentContext > &xContext, css::uno::Reference< css::container::XIndexAccess > xSettings, VbaCommandBarHelperRef pHelper, css::uno::Reference< css::container::XIndexAccess > xBarSettings, OUString sResourceUrl)
virtual sal_Bool SAL_CALL getBeginGroup() override
virtual void SAL_CALL setBeginGroup(sal_Bool _begin) override
virtual sal_Bool SAL_CALL getEnabled() override
virtual sal_Bool SAL_CALL getVisible() override
virtual OUString getServiceImplName() override
virtual css::uno::Sequence< OUString > getServiceNames() override
ScVbaCommandBarPopup(const css::uno::Reference< ov::XHelperInterface > &xParent, const css::uno::Reference< css::uno::XComponentContext > &xContext, const css::uno::Reference< css::container::XIndexAccess > &xSettings, const VbaCommandBarHelperRef &pHelper, const css::uno::Reference< css::container::XIndexAccess > &xBarSettings, const OUString &sResourceUrl, sal_Int32 nPosition)
std::deque< AttacherIndex_Impl > aIndex
Sequence< OUString > aServiceNames
#define SAL_INFO(area, stream)
void setPropertyValue(tPropertyValueMap &rOutMap, tPropertyValueMapKey key, const Value &value)
OUString makeMacroURL(std::u16string_view sMacroName)
uno::Any getPropertyValue(const uno::Sequence< beans::PropertyValue > &aProp, const OUString &aName)
SfxObjectShell * getSfxObjShell(const uno::Reference< frame::XModel > &xModel)
OUString resolveVBAMacro(SfxObjectShell const *pShell, const OUString &rLibName, const OUString &rModuleName, const OUString &rMacroName, bool bOnlyPublic, const OUString &sSkipModule)
Reference< XModel > xModel
PropertyValues m_aPropertyValues
cppu::ImplInheritanceHelper< ScVbaCommandBarControl, ov::XCommandBarPopup > CommandBarPopup_BASE
cppu::ImplInheritanceHelper< ScVbaCommandBarControl, ov::XCommandBarButton > CommandBarButton_BASE
constexpr OUStringLiteral ITEM_DESCRIPTOR_ISVISIBLE
std::shared_ptr< VbaCommandBarHelper > VbaCommandBarHelperRef
constexpr OUStringLiteral ITEM_DESCRIPTOR_ENABLED
constexpr OUStringLiteral ITEM_DESCRIPTOR_CONTAINER