20#include <com/sun/star/beans/XPropertySet.hpp>
21#include <com/sun/star/drawing/TextFitToSizeType.hpp>
22#include <com/sun/star/drawing/XShape.hpp>
29VbaTextFrame::VbaTextFrame(
const uno::Reference< XHelperInterface >& xParent,
const uno::Reference< uno::XComponentContext >& xContext, uno::Reference< drawing::XShape > xShape ) :
VbaTextFrame_BASE( xParent, xContext ), m_xShape(
std::move( xShape ))
46 sal_Int32 nMargin = 0;
54 sal_Int32 nMargin = Millimeter::getInHundredthsOfOneMillimeter( fMargin );
65 bool bAutosize =
false;
67 aTextAutoGrowHeight >>= bAutosize;
81 sal_Int32 nMargin =
getMargin(
"TextLowerDistance" );
82 float fMargin =
static_cast<float>(Millimeter::getInPoints( nMargin ));
89 setMargin(
"TextLowerDistance", _marginbottom );
95 sal_Int32 nMargin =
getMargin(
"TextUpperDistance" );
96 float fMargin =
static_cast<float>(Millimeter::getInPoints( nMargin ));
103 setMargin(
"TextUpperDistance", _margintop );
109 sal_Int32 nMargin =
getMargin(
"TextLeftDistance" );
110 float fMargin =
static_cast<float>(Millimeter::getInPoints( nMargin ));
117 setMargin(
"TextLeftDistance", _marginleft );
123 sal_Int32 nMargin =
getMargin(
"TextRightDistance" );
124 float fMargin =
static_cast<float>(Millimeter::getInPoints( nMargin ));
131 setMargin(
"TextRightDistance" , _marginright );
139 throw uno::RuntimeException(
"Not implemented" );
145 return "VbaTextFrame";
148uno::Sequence< OUString >
153 "ooo.vba.msforms.TextFrame"
virtual void SAL_CALL setAutoSize(sal_Bool _autosize) override
css::uno::Reference< css::beans::XPropertySet > m_xPropertySet
VbaTextFrame(const css::uno::Reference< ov::XHelperInterface > &xParent, const css::uno::Reference< css::uno::XComponentContext > &xContext, css::uno::Reference< css::drawing::XShape > xShape)
virtual float SAL_CALL getMarginTop() override
sal_Int32 getMargin(const OUString &sMarginType)
virtual void SAL_CALL setMarginRight(float _marginright) override
virtual float SAL_CALL getMarginRight() override
css::uno::Reference< css::drawing::XShape > m_xShape
virtual float SAL_CALL getMarginBottom() override
virtual void SAL_CALL setMarginLeft(float _marginleft) override
virtual void SAL_CALL setMarginTop(float _margintop) override
virtual css::uno::Any SAL_CALL Characters() override
virtual sal_Bool SAL_CALL getAutoSize() override
void setMargin(const OUString &sMarginType, float fMargin)
virtual void SAL_CALL setMarginBottom(float _marginbottom) override
virtual OUString getServiceImplName() override
virtual css::uno::Sequence< OUString > getServiceNames() override
virtual float SAL_CALL getMarginLeft() override
Sequence< OUString > aServiceNames