Add XServiceInfo tests to ScTableColumnObj

Change-Id: Id8f78e2b114945f2c2499739711db9223828314a
Reviewed-on: https://gerrit.libreoffice.org/71609
Tested-by: Jenkins
Reviewed-by: Jens Carl <j.carl43@gmx.de>

sc/qa/extras/sctablecolumnobj.cxx

@@ -10,6 +10,7 @@
 #include <test/calc_unoapi_test.hxx>
 #include <test/beans/xpropertyset.hxx>
 #include <test/container/xnamed.hxx>
+#include <test/lang/xserviceinfo.hxx>
 #include <test/table/tablecolumn.hxx>
 #include <test/table/xcellrange.hxx>
 
@@ -32,7 +33,8 @@ class ScTableColumnObj : public CalcUnoApiTest,
                          public apitest::TableColumn,
                          public apitest::XCellRange,
                          public apitest::XNamed,
-                         public apitest::XPropertySet
+                         public apitest::XPropertySet,
+                         public apitest::XServiceInfo
 {
 public:
     ScTableColumnObj();
@@ -63,6 +65,11 @@ public:
     CPPUNIT_TEST(testPropertyChangeListener);
     CPPUNIT_TEST(testVetoableChangeListener);
 
+    // XServiceInfo
+    CPPUNIT_TEST(testGetImplementationName);
+    CPPUNIT_TEST(testGetSupportedServiceNames);
+    CPPUNIT_TEST(testSupportsService);
+
     CPPUNIT_TEST_SUITE_END();
 
 private:
@@ -108,6 +115,7 @@ ScTableColumnObj::ScTableColumnObj()
           "ValidationXML",
           "WritingMode",
       })
+    , XServiceInfo("ScTableColumnObj", "com.sun.star.table.TableColumn")
 {
 }