Kaydet (Commit) 44dc8746 authored tarafından Noel Power's avatar Noel Power

remove VBA_OOBUILD_HACK and friends

Change-Id: I5c21a407bcae1b668976b94a757d564120973b1a
üst 65736905
...@@ -32,10 +32,6 @@ $(eval $(call gb_Library_set_include,vbaobj,\ ...@@ -32,10 +32,6 @@ $(eval $(call gb_Library_set_include,vbaobj,\
$(eval $(call gb_Library_set_componentfile,vbaobj,sc/util/vbaobj)) $(eval $(call gb_Library_set_componentfile,vbaobj,sc/util/vbaobj))
$(eval $(call gb_Library_add_defs,vbaobj,\
-DVBA_OOBUILD_HACK \
))
$(eval $(call gb_Library_use_api,vbaobj,\ $(eval $(call gb_Library_use_api,vbaobj,\
offapi \ offapi \
oovbaapi \ oovbaapi \
......
...@@ -2954,11 +2954,7 @@ getPasteFlags (sal_Int32 Paste) ...@@ -2954,11 +2954,7 @@ getPasteFlags (sal_Int32 Paste)
nFlags = IDF_FORMULA;break; nFlags = IDF_FORMULA;break;
case excel::XlPasteType::xlPasteFormulasAndNumberFormats : case excel::XlPasteType::xlPasteFormulasAndNumberFormats :
case excel::XlPasteType::xlPasteValues: case excel::XlPasteType::xlPasteValues:
#ifdef VBA_OOBUILD_HACK
nFlags = ( IDF_VALUE | IDF_DATETIME | IDF_STRING | IDF_SPECIAL_BOOLEAN ); break; nFlags = ( IDF_VALUE | IDF_DATETIME | IDF_STRING | IDF_SPECIAL_BOOLEAN ); break;
#else
nFlags = ( IDF_VALUE | IDF_DATETIME | IDF_STRING ); break;
#endif
case excel::XlPasteType::xlPasteValuesAndNumberFormats: case excel::XlPasteType::xlPasteValuesAndNumberFormats:
nFlags = IDF_VALUE | IDF_ATTRIB; break; nFlags = IDF_VALUE | IDF_ATTRIB; break;
case excel::XlPasteType::xlPasteColumnWidths: case excel::XlPasteType::xlPasteColumnWidths:
...@@ -3566,17 +3562,13 @@ ScVbaRange::Sort( const uno::Any& Key1, const uno::Any& Order1, const uno::Any& ...@@ -3566,17 +3562,13 @@ ScVbaRange::Sort( const uno::Any& Key1, const uno::Any& Order1, const uno::Any&
if ( nOrientation == excel::XlSortOrientation::xlSortRows ) if ( nOrientation == excel::XlSortOrientation::xlSortRows )
bIsSortColumns = sal_True; bIsSortColumns = sal_True;
sal_Int16 nHeader = 0; sal_Int16 nHeader = 0;
#ifdef VBA_OOBUILD_HACK
nHeader = aSortParam.nCompatHeader; nHeader = aSortParam.nCompatHeader;
#endif
sal_Bool bContainsHeader = false; sal_Bool bContainsHeader = false;
if ( Header.hasValue() ) if ( Header.hasValue() )
{ {
nHeader = ::comphelper::getINT16( Header ); nHeader = ::comphelper::getINT16( Header );
#ifdef VBA_OOBUILD_HACK
aSortParam.nCompatHeader = nHeader; aSortParam.nCompatHeader = nHeader;
#endif
} }
if ( nHeader == excel::XlYesNoGuess::xlGuess ) if ( nHeader == excel::XlYesNoGuess::xlGuess )
...@@ -3587,9 +3579,7 @@ ScVbaRange::Sort( const uno::Any& Key1, const uno::Any& Order1, const uno::Any& ...@@ -3587,9 +3579,7 @@ ScVbaRange::Sort( const uno::Any& Key1, const uno::Any& Order1, const uno::Any&
nHeader = excel::XlYesNoGuess::xlYes; nHeader = excel::XlYesNoGuess::xlYes;
else else
nHeader = excel::XlYesNoGuess::xlNo; nHeader = excel::XlYesNoGuess::xlNo;
#ifdef VBA_OOBUILD_HACK
aSortParam.nCompatHeader = nHeader; aSortParam.nCompatHeader = nHeader;
#endif
} }
if ( nHeader == excel::XlYesNoGuess::xlYes ) if ( nHeader == excel::XlYesNoGuess::xlYes )
...@@ -5574,12 +5564,10 @@ ScVbaRange::AutoFill( const uno::Reference< excel::XRange >& Destination, const ...@@ -5574,12 +5564,10 @@ ScVbaRange::AutoFill( const uno::Reference< excel::XRange >& Destination, const
break; break;
} }
} }
#ifdef VBA_OOBUILD_HACK
double fEndValue = MAXDOUBLE; double fEndValue = MAXDOUBLE;
ScDocShell* pDocSh = excel::GetDocShellFromRange( mxRange ); ScDocShell* pDocSh = excel::GetDocShellFromRange( mxRange );
pDocSh->GetDocFunc().FillAuto( aSourceRange, NULL, eDir, eCmd, eDateCmd, pDocSh->GetDocFunc().FillAuto( aSourceRange, NULL, eDir, eCmd, eDateCmd,
nCount, fStep, fEndValue, sal_True, sal_True ); nCount, fStep, fEndValue, sal_True, sal_True );
#endif
} }
sal_Bool SAL_CALL sal_Bool SAL_CALL
ScVbaRange::GoalSeek( const uno::Any& Goal, const uno::Reference< excel::XRange >& ChangingCell ) throw (uno::RuntimeException) ScVbaRange::GoalSeek( const uno::Any& Goal, const uno::Reference< excel::XRange >& ChangingCell ) throw (uno::RuntimeException)
......
...@@ -960,7 +960,6 @@ ScVbaWorksheet::Spinners( const uno::Any& /*rIndex*/ ) throw (uno::RuntimeExcept ...@@ -960,7 +960,6 @@ ScVbaWorksheet::Spinners( const uno::Any& /*rIndex*/ ) throw (uno::RuntimeExcept
void SAL_CALL void SAL_CALL
ScVbaWorksheet::ShowDataForm( ) throw (uno::RuntimeException) ScVbaWorksheet::ShowDataForm( ) throw (uno::RuntimeException)
{ {
#ifdef VBA_OOBUILD_HACK
uno::Reference< frame::XModel > xModel( getModel(), uno::UNO_QUERY_THROW ); uno::Reference< frame::XModel > xModel( getModel(), uno::UNO_QUERY_THROW );
ScTabViewShell* pTabViewShell = excel::getBestViewShell( xModel ); ScTabViewShell* pTabViewShell = excel::getBestViewShell( xModel );
...@@ -971,9 +970,6 @@ ScVbaWorksheet::ShowDataForm( ) throw (uno::RuntimeException) ...@@ -971,9 +970,6 @@ ScVbaWorksheet::ShowDataForm( ) throw (uno::RuntimeException)
OSL_ENSURE(pDlg, "Dialog create fail!"); OSL_ENSURE(pDlg, "Dialog create fail!");
pDlg->Execute(); pDlg->Execute();
#else
throw uno::RuntimeException( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("Not implemented") ), uno::Reference< uno::XInterface >() );
#endif
} }
uno::Any SAL_CALL uno::Any SAL_CALL
......
...@@ -183,6 +183,7 @@ $(eval $(call gb_Library_add_exception_objects,svt,\ ...@@ -183,6 +183,7 @@ $(eval $(call gb_Library_add_exception_objects,svt,\
svtools/source/java/javacontext \ svtools/source/java/javacontext \
svtools/source/java/javainteractionhandler \ svtools/source/java/javainteractionhandler \
svtools/source/misc/acceleratorexecute \ svtools/source/misc/acceleratorexecute \
svtools/source/misc/bindablecontrolhelper \
svtools/source/misc/chartprettypainter \ svtools/source/misc/chartprettypainter \
svtools/source/misc/cliplistener \ svtools/source/misc/cliplistener \
svtools/source/misc/dialogclosedlistener \ svtools/source/misc/dialogclosedlistener \
......
...@@ -39,6 +39,7 @@ $(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/accessibletableprovide ...@@ -39,6 +39,7 @@ $(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/accessibletableprovide
$(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/addresstemplate.hxx,svtools/addresstemplate.hxx)) $(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/addresstemplate.hxx,svtools/addresstemplate.hxx))
$(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/apearcfg.hxx,svtools/apearcfg.hxx)) $(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/apearcfg.hxx,svtools/apearcfg.hxx))
$(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/asynclink.hxx,svtools/asynclink.hxx)) $(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/asynclink.hxx,svtools/asynclink.hxx))
$(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/bindablecontrolhelper.hxx,svtools/bindablecontrolhelper.hxx))
$(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/borderhelper.hxx,svtools/borderhelper.hxx)) $(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/borderhelper.hxx,svtools/borderhelper.hxx))
$(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/brwbox.hxx,svtools/brwbox.hxx)) $(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/brwbox.hxx,svtools/brwbox.hxx))
$(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/brwhead.hxx,svtools/brwhead.hxx)) $(eval $(call gb_Package_add_file,svtools_inc,inc/svtools/brwhead.hxx,svtools/brwhead.hxx))
......
...@@ -36,9 +36,7 @@ ...@@ -36,9 +36,7 @@
#include <com/sun/star/form/XChangeListener.hpp> #include <com/sun/star/form/XChangeListener.hpp>
#include <ooo/vba/XControlProvider.hpp> #include <ooo/vba/XControlProvider.hpp>
#include <ooo/vba/msforms/fmMousePointer.hpp> #include <ooo/vba/msforms/fmMousePointer.hpp>
#ifdef VBA_OOBUILD_HACK
#include <svtools/bindablecontrolhelper.hxx> #include <svtools/bindablecontrolhelper.hxx>
#endif
#include "vbacontrol.hxx" #include "vbacontrol.hxx"
#include "vbacombobox.hxx" #include "vbacombobox.hxx"
#include "vbabutton.hxx" #include "vbabutton.hxx"
...@@ -281,7 +279,6 @@ ScVbaControl::getControlSource() throw (uno::RuntimeException) ...@@ -281,7 +279,6 @@ ScVbaControl::getControlSource() throw (uno::RuntimeException)
// #FIXME I *hate* having these upstream differences // #FIXME I *hate* having these upstream differences
// but this is necessary until I manage to upstream other // but this is necessary until I manage to upstream other
// dependant parts // dependant parts
#ifdef VBA_OOBUILD_HACK
rtl::OUString sControlSource; rtl::OUString sControlSource;
uno::Reference< form::binding::XBindableValue > xBindable( m_xProps, uno::UNO_QUERY ); uno::Reference< form::binding::XBindableValue > xBindable( m_xProps, uno::UNO_QUERY );
if ( xBindable.is() ) if ( xBindable.is() )
...@@ -301,26 +298,18 @@ ScVbaControl::getControlSource() throw (uno::RuntimeException) ...@@ -301,26 +298,18 @@ ScVbaControl::getControlSource() throw (uno::RuntimeException)
} }
} }
return sControlSource; return sControlSource;
#else
throw uno::RuntimeException( rtl::OUString( "getControlSource not supported" ), uno::Reference< uno::XInterface >()); // not supported
#endif
} }
void SAL_CALL void SAL_CALL
ScVbaControl::setControlSource( const rtl::OUString& _controlsource ) throw (uno::RuntimeException) ScVbaControl::setControlSource( const rtl::OUString& _controlsource ) throw (uno::RuntimeException)
{ {
#ifdef VBA_OOBUILD_HACK
rtl::OUString sEmpty; rtl::OUString sEmpty;
svt::BindableControlHelper::ApplyListSourceAndBindableData( m_xModel, m_xProps, _controlsource, sEmpty ); svt::BindableControlHelper::ApplyListSourceAndBindableData( m_xModel, m_xProps, _controlsource, sEmpty );
#else
throw uno::RuntimeException( rtl::OUString( "setControlSource not supported " ).concat( _controlsource ), uno::Reference< uno::XInterface >()); // not supported
#endif
} }
rtl::OUString SAL_CALL rtl::OUString SAL_CALL
ScVbaControl::getRowSource() throw (uno::RuntimeException) ScVbaControl::getRowSource() throw (uno::RuntimeException)
{ {
#ifdef VBA_OOBUILD_HACK
rtl::OUString sRowSource; rtl::OUString sRowSource;
uno::Reference< form::binding::XListEntrySink > xListSink( m_xProps, uno::UNO_QUERY ); uno::Reference< form::binding::XListEntrySink > xListSink( m_xProps, uno::UNO_QUERY );
if ( xListSink.is() ) if ( xListSink.is() )
...@@ -341,20 +330,13 @@ ScVbaControl::getRowSource() throw (uno::RuntimeException) ...@@ -341,20 +330,13 @@ ScVbaControl::getRowSource() throw (uno::RuntimeException)
} }
} }
return sRowSource; return sRowSource;
#else
throw uno::RuntimeException( rtl::OUString( "getRowSource not supported" ), uno::Reference< uno::XInterface >()); // not supported
#endif
} }
void SAL_CALL void SAL_CALL
ScVbaControl::setRowSource( const rtl::OUString& _rowsource ) throw (uno::RuntimeException) ScVbaControl::setRowSource( const rtl::OUString& _rowsource ) throw (uno::RuntimeException)
{ {
#ifdef VBA_OOBUILD_HACK
rtl::OUString sEmpty; rtl::OUString sEmpty;
svt::BindableControlHelper::ApplyListSourceAndBindableData( m_xModel, m_xProps, sEmpty, _rowsource ); svt::BindableControlHelper::ApplyListSourceAndBindableData( m_xModel, m_xProps, sEmpty, _rowsource );
#else
throw uno::RuntimeException( rtl::OUString( "setRowSource not supported " ).concat( _rowsource ), uno::Reference< uno::XInterface >()); // not supported
#endif
} }
rtl::OUString SAL_CALL rtl::OUString SAL_CALL
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment