Add a (dummy) ooo::vba::word::XApplication::ShowMe() implementation

Some customer VB6 code calls it. It doesn't seem to do anything
interesting in Word either, so I don't feel that bad for it not doing
anything in Writer.

Change-Id: I81162fcdd0caa22b19760f8cb40266f7f571d8ce
Reviewed-on: https://gerrit.libreoffice.org/55069Tested-by: Jenkins <ci@libreoffice.org>
Reviewed-by: Tor Lillqvist <tml@collabora.com>

oovbaapi/ooo/vba/word/XApplication.idl

@@ -46,6 +46,7 @@ interface XApplication : com::sun::star::uno::XInterface
     any Dialogs( [in] any Index );
     any ListGalleries( [in] any aIndex );
     float CentimetersToPoints([in] float Centimeters );
+    void ShowMe();
 };
 
 }; }; };

sw/source/ui/vba/vbaapplication.cxx

@@ -154,6 +154,11 @@ float SAL_CALL SwVbaApplication::CentimetersToPoints( float Centimeters )
     return VbaApplicationBase::CentimetersToPoints( Centimeters );
 }
 
+void SAL_CALL SwVbaApplication::ShowMe()
+{
+    // No idea what we should or could do
+}
+
 uno::Reference< frame::XModel >
 SwVbaApplication::getCurrentDocument()
 {

sw/source/ui/vba/vbaapplication.hxx

@@ -55,6 +55,7 @@ public:
     virtual sal_Int32 SAL_CALL getEnableCancelKey() override;
     virtual void SAL_CALL setEnableCancelKey( sal_Int32 _enableCancelKey ) override;
     virtual float SAL_CALL CentimetersToPoints( float Centimeters ) override;
+    virtual void SAL_CALL ShowMe() override;
     // XHelperInterface
     virtual OUString getServiceImplName() override;
     virtual css::uno::Sequence<OUString> getServiceNames() override;