reportdesign/source/core/sdr/RptObject.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: RptObject.cxx,v $
  10  * $Revision: 1.10 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30 #include "precompiled_reportdesign.hxx"
  31 #include "RptObject.hxx"
  32 #include <vector>
  33 #include <algorithm>
  34
  35 #include <RptDef.hxx>
  36 #include <svx/unoshape.hxx>
  37 #include "RptModel.hxx"
  38 #include "RptObjectListener.hxx"
  39 #include <toolkit/helper/vclunohelper.hxx>
  40 #include <toolkit/helper/convert.hxx>
  41 #include "RptPage.hxx"
  42 #include "corestrings.hrc"
  43 #include <dbaccess/singledoccontroller.hxx>
  44 #include "ModuleHelper.hxx"
  45
  46 #include <RptResId.hrc>
  47 #include <svx/xflclit.hxx>
  48 #include <svx/xlnclit.hxx>
  49 #include <svx/xlndsit.hxx>
  50 #include <svx/xlineit0.hxx>
  51 #include <svx/sderitm.hxx>
  52 #include <svx/xlnwtit.hxx>
  53 #include <svx/xlntrit.hxx>
  54 #include <com/sun/star/style/XStyle.hpp>
  55 #include <com/sun/star/awt/XTabControllerModel.hpp>
  56 #include <com/sun/star/awt/XUnoControlContainer.hpp>
  57 #include <com/sun/star/awt/XVclContainerPeer.hpp>
  58 #include <com/sun/star/awt/XWindow.hpp>
  59 #include <com/sun/star/beans/XPropertySet.hpp>
  60 #include <com/sun/star/beans/PropertyAttribute.hpp>
  61 #include <com/sun/star/script/XScriptEventsSupplier.hpp>
  62 #include <com/sun/star/container/XContainer.hpp>
  63 #include <com/sun/star/lang/XServiceInfo.hpp>
  64 #include <com/sun/star/report/XShape.hpp>
  65 #include <com/sun/star/report/XFixedLine.hpp>
  66 #include <com/sun/star/chart/ChartDataRowSource.hpp>
  67 #include <com/sun/star/chart2/data/XDataReceiver.hpp>
  68 #include <com/sun/star/chart2/data/DatabaseDataProvider.hpp>
  69 #include <com/sun/star/chart2/XChartDocument.hpp>
  70 #include <comphelper/genericpropertyset.hxx>
  71 #include <comphelper/processfactory.hxx>
  72 #include <comphelper/property.hxx>
  73 #include "PropertyForward.hxx"
  74 #include <connectivity/dbtools.hxx>
  75 #include "UndoActions.hxx"
  76 #include "UndoEnv.hxx"
  77 #include <algorithm>
  78 #include <functional>
  79
  80 namespace rptui
  81 {
  82
  83 using namespace ::com::sun::star;
  84 using namespace uno;
  85 using namespace beans;
  86 using namespace reportdesign;
  87 using namespace container;
  88 using namespace script;
  89 //----------------------------------------------------------------------------
  90 sal_uInt16 OObjectBase::getObjectType(const uno::Reference< report::XReportComponent>& _xComponent)
  91 {
  92         uno::Reference< lang::XServiceInfo > xServiceInfo( _xComponent , uno::UNO_QUERY );
  93     OSL_ENSURE(xServiceInfo.is(),"Who deletes the XServiceInfo interface!");
  94     if ( xServiceInfo.is() )
  95     {
  96             if ( xServiceInfo->supportsService( SERVICE_FIXEDTEXT ))
  97                     return OBJ_DLG_FIXEDTEXT;
  98         if ( xServiceInfo->supportsService( SERVICE_FIXEDLINE ))
  99         {
 100             uno::Reference< report::XFixedLine> xFixedLine(_xComponent,uno::UNO_QUERY);
 101             return xFixedLine->getOrientation() ? OBJ_DLG_HFIXEDLINE : OBJ_DLG_VFIXEDLINE;
 102         }
 103             if ( xServiceInfo->supportsService( SERVICE_IMAGECONTROL))
 104                     return OBJ_DLG_IMAGECONTROL;
 105             if ( xServiceInfo->supportsService( SERVICE_FORMATTEDFIELD ))
 106                     return OBJ_DLG_FORMATTEDFIELD;
 107         if ( xServiceInfo->supportsService( ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.drawing.OLE2Shape")) ) )
 108             return OBJ_OLE2;
 109         if ( xServiceInfo->supportsService( SERVICE_SHAPE ))
 110                     return OBJ_CUSTOMSHAPE;
 111         if ( xServiceInfo->supportsService( SERVICE_REPORTDEFINITION ) )
 112             return OBJ_DLG_SUBREPORT;
 113         return OBJ_OLE2;
 114     }
 115         return 0;
 116 }
 117 // -----------------------------------------------------------------------------
 118 SdrObject* OObjectBase::createObject(const uno::Reference< report::XReportComponent>& _xComponent)
 119 {
 120     SdrObject* pNewObj = NULL;
 121     sal_uInt16 nType = OObjectBase::getObjectType(_xComponent);
 122     switch( nType )
 123         {
 124                 case OBJ_DLG_FIXEDTEXT:
 125             {
 126                             OUnoObject* pUnoObj = new OUnoObject( _xComponent
 127                                     ,::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.component.FixedText"))
 128                                     ,OBJ_DLG_FIXEDTEXT);
 129                 pNewObj = pUnoObj;
 130
 131                 uno::Reference<beans::XPropertySet> xControlModel(pUnoObj->GetUnoControlModel(),uno::UNO_QUERY);
 132                 if ( xControlModel.is() )
 133                     xControlModel->setPropertyValue( PROPERTY_MULTILINE,uno::makeAny(sal_True));
 134             }
 135                         break;
 136                 case OBJ_DLG_IMAGECONTROL:
 137                         pNewObj = new OUnoObject(_xComponent
 138                                                                         ,::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.component.DatabaseImageControl"))
 139                                                                     ,OBJ_DLG_IMAGECONTROL);
 140                         break;
 141                 case OBJ_DLG_FORMATTEDFIELD:
 142                         pNewObj = new OUnoObject( _xComponent
 143                                                                         ,::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.form.component.FormattedField"))
 144                                                                         ,OBJ_DLG_FORMATTEDFIELD);
 145                         break;
 146         case OBJ_DLG_HFIXEDLINE:
 147         case OBJ_DLG_VFIXEDLINE:
 148                         pNewObj = new OUnoObject( _xComponent
 149                                                                         ,::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.awt.UnoControlFixedLineModel"))
 150                                                                         ,nType);
 151                         break;
 152         case OBJ_CUSTOMSHAPE:
 153             pNewObj = OCustomShape::Create( _xComponent );
 154             break;
 155         case OBJ_DLG_SUBREPORT:
 156         case OBJ_OLE2:
 157             pNewObj = OOle2Obj::Create( _xComponent,nType );
 158             break;
 159                 default:
 160                         OSL_ENSURE(0,"Unknown object id");
 161                         break;
 162         }
 163
 164     ensureSdrObjectOwnership( _xComponent );
 165
 166     return pNewObj;
 167 }
 168 // -----------------------------------------------------------------------------
 169 const TPropertyNamePair& getPropertyNameMap(sal_uInt16 _nObjectId)
 170 {
 171         switch(_nObjectId)
 172         {
 173         case OBJ_DLG_IMAGECONTROL:
 174             {
 175                                 static TPropertyNamePair s_aNameMap;
 176                                 if ( s_aNameMap.empty() )
 177                                 {
 178                                         s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CONTROLBACKGROUND,PROPERTY_BACKGROUNDCOLOR));
 179                     s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CONTROLBORDER,PROPERTY_BORDER));
 180                     s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CONTROLBORDERCOLOR,PROPERTY_BORDERCOLOR));
 181                     //s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_PARAADJUST,PROPERTY_ALIGN));
 182                                 }
 183                                 return s_aNameMap;
 184                         }
 185
 186                 case OBJ_DLG_FIXEDTEXT:
 187         case OBJ_DLG_FORMATTEDFIELD:
 188                         {
 189                                 static TPropertyNamePair s_aNameMap;
 190                                 if ( s_aNameMap.empty() )
 191                                 {
 192                                         s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CHARCOLOR,PROPERTY_TEXTCOLOR));
 193                                         s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CONTROLBACKGROUND,PROPERTY_BACKGROUNDCOLOR));
 194                                         s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CHARUNDERLINECOLOR,PROPERTY_TEXTLINECOLOR));
 195                                         s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CHARRELIEF,PROPERTY_FONTRELIEF));
 196                     s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CHARFONTHEIGHT,PROPERTY_FONTHEIGHT));
 197                     s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CHARSTRIKEOUT,PROPERTY_FONTSTRIKEOUT));
 198                     s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CONTROLTEXTEMPHASISMARK,PROPERTY_FONTEMPHASISMARK));
 199                     s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CONTROLBORDER,PROPERTY_BORDER));
 200                     s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_CONTROLBORDERCOLOR,PROPERTY_BORDERCOLOR));
 201                     s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_PARAADJUST,PROPERTY_ALIGN));
 202                                 }
 203                                 return s_aNameMap;
 204                         }
 205
 206         case OBJ_CUSTOMSHAPE:
 207             {
 208                                 static TPropertyNamePair s_aNameMap;
 209                                 if ( s_aNameMap.empty() )
 210                                 {
 211                     s_aNameMap.insert(TPropertyNamePair::value_type(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("FillColor")),PROPERTY_CONTROLBACKGROUND));
 212                     s_aNameMap.insert(TPropertyNamePair::value_type(PROPERTY_PARAADJUST,PROPERTY_ALIGN));
 213                 }
 214                                 return s_aNameMap;
 215                         }
 216
 217         default:
 218             break;
 219         }
 220         static TPropertyNamePair s_aEmptyNameMap;
 221         return s_aEmptyNameMap;
 222 }
 223 // -----------------------------------------------------------------------------
 224
 225 DBG_NAME( rpt_OObjectBase )
 226 OObjectBase::OObjectBase(const uno::Reference< report::XReportComponent>& _xComponent)
 227 :m_bIsListening(sal_False)
 228 {
 229         DBG_CTOR( rpt_OObjectBase,NULL);
 230         m_xReportComponent = _xComponent;
 231 }
 232 //----------------------------------------------------------------------------
 233 OObjectBase::OObjectBase(const ::rtl::OUString& _sComponentName)
 234 :m_sComponentName(_sComponentName)
 235 ,m_bIsListening(sal_False)
 236 {
 237         DBG_CTOR( rpt_OObjectBase,NULL);
 238 }
 239 //----------------------------------------------------------------------------
 240 OObjectBase::~OObjectBase()
 241 {
 242         DBG_DTOR( rpt_OObjectBase,NULL);
 243     m_xMediator.reset();
 244         if ( isListening() )
 245                 EndListening();
 246         m_xReportComponent.clear();
 247 }
 248 // -----------------------------------------------------------------------------
 249 uno::Reference< report::XSection> OObjectBase::getSection() const
 250 {
 251     uno::Reference< report::XSection> xSection;
 252     OReportPage* pPage = dynamic_cast<OReportPage*>(GetImplPage());
 253         if ( pPage )
 254         xSection = pPage->getSection();
 255     return xSection;
 256 }
 257 // -----------------------------------------------------------------------------
 258 uno::Reference< report::XReportComponent> OObjectBase::getReportComponent() const
 259 {
 260         return m_xReportComponent;
 261 }
 262 // -----------------------------------------------------------------------------
 263 uno::Reference< beans::XPropertySet> OObjectBase::getAwtComponent()
 264 {
 265         return uno::Reference< beans::XPropertySet>();
 266 }
 267 // -----------------------------------------------------------------------------
 268 sal_Bool OObjectBase::IsInside(const Rectangle& _rRect,const Point& rPnt,USHORT nTol) const
 269 {
 270     sal_Bool bRet = sal_False;
 271     Rectangle aRect( _rRect );
 272     if ( !aRect.IsEmpty() )
 273     {
 274         aRect.Left() -= nTol;
 275         aRect.Top() -= nTol;
 276         aRect.Right() = ( aRect.Right() == RECT_EMPTY ? _rRect.Left() + nTol : aRect.Right() + nTol );
 277         aRect.Bottom() = ( aRect.Bottom() == RECT_EMPTY ? _rRect.Top() + nTol : aRect.Bottom() + nTol );
 278
 279         bRet = aRect.IsInside( rPnt );
 280     }
 281     return bRet;
 282 }
 283 //----------------------------------------------------------------------------
 284 void OObjectBase::StartListening()
 285 {
 286         DBG_CHKTHIS( rpt_OObjectBase,NULL);
 287         OSL_ENSURE(!isListening(), "OUnoObject::StartListening: already listening!");
 288
 289         if ( !isListening() && m_xReportComponent.is() )
 290         {
 291                 m_bIsListening = sal_True;
 292
 293                 if ( !m_xPropertyChangeListener.is() )
 294                 {
 295                         m_xPropertyChangeListener = new OObjectListener( this );
 296                         // register listener to all properties
 297                         m_xReportComponent->addPropertyChangeListener( ::rtl::OUString() , m_xPropertyChangeListener );
 298                 }
 299         }
 300 }
 301 //----------------------------------------------------------------------------
 302 void OObjectBase::EndListening(sal_Bool /*bRemoveListener*/)
 303 {
 304         DBG_CHKTHIS( rpt_OObjectBase,NULL);
 305         OSL_ENSURE(!m_xReportComponent.is() || isListening(), "OUnoObject::EndListening: not listening currently!");
 306
 307     m_bIsListening = sal_False;
 308         if ( isListening() && m_xReportComponent.is() )
 309         {
 310                 // XPropertyChangeListener
 311                 if ( m_xPropertyChangeListener.is() )
 312                 {
 313                         // remove listener
 314             try
 315             {
 316                             m_xReportComponent->removePropertyChangeListener( ::rtl::OUString() , m_xPropertyChangeListener );
 317             }
 318             catch(uno::Exception)
 319             {
 320                 OSL_ENSURE(0,"OObjectBase::EndListening: Exception caught!");
 321             }
 322                 }
 323                 m_xPropertyChangeListener.clear();
 324         }
 325 }
 326 //----------------------------------------------------------------------------
 327 void OObjectBase::SetPropsFromRect(const Rectangle& _rRect)
 328 {
 329         DBG_CHKTHIS( rpt_OObjectBase,NULL);
 330     // set properties
 331         OReportPage* pPage = dynamic_cast<OReportPage*>(GetImplPage());
 332     if ( pPage && !_rRect.IsEmpty() )
 333     {
 334                 uno::Reference<report::XSection> xSection = pPage->getSection();
 335                 if ( xSection.is() && (static_cast<sal_uInt32>(_rRect.getHeight() + _rRect.Top()) > xSection->getHeight()) )
 336                         xSection->setHeight(_rRect.getHeight() + _rRect.Top());
 337
 338         // TODO
 339                 //pModel->GetRefDevice()->Invalidate(INVALIDATE_CHILDREN);
 340         }
 341 }
 342 //----------------------------------------------------------------------------
 343 void OObjectBase::_propertyChange( const  beans::PropertyChangeEvent& /*evt*/ ) throw( uno::RuntimeException)
 344 {
 345         DBG_CHKTHIS( rpt_OObjectBase,NULL);
 346 }
 347 //----------------------------------------------------------------------------
 348 void OObjectBase::SetObjectItemHelper(const SfxPoolItem& /*rItem*/)
 349 {
 350     // do nothing
 351 }
 352
 353 //----------------------------------------------------------------------------
 354 sal_Bool OObjectBase::supportsService( const ::rtl::OUString& _sServiceName ) const
 355 {
 356         DBG_CHKTHIS( rpt_OObjectBase,NULL);
 357         sal_Bool bSupports = sal_False;
 358
 359         Reference< lang::XServiceInfo > xServiceInfo( m_xReportComponent , UNO_QUERY );
 360                 // TODO: cache xServiceInfo as member?
 361         if ( xServiceInfo.is() )
 362                 bSupports = xServiceInfo->supportsService( _sServiceName );
 363
 364         return bSupports;
 365 }
 366
 367 //----------------------------------------------------------------------------
 368 void OObjectBase::ensureSdrObjectOwnership( const uno::Reference< uno::XInterface >& _rxShape )
 369 {
 370     // UNDO in the report designer is implemented at the level of the XShapes, not
 371     // at the level of SdrObjects. That is, if an object is removed from the report
 372     // design, then this happens by removing the XShape from the UNO DrawPage, and
 373     // putting this XShape (resp. the ReportComponent which wraps it) into an UNDO
 374     // action.
 375     // Unfortunately, the SvxDrawPage implementation usually deletes SdrObjects
 376     // which are removed from it, which is deadly for us. To prevent this,
 377     // we give the XShape implementation the ownership of the SdrObject, which
 378     // ensures the SvxDrawPage won't delete it.
 379     SvxShape* pShape = SvxShape::getImplementation( _rxShape );
 380     OSL_ENSURE( pShape, "OObjectBase::ensureSdrObjectOwnership: can't access the SvxShape!" );
 381     if ( pShape )
 382     {
 383         OSL_ENSURE( !pShape->HasSdrObjectOwnership(), "OObjectBase::ensureSdrObjectOwnership: called twice?" );
 384         pShape->TakeSdrObjectOwnership();
 385     }
 386 }
 387
 388 //----------------------------------------------------------------------------
 389 uno::Reference< uno::XInterface > OObjectBase::getUnoShapeOf( SdrObject& _rSdrObject )
 390 {
 391     uno::Reference< uno::XInterface > xShape( _rSdrObject.getWeakUnoShape() );
 392     if ( xShape.is() )
 393         return xShape;
 394
 395     xShape = _rSdrObject.SdrObject::getUnoShape();
 396     if ( !xShape.is() )
 397         return xShape;
 398
 399     ensureSdrObjectOwnership( xShape );
 400
 401     m_xKeepShapeAlive = xShape;
 402     return xShape;
 403 }
 404
 405 //----------------------------------------------------------------------------
 406 TYPEINIT1(OCustomShape, SdrObjCustomShape);
 407 DBG_NAME( rpt_OCustomShape );
 408 OCustomShape::OCustomShape(const uno::Reference< report::XReportComponent>& _xComponent
 409                            )
 410                   :SdrObjCustomShape()
 411                   ,OObjectBase(_xComponent)
 412 {
 413         DBG_CTOR( rpt_OCustomShape, NULL);
 414     // start listening
 415     mxUnoShape = uno::Reference< uno::XInterface >(_xComponent,uno::UNO_QUERY);
 416     m_bIsListening = sal_True;
 417 }
 418 //----------------------------------------------------------------------------
 419 OCustomShape::OCustomShape(const ::rtl::OUString& _sComponentName)
 420                   :SdrObjCustomShape()
 421                   ,OObjectBase(_sComponentName)
 422 {
 423         DBG_CTOR( rpt_OCustomShape, NULL);
 424     m_bIsListening = sal_True;
 425 }
 426
 427 //----------------------------------------------------------------------------
 428 OCustomShape::~OCustomShape()
 429 {
 430         DBG_DTOR( rpt_OCustomShape, NULL);
 431     //mxUnoShape = uno::WeakReference< uno::XInterface >();
 432 }
 433 // -----------------------------------------------------------------------------
 434 UINT16 OCustomShape::GetObjIdentifier() const
 435 {
 436         return UINT16(OBJ_CUSTOMSHAPE);
 437 }
 438 //----------------------------------------------------------------------------
 439 UINT32 OCustomShape::GetObjInventor() const
 440 {
 441         return ReportInventor;
 442 }
 443 //----------------------------------------------------------------------------
 444 SdrPage* OCustomShape::GetImplPage() const
 445 {
 446         return GetPage();
 447 }
 448 //----------------------------------------------------------------------------
 449 void OCustomShape::SetSnapRectImpl(const Rectangle& _rRect)
 450 {
 451         SetSnapRect( _rRect );
 452 }
 453 //----------------------------------------------------------------------------
 454 sal_Int32 OCustomShape::GetStep() const
 455 {
 456         // get step property
 457         sal_Int32 nStep = 0;
 458         OSL_ENSURE(0,"Who called me!");
 459         return nStep;
 460 }
 461 //----------------------------------------------------------------------------
 462 void OCustomShape::NbcMove( const Size& rSize )
 463 {
 464     if ( m_bIsListening )
 465     {
 466         m_bIsListening = sal_False;
 467
 468         if ( m_xReportComponent.is() )
 469         {
 470             OReportModel* pRptModel = static_cast<OReportModel*>(GetModel());
 471             OXUndoEnvironment::OUndoEnvLock aLock(pRptModel->GetUndoEnv());
 472             m_xReportComponent->setPositionX(m_xReportComponent->getPositionX() + rSize.A());
 473             m_xReportComponent->setPositionY(m_xReportComponent->getPositionY() + rSize.B());
 474         }
 475
 476             // set geometry properties
 477             SetPropsFromRect(GetSnapRect());
 478
 479             m_bIsListening = sal_True;
 480     }
 481     else
 482             SdrObjCustomShape::NbcMove( rSize );
 483 }
 484 //----------------------------------------------------------------------------
 485 void OCustomShape::NbcResize(const Point& rRef, const Fraction& xFract, const Fraction& yFract)
 486 {
 487         SdrObjCustomShape::NbcResize( rRef, xFract, yFract );
 488
 489         SetPropsFromRect(GetSnapRect());
 490 }
 491 //----------------------------------------------------------------------------
 492 void OCustomShape::NbcSetLogicRect(const Rectangle& rRect)
 493 {
 494     SdrObjCustomShape::NbcSetLogicRect(rRect);
 495         SetPropsFromRect(rRect);
 496 }
 497 //----------------------------------------------------------------------------
 498 FASTBOOL OCustomShape::EndCreate(SdrDragStat& rStat, SdrCreateCmd eCmd)
 499 {
 500         FASTBOOL bResult = SdrObjCustomShape::EndCreate(rStat, eCmd);
 501     if ( bResult )
 502     {
 503         OReportModel* pRptModel = static_cast<OReportModel*>(GetModel());
 504         if ( pRptModel )
 505         {
 506             OXUndoEnvironment::OUndoEnvLock aLock(pRptModel->GetUndoEnv());
 507             if ( !m_xReportComponent.is() )
 508                 m_xReportComponent.set(getUnoShape(),uno::UNO_QUERY);
 509         }
 510         SetPropsFromRect(GetSnapRect());
 511     }
 512
 513         return bResult;
 514 }
 515 //----------------------------------------------------------------------------
 516 SdrObject* OCustomShape::CheckHit( const Point& rPnt, USHORT nTol,const SetOfByte* pSet ) const
 517 {
 518     // #109994# fixed here, because the drawing layer doesn't handle objects
 519     // with a width or height of 0 in a proper way
 520     if ( IsInside(aOutRect,rPnt,nTol) )
 521         return const_cast<OCustomShape*>(this);
 522
 523         return SdrObjCustomShape::CheckHit( rPnt, nTol, pSet );
 524 }
 525
 526 //----------------------------------------------------------------------------
 527 void OCustomShape::SetObjectItemHelper(const SfxPoolItem& rItem)
 528 {
 529     SetObjectItem(rItem);
 530     // TODO
 531     //getSectionWindow()->getView()->AdjustMarkHdl();
 532 }
 533
 534 // -----------------------------------------------------------------------------
 535 uno::Reference< beans::XPropertySet> OCustomShape::getAwtComponent()
 536 {
 537     return uno::Reference< beans::XPropertySet>(m_xReportComponent,uno::UNO_QUERY);
 538 }
 539
 540 //----------------------------------------------------------------------------
 541 uno::Reference< uno::XInterface > OCustomShape::getUnoShape()
 542 {
 543     uno::Reference< uno::XInterface> xShape = OObjectBase::getUnoShapeOf( *this );
 544     if ( !m_xReportComponent.is() )
 545     {
 546         OReportModel* pRptModel = static_cast<OReportModel*>(GetModel());
 547         OXUndoEnvironment::OUndoEnvLock aLock(pRptModel->GetUndoEnv());
 548         m_xReportComponent.set(xShape,uno::UNO_QUERY);
 549     }
 550     return xShape;
 551 }
 552
 553 //----------------------------------------------------------------------------
 554 //----------------------------------------------------------------------------
 555 TYPEINIT1(OUnoObject, SdrUnoObj);
 556 DBG_NAME( rpt_OUnoObject );
 557 //----------------------------------------------------------------------------
 558 OUnoObject::OUnoObject(const ::rtl::OUString& _sComponentName
 559                                            ,const ::rtl::OUString& rModelName
 560                        ,sal_uInt16   _nObjectType)
 561                   :SdrUnoObj(rModelName, sal_True)
 562                   ,OObjectBase(_sComponentName)
 563           ,m_nObjectType(_nObjectType)
 564 {
 565         DBG_CTOR( rpt_OUnoObject, NULL);
 566 }
 567 //----------------------------------------------------------------------------
 568 OUnoObject::OUnoObject(const uno::Reference< report::XReportComponent>& _xComponent
 569                                            ,const ::rtl::OUString& rModelName
 570                        ,sal_uInt16   _nObjectType)
 571                   :SdrUnoObj(rModelName, sal_True)
 572                   ,OObjectBase(_xComponent)
 573           ,m_nObjectType(_nObjectType)
 574 {
 575         DBG_CTOR( rpt_OUnoObject, NULL);
 576     mxUnoShape = uno::Reference< uno::XInterface >(_xComponent,uno::UNO_QUERY);
 577 }
 578 //----------------------------------------------------------------------------
 579 OUnoObject::~OUnoObject()
 580 {
 581         DBG_DTOR( rpt_OUnoObject, NULL);
 582     //mxUnoShape = uno::WeakReference< uno::XInterface >();
 583 }
 584 // -----------------------------------------------------------------------------
 585 UINT16 OUnoObject::GetObjIdentifier() const
 586 {
 587         return UINT16(m_nObjectType);
 588 }
 589 //----------------------------------------------------------------------------
 590 UINT32 OUnoObject::GetObjInventor() const
 591 {
 592         return ReportInventor;
 593 }
 594 //----------------------------------------------------------------------------
 595 SdrPage* OUnoObject::GetImplPage() const
 596 {
 597         DBG_CHKTHIS( rpt_OUnoObject,NULL);
 598         return GetPage();
 599 }
 600 //----------------------------------------------------------------------------
 601 void OUnoObject::SetSnapRectImpl(const Rectangle& _rRect)
 602 {
 603         DBG_CHKTHIS( rpt_OUnoObject,NULL);
 604         SetSnapRect( _rRect );
 605 }
 606 //----------------------------------------------------------------------------
 607 sal_Int32 OUnoObject::GetStep() const
 608 {
 609         DBG_CHKTHIS( rpt_OUnoObject,NULL);
 610         // get step property
 611         sal_Int32 nStep = 0;
 612         OSL_ENSURE(0,"Who called me!");
 613         return nStep;
 614 }
 615
 616 //----------------------------------------------------------------------------
 617 void OUnoObject::NbcMove( const Size& rSize )
 618 {
 619         DBG_CHKTHIS( rpt_OUnoObject,NULL);
 620
 621     if ( m_bIsListening )
 622     {
 623             // stop listening
 624             OObjectBase::EndListening(sal_False);
 625
 626         if ( m_xReportComponent.is() )
 627         {
 628             OReportModel* pRptModel = static_cast<OReportModel*>(GetModel());
 629             OXUndoEnvironment::OUndoEnvLock aLock(pRptModel->GetUndoEnv());
 630             m_xReportComponent->setPositionX(m_xReportComponent->getPositionX() + rSize.A());
 631             m_xReportComponent->setPositionY(m_xReportComponent->getPositionY() + rSize.B());
 632         }
 633
 634             // set geometry properties
 635             SetPropsFromRect(GetLogicRect());
 636
 637             // start listening
 638             OObjectBase::StartListening();
 639     }
 640     else
 641         SdrUnoObj::NbcMove( rSize );
 642 }
 643
 644 //----------------------------------------------------------------------------
 645
 646 void OUnoObject::NbcResize(const Point& rRef, const Fraction& xFract, const Fraction& yFract)
 647 {
 648         DBG_CHKTHIS( rpt_OUnoObject,NULL);
 649         SdrUnoObj::NbcResize( rRef, xFract, yFract );
 650
 651         // stop listening
 652         OObjectBase::EndListening(sal_False);
 653
 654         // set geometry properties
 655         SetPropsFromRect(GetLogicRect());
 656
 657         // start listening
 658         OObjectBase::StartListening();
 659 }
 660 //----------------------------------------------------------------------------
 661 void OUnoObject::NbcSetLogicRect(const Rectangle& rRect)
 662 {
 663     SdrUnoObj::NbcSetLogicRect(rRect);
 664     // stop listening
 665         OObjectBase::EndListening(sal_False);
 666
 667         // set geometry properties
 668         SetPropsFromRect(rRect);
 669
 670         // start listening
 671         OObjectBase::StartListening();
 672 }
 673 //----------------------------------------------------------------------------
 674
 675 FASTBOOL OUnoObject::EndCreate(SdrDragStat& rStat, SdrCreateCmd eCmd)
 676 {
 677         DBG_CHKTHIS( rpt_OUnoObject,NULL);
 678         FASTBOOL bResult = SdrUnoObj::EndCreate(rStat, eCmd);
 679     if ( bResult )
 680     {
 681         OReportModel* pRptModel = static_cast<OReportModel*>(GetModel());
 682         if ( pRptModel )
 683         {
 684             OXUndoEnvironment::OUndoEnvLock aLock(pRptModel->GetUndoEnv());
 685             if ( !m_xReportComponent.is() )
 686                 m_xReportComponent.set(getUnoShape(),uno::UNO_QUERY);
 687             // set labels
 688                 if ( m_xReportComponent.is() )
 689             {
 690                 try
 691                 {
 692                     if ( supportsService( SERVICE_FIXEDTEXT ) )
 693                     {
 694                         m_xReportComponent->setPropertyValue( PROPERTY_LABEL, uno::makeAny(GetDefaultName(this)) );
 695                     }
 696                 }
 697                 catch(const uno::Exception&)
 698                 {
 699                     OSL_ENSURE(0,"OUnoObject::EndCreate: Exception caught!");
 700                 }
 701             }
 702         }
 703         // set geometry properties
 704         SetPropsFromRect(GetLogicRect());
 705     }
 706
 707         return bResult;
 708 }
 709 //----------------------------------------------------------------------------
 710 ::rtl::OUString OUnoObject::GetDefaultName(const OUnoObject* _pObj)
 711 {
 712         sal_uInt16 nResId = 0;
 713         ::rtl::OUString aDefaultName = ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("HERE WE HAVE TO INSERT OUR NAME!"));
 714     if ( _pObj->supportsService( SERVICE_FIXEDTEXT ) )
 715         {
 716                 nResId = RID_STR_CLASS_FIXEDTEXT;
 717         }
 718     else if ( _pObj->supportsService( SERVICE_FIXEDLINE ) )
 719         {
 720                 nResId = RID_STR_CLASS_FIXEDLINE;
 721         }
 722     else if ( _pObj->supportsService( SERVICE_IMAGECONTROL ) )
 723         {
 724                 nResId = RID_STR_CLASS_IMAGECONTROL;
 725         }
 726         else if ( _pObj->supportsService( SERVICE_FORMATTEDFIELD ) )
 727         {
 728                 nResId = RID_STR_CLASS_FORMATTEDFIELD;
 729         }
 730
 731         if (nResId)
 732                 aDefaultName = ::rtl::OUString( String(ModuleRes(nResId)) );
 733
 734         return aDefaultName;
 735 }
 736 //----------------------------------------------------------------------------
 737 SdrObject* OUnoObject::CheckHit( const Point& rPnt, USHORT nTol,const SetOfByte* pSet ) const
 738 {
 739         DBG_CHKTHIS( rpt_OUnoObject,NULL);
 740     if ( IsInside(aOutRect,rPnt,nTol) )
 741         return const_cast<OUnoObject*>(this);
 742
 743         return SdrUnoObj::CheckHit( rPnt, nTol, pSet );
 744 }
 745 // -----------------------------------------------------------------------------
 746 void OUnoObject::_propertyChange( const  beans::PropertyChangeEvent& evt ) throw( uno::RuntimeException)
 747 {
 748         DBG_CHKTHIS( rpt_OUnoObject,NULL);
 749         OObjectBase::_propertyChange(evt);
 750         if (isListening())
 751         {
 752         if ( evt.PropertyName == PROPERTY_CHARCOLOR )
 753         {
 754                         Reference<XPropertySet> xControlModel(GetUnoControlModel(),uno::UNO_QUERY);
 755                         if ( xControlModel.is() )
 756             {
 757                 OObjectBase::EndListening(sal_False);
 758                                 try
 759                                 {
 760                                         xControlModel->setPropertyValue(PROPERTY_TEXTCOLOR,evt.NewValue);
 761                                 }
 762                                 catch(uno::Exception&)
 763                                 {
 764                                 }
 765                 OObjectBase::StartListening();
 766             }
 767                 }
 768         else if ( evt.PropertyName == PROPERTY_NAME )
 769                 {
 770             Reference<XPropertySet> xControlModel(GetUnoControlModel(),uno::UNO_QUERY);
 771             if ( xControlModel.is() && xControlModel->getPropertySetInfo()->hasPropertyByName(PROPERTY_NAME) )
 772             {
 773                 // get old name
 774                     ::rtl::OUString aOldName;
 775                     evt.OldValue >>= aOldName;
 776
 777                     // get new name
 778                     ::rtl::OUString aNewName;
 779                     evt.NewValue >>= aNewName;
 780
 781                     if ( !aNewName.equals(aOldName) )
 782                     {
 783                             // set old name property
 784                             OObjectBase::EndListening(sal_False);
 785                     if ( m_xMediator.is() )
 786                         m_xMediator.get()->stopListening();
 787                     try
 788                     {
 789                         xControlModel->setPropertyValue( PROPERTY_NAME, evt.NewValue );
 790                     }
 791                     catch(uno::Exception&)
 792                     {
 793                     }
 794                     if ( m_xMediator.is() )
 795                         m_xMediator.get()->startListening();
 796                             OObjectBase::StartListening();
 797                     }
 798             }
 799                 }
 800         }
 801 }
 802 // -----------------------------------------------------------------------------
 803 void OUnoObject::CreateMediator(sal_Bool _bReverse)
 804 {
 805     if ( !m_xMediator.is() )
 806     {
 807         if ( !m_xReportComponent.is() )
 808             m_xReportComponent.set(getUnoShape(),uno::UNO_QUERY);
 809
 810             Reference<XPropertySet> xControlModel(GetUnoControlModel(),uno::UNO_QUERY);
 811             if ( !m_xMediator.is() && m_xReportComponent.is() && xControlModel.is() )
 812             m_xMediator = TMediator::createFromQuery(new OPropertyMediator(m_xReportComponent.get(),xControlModel,getPropertyNameMap(GetObjIdentifier()),_bReverse));
 813         OObjectBase::StartListening();
 814     }
 815 }
 816 // -----------------------------------------------------------------------------
 817 uno::Reference< beans::XPropertySet> OUnoObject::getAwtComponent()
 818 {
 819     return Reference<XPropertySet>(GetUnoControlModel(),uno::UNO_QUERY);
 820 }
 821
 822 // -----------------------------------------------------------------------------
 823 uno::Reference< uno::XInterface > OUnoObject::getUnoShape()
 824 {
 825     return OObjectBase::getUnoShapeOf( *this );
 826 }
 827 // -----------------------------------------------------------------------------
 828 SdrObject* OUnoObject::Clone() const
 829 {
 830     SdrObject* pClone = SdrUnoObj::Clone();
 831     if ( pClone )
 832     {
 833         Reference<XPropertySet> xSource(const_cast<OUnoObject*>(this)->getUnoShape(),uno::UNO_QUERY);
 834         Reference<XPropertySet> xDest(pClone->getUnoShape(),uno::UNO_QUERY);
 835         if ( xSource.is() && xDest.is() )
 836             comphelper::copyProperties(xSource.get(),xDest.get());
 837     } // if ( pClone )
 838     return pClone;
 839 }
 840 //----------------------------------------------------------------------------
 841 // OOle2Obj
 842 //----------------------------------------------------------------------------
 843 TYPEINIT1(OOle2Obj, SdrOle2Obj);
 844 DBG_NAME( rpt_OOle2Obj );
 845 OOle2Obj::OOle2Obj(const uno::Reference< report::XReportComponent>& _xComponent,UINT16 _nType)
 846                   :SdrOle2Obj()
 847                   ,OObjectBase(_xComponent)
 848           ,m_nType(_nType)
 849 {
 850         DBG_CTOR( rpt_OOle2Obj, NULL);
 851
 852     // start listening
 853     mxUnoShape = uno::Reference< uno::XInterface >(_xComponent,uno::UNO_QUERY);
 854     m_bIsListening = sal_True;
 855     //uno::Reference< embed::XEmbeddedObject > xEmbed(_xComponent,uno::UNO_QUERY);
 856     //OSL_ENSURE(xEmbed.is(),"This is no embedded object!");
 857
 858     //SetObjRef(xEmbed);
 859 }
 860 //----------------------------------------------------------------------------
 861 OOle2Obj::OOle2Obj(const ::rtl::OUString& _sComponentName,UINT16 _nType)
 862                   :SdrOle2Obj()
 863                   ,OObjectBase(_sComponentName)
 864           ,m_nType(_nType)
 865 {
 866         DBG_CTOR( rpt_OOle2Obj, NULL);
 867         m_bIsListening = sal_True;
 868 }
 869 //----------------------------------------------------------------------------
 870 OOle2Obj::~OOle2Obj()
 871 {
 872         DBG_DTOR( rpt_OOle2Obj, NULL);
 873 }
 874 // -----------------------------------------------------------------------------
 875 UINT16 OOle2Obj::GetObjIdentifier() const
 876 {
 877         return m_nType;
 878 }
 879 //----------------------------------------------------------------------------
 880 UINT32 OOle2Obj::GetObjInventor() const
 881 {
 882         return ReportInventor;
 883 }
 884 //----------------------------------------------------------------------------
 885 SdrPage* OOle2Obj::GetImplPage() const
 886 {
 887         DBG_CHKTHIS( rpt_OOle2Obj,NULL);
 888         return GetPage();
 889 }
 890 //----------------------------------------------------------------------------
 891 void OOle2Obj::SetSnapRectImpl(const Rectangle& _rRect)
 892 {
 893         DBG_CHKTHIS( rpt_OOle2Obj,NULL);
 894         SetSnapRect( _rRect );
 895 }
 896 //----------------------------------------------------------------------------
 897 sal_Int32 OOle2Obj::GetStep() const
 898 {
 899         DBG_CHKTHIS( rpt_OOle2Obj,NULL);
 900         // get step property
 901         sal_Int32 nStep = 0;
 902         OSL_ENSURE(0,"Who called me!");
 903         return nStep;
 904 }
 905
 906 //----------------------------------------------------------------------------
 907 void OOle2Obj::NbcMove( const Size& rSize )
 908 {
 909         DBG_CHKTHIS( rpt_OOle2Obj,NULL);
 910
 911     if ( m_bIsListening )
 912     {
 913             // stop listening
 914             OObjectBase::EndListening(sal_False);
 915
 916         if ( m_xReportComponent.is() )
 917         {
 918             OReportModel* pRptModel = static_cast<OReportModel*>(GetModel());
 919             OXUndoEnvironment::OUndoEnvLock aLock(pRptModel->GetUndoEnv());
 920             m_xReportComponent->setPositionX(m_xReportComponent->getPositionX() + rSize.A());
 921             m_xReportComponent->setPositionY(m_xReportComponent->getPositionY() + rSize.B());
 922         }
 923
 924             // set geometry properties
 925             SetPropsFromRect(GetLogicRect());
 926
 927             // start listening
 928             OObjectBase::StartListening();
 929     }
 930     else
 931         SdrOle2Obj::NbcMove( rSize );
 932 }
 933
 934 //----------------------------------------------------------------------------
 935
 936 void OOle2Obj::NbcResize(const Point& rRef, const Fraction& xFract, const Fraction& yFract)
 937 {
 938         DBG_CHKTHIS( rpt_OOle2Obj,NULL);
 939         SdrOle2Obj::NbcResize( rRef, xFract, yFract );
 940
 941         // stop listening
 942         OObjectBase::EndListening(sal_False);
 943
 944         // set geometry properties
 945         SetPropsFromRect(GetLogicRect());
 946
 947         // start listening
 948         OObjectBase::StartListening();
 949 }
 950 //----------------------------------------------------------------------------
 951 void OOle2Obj::NbcSetLogicRect(const Rectangle& rRect)
 952 {
 953     SdrOle2Obj::NbcSetLogicRect(rRect);
 954     // stop listening
 955         OObjectBase::EndListening(sal_False);
 956
 957         // set geometry properties
 958         SetPropsFromRect(rRect);
 959
 960         // start listening
 961         OObjectBase::StartListening();
 962 }
 963 //----------------------------------------------------------------------------
 964
 965 FASTBOOL OOle2Obj::EndCreate(SdrDragStat& rStat, SdrCreateCmd eCmd)
 966 {
 967         DBG_CHKTHIS( rpt_OOle2Obj,NULL);
 968         FASTBOOL bResult = SdrOle2Obj::EndCreate(rStat, eCmd);
 969     if ( bResult )
 970     {
 971         OReportModel* pRptModel = static_cast<OReportModel*>(GetModel());
 972         if ( pRptModel )
 973         {
 974             OXUndoEnvironment::OUndoEnvLock aLock(pRptModel->GetUndoEnv());
 975             if ( !m_xReportComponent.is() )
 976                 m_xReportComponent.set(getUnoShape(),uno::UNO_QUERY);
 977         }
 978         // set geometry properties
 979         SetPropsFromRect(GetLogicRect());
 980     }
 981
 982         return bResult;
 983 }
 984 //----------------------------------------------------------------------------
 985 SdrObject* OOle2Obj::CheckHit( const Point& rPnt, USHORT nTol,const SetOfByte* pSet ) const
 986 {
 987         DBG_CHKTHIS( rpt_OOle2Obj,NULL);
 988     if ( IsInside(aOutRect,rPnt,nTol) )
 989         return const_cast<OOle2Obj*>(this);
 990
 991         return SdrOle2Obj::CheckHit( rPnt, nTol, pSet );
 992 }
 993 // -----------------------------------------------------------------------------
 994 uno::Reference< beans::XPropertySet> OOle2Obj::getAwtComponent()
 995 {
 996     return uno::Reference< beans::XPropertySet>(m_xReportComponent,uno::UNO_QUERY);
 997 }
 998
 999 // -----------------------------------------------------------------------------
1000 uno::Reference< uno::XInterface > OOle2Obj::getUnoShape()
1001 {
1002     uno::Reference< uno::XInterface> xShape = OObjectBase::getUnoShapeOf( *this );
1003     if ( !m_xReportComponent.is() )
1004     {
1005         OReportModel* pRptModel = static_cast<OReportModel*>(GetModel());
1006         OXUndoEnvironment::OUndoEnvLock aLock(pRptModel->GetUndoEnv());
1007         m_xReportComponent.set(xShape,uno::UNO_QUERY);
1008     }
1009     return xShape;
1010 }
1011 // -----------------------------------------------------------------------------
1012 uno::Reference< chart2::data::XDatabaseDataProvider > lcl_getDataProvider(const uno::Reference < embed::XEmbeddedObject >& _xObj)
1013 {
1014     uno::Reference< chart2::data::XDatabaseDataProvider > xSource;
1015     uno::Reference< embed::XComponentSupplier > xCompSupp(_xObj,uno::UNO_QUERY);
1016     if( xCompSupp.is())
1017     {
1018         uno::Reference< chart2::XChartDocument> xChartDoc( xCompSupp->getComponent(), uno::UNO_QUERY );
1019         if ( xChartDoc.is() )
1020         {
1021             xSource.set(xChartDoc->getDataProvider(),uno::UNO_QUERY);
1022         }
1023     } // if( xCompSupp.is())
1024     return xSource;
1025 }
1026 // -----------------------------------------------------------------------------
1027 // Clone() soll eine komplette Kopie des Objektes erzeugen.
1028 SdrObject* OOle2Obj::Clone() const
1029 {
1030     OOle2Obj* pObj = static_cast<OOle2Obj*>(SdrOle2Obj::Clone());
1031     OReportModel* pRptModel = static_cast<OReportModel*>(GetModel());
1032     svt::EmbeddedObjectRef::TryRunningState( pObj->GetObjRef() );
1033     pObj->impl_createDataProvider_nothrow(pRptModel->getReportDefinition().get());
1034
1035     uno::Reference< chart2::data::XDatabaseDataProvider > xSource( lcl_getDataProvider(GetObjRef()) );
1036     uno::Reference< chart2::data::XDatabaseDataProvider > xDest( lcl_getDataProvider(pObj->GetObjRef()) );
1037     if ( xSource.is() && xDest.is() )
1038         comphelper::copyProperties(xSource.get(),xDest.get());
1039
1040     pObj->initializeChart(pRptModel->getReportDefinition().get());
1041     return pObj;
1042 }
1043 // -----------------------------------------------------------------------------
1044 void OOle2Obj::impl_createDataProvider_nothrow(const uno::Reference< frame::XModel>& _xModel)
1045 {
1046     uno::Reference < embed::XEmbeddedObject > xObj = GetObjRef();
1047     uno::Reference< chart2::data::XDataReceiver > xReceiver;
1048     uno::Reference< embed::XComponentSupplier > xCompSupp( xObj, uno::UNO_QUERY );
1049     if( xCompSupp.is())
1050         xReceiver.set( xCompSupp->getComponent(), uno::UNO_QUERY );
1051     OSL_ASSERT( xReceiver.is());
1052     if( xReceiver.is() )
1053     {
1054         uno::Reference< lang::XMultiServiceFactory> xFac(_xModel,uno::UNO_QUERY);
1055         uno::Reference< chart2::data::XDatabaseDataProvider > xDataProvider( xFac->createInstance(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.chart2.data.DataProvider"))),uno::UNO_QUERY);
1056         xReceiver->attachDataProvider( xDataProvider.get() );
1057     }
1058 }
1059 // -----------------------------------------------------------------------------
1060 void OOle2Obj::initializeChart( const uno::Reference< frame::XModel>& _xModel)
1061 {
1062     uno::Reference < embed::XEmbeddedObject > xObj = GetObjRef();
1063     uno::Reference< chart2::data::XDataReceiver > xReceiver;
1064     uno::Reference< embed::XComponentSupplier > xCompSupp( xObj, uno::UNO_QUERY );
1065     if( xCompSupp.is())
1066         xReceiver.set( xCompSupp->getComponent(), uno::UNO_QUERY );
1067     OSL_ASSERT( xReceiver.is());
1068     if( xReceiver.is() )
1069     {
1070         // lock the model to suppress any internal updates
1071         uno::Reference< frame::XModel > xChartModel( xReceiver, uno::UNO_QUERY );
1072         if( xChartModel.is() )
1073             xChartModel->lockControllers();
1074
1075         if ( !lcl_getDataProvider(xObj).is() )
1076             impl_createDataProvider_nothrow(_xModel);
1077
1078         uno::Reference< util::XNumberFormatsSupplier > xNumberFormatsSupplier( _xModel, uno::UNO_QUERY );
1079         xReceiver->attachNumberFormatsSupplier( xNumberFormatsSupplier );
1080
1081         uno::Sequence< beans::PropertyValue > aArgs( 4 );
1082         aArgs[0] = beans::PropertyValue(
1083             ::rtl::OUString::createFromAscii("CellRangeRepresentation"), -1,
1084             uno::makeAny( ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("all")) ), beans::PropertyState_DIRECT_VALUE );
1085         aArgs[1] = beans::PropertyValue(
1086             ::rtl::OUString::createFromAscii("HasCategories"), -1,
1087             uno::makeAny( sal_True ), beans::PropertyState_DIRECT_VALUE );
1088         aArgs[2] = beans::PropertyValue(
1089             ::rtl::OUString::createFromAscii("FirstCellAsLabel"), -1,
1090             uno::makeAny( sal_False ), beans::PropertyState_DIRECT_VALUE );
1091         aArgs[3] = beans::PropertyValue(
1092             ::rtl::OUString::createFromAscii("DataRowSource"), -1,
1093             uno::makeAny( chart::ChartDataRowSource_COLUMNS ), beans::PropertyState_DIRECT_VALUE );
1094         xReceiver->setArguments( aArgs );
1095
1096         if( xChartModel.is() )
1097             xChartModel->unlockControllers();
1098     }
1099 }
1100 // -----------------------------------------------------------------------------
1101 uno::Reference< style::XStyle> getUsedStyle(const uno::Reference< report::XReportDefinition>& _xReport)
1102 {
1103     uno::Reference<container::XNameAccess> xStyles = _xReport->getStyleFamilies();
1104     uno::Reference<container::XNameAccess> xPageStyles(xStyles->getByName(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("PageStyles"))),uno::UNO_QUERY);
1105
1106     uno::Reference< style::XStyle> xReturn;
1107     uno::Sequence< ::rtl::OUString> aSeq = xPageStyles->getElementNames();
1108     const ::rtl::OUString* pIter = aSeq.getConstArray();
1109     const ::rtl::OUString* pEnd   = pIter + aSeq.getLength();
1110     for(;pIter != pEnd && !xReturn.is() ;++pIter)
1111     {
1112         uno::Reference< style::XStyle> xStyle(xPageStyles->getByName(*pIter),uno::UNO_QUERY);
1113         if ( xStyle->isInUse() )
1114             xReturn = xStyle;
1115     }
1116     return xReturn;
1117 }
1118 //----------------------------------------------------------------------------
1119 //============================================================================
1120 } // rptui
1121 //============================================================================