diff options
| author | Tamas Bunth <tamas.bunth@collabora.co.uk> | 2017-09-07 22:00:01 +0200 |
|---|---|---|
| committer | Tamás Bunth <btomi96@gmail.com> | 2017-09-08 09:29:36 +0200 |
| commit | 8e8c789742874ac823e68f6154050c64b6fc5b85 (patch) | |
| tree | 39c3f0bbb622a215c76f1dc73c7ed78ecf420667 /include/vbahelper | |
| parent | loplugin:constantparam (diff) | |
| download | core-8e8c789742874ac823e68f6154050c64b6fc5b85.tar.gz core-8e8c789742874ac823e68f6154050c64b6fc5b85.zip | |
oovbaapi: create XOval and XLine shape types
This is needed in order to make "TypeOf myLine Is Line" or similar
expressions return the expected "true" value.
The implementation of the basic interpreter of TypeOf uses XTypeProvider
to determine the type of an object by getting the last part of the type
name. E.g. "ooo:vba::msforms::XLine" is determined as a "Line". That's
why I created the XLine and XOval blank classes.
TypeOf doc:
https://docs.microsoft.com/en-us/dotnet/visual-basic/language-reference/operators/typeof-operator
Change-Id: Ia49cc92d672e30d0126f02d61a55a956ac1425f0
Reviewed-on: https://gerrit.libreoffice.org/42083
Tested-by: Jenkins <ci@libreoffice.org>
Reviewed-by: Tamás Bunth <btomi96@gmail.com>
Diffstat (limited to 'include/vbahelper')
| -rw-r--r-- | include/vbahelper/vbashape.hxx | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/include/vbahelper/vbashape.hxx b/include/vbahelper/vbashape.hxx index 17f459fa4ad6..dfc6973cbcb7 100644 --- a/include/vbahelper/vbashape.hxx +++ b/include/vbahelper/vbashape.hxx @@ -84,6 +84,8 @@ public: /// @throws css::uno::RuntimeException static sal_Int32 getType( const css::uno::Reference< css::drawing::XShape >& rShape ); + static sal_Int32 getAutoShapeType( const css::uno::Reference< css::drawing::XShape >& rShape ); + // Attributes virtual OUString SAL_CALL getName() override; virtual void SAL_CALL setName( const OUString& _name ) override; |