svx/source/form/fmexpl.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20
  21 #include "svx/fmresids.hrc"
  22 #include "fmexpl.hxx"
  23
  24 #include "fmhelp.hrc"
  25 #include <svx/fmglob.hxx>
  26 #include "fmservs.hxx"
  27 #include <svx/fmmodel.hxx>
  28 #include "fmexch.hxx"
  29 #include "fmundo.hxx"
  30 #include "fmpgeimp.hxx"
  31
  32 #include <svx/svxids.hrc>
  33
  34 #include "fmprop.hrc"
  35 #include <svx/dialmgr.hxx>
  36 #include "svx/svditer.hxx"
  37 #include <svx/svdouno.hxx>
  38 #include <svx/svdobj.hxx>
  39 #include <vcl/msgbox.hxx>
  40 #include <sfx2/dispatch.hxx>
  41 #include <sfx2/objsh.hxx>
  42 #include <sfx2/viewsh.hxx>
  43 #include <sfx2/viewfrm.hxx>
  44 #include <com/sun/star/lang/XServiceInfo.hpp>
  45 #include <com/sun/star/form/FormComponentType.hpp>
  46 #include <com/sun/star/awt/XTabControllerModel.hpp>
  47 #include <vcl/menu.hxx>
  48 #include <sfx2/objitem.hxx>
  49 #include <sfx2/request.hxx>
  50
  51 #include <vcl/wrkwin.hxx>
  52 #include <svx/fmshell.hxx>
  53 #include "fmshimp.hxx"
  54 #include <svx/fmpage.hxx>
  55 #include <com/sun/star/io/XPersistObject.hpp>
  56 #include <com/sun/star/script/XEventAttacherManager.hpp>
  57 #include <com/sun/star/sdb/CommandType.hpp>
  58 #include <com/sun/star/beans/PropertyAttribute.hpp>
  59 #include <comphelper/property.hxx>
  60 #include <comphelper/processfactory.hxx>
  61 #include <osl/diagnose.h>
  62
  63 using namespace ::svxform;
  64 using namespace ::com::sun::star::uno;
  65 using namespace ::com::sun::star::sdbc;
  66 using namespace ::com::sun::star::sdb;
  67 using namespace ::com::sun::star::form;
  68 using namespace ::com::sun::star::beans;
  69 using namespace ::com::sun::star::lang;
  70 using namespace ::com::sun::star::container;
  71
  72 FmNavInsertedHint::FmNavInsertedHint( FmEntryData* pInsertedEntryData, sal_uInt32 nRelPos )
  73     :pEntryData( pInsertedEntryData )
  74     ,nPos( nRelPos )
  75
  76 {
  77 }
  78
  79
  80 FmNavInsertedHint::~FmNavInsertedHint()
  81 {
  82 }
  83
  84
  85
  86 // class FmNavInsertedHint
  87
  88 FmNavModelReplacedHint::FmNavModelReplacedHint( FmEntryData* pAffectedEntryData )
  89     :pEntryData( pAffectedEntryData )
  90 {
  91 }
  92
  93
  94 FmNavModelReplacedHint::~FmNavModelReplacedHint()
  95 {
  96 }
  97
  98 FmNavRemovedHint::FmNavRemovedHint( FmEntryData* pRemovedEntryData )
  99     :pEntryData( pRemovedEntryData )
 100 {
 101 }
 102
 103
 104 FmNavRemovedHint::~FmNavRemovedHint()
 105 {
 106 }
 107
 108 FmNavNameChangedHint::FmNavNameChangedHint( FmEntryData* pData, const OUString& rNewName )
 109     :pEntryData( pData )
 110     ,aNewName( rNewName )
 111 {
 112 }
 113
 114
 115 FmNavNameChangedHint::~FmNavNameChangedHint()
 116 {
 117 }
 118
 119 FmNavClearedHint::FmNavClearedHint()
 120 {
 121 }
 122
 123
 124 FmNavClearedHint::~FmNavClearedHint()
 125 {
 126 }
 127
 128
 129 FmEntryDataList::FmEntryDataList()
 130 {
 131 }
 132
 133
 134 FmEntryDataList::~FmEntryDataList()
 135 {
 136 }
 137
 138
 139 FmEntryData* FmEntryDataList::remove( FmEntryData* pItem )
 140 {
 141     for ( FmEntryDataBaseList::iterator it = maEntryDataList.begin();
 142           it != maEntryDataList.end();
 143           ++it
 144         )
 145     {
 146         if ( *it == pItem )
 147         {
 148             maEntryDataList.erase( it );
 149             break;
 150         }
 151     }
 152     return pItem;
 153 }
 154
 155
 156 void FmEntryDataList::insert( FmEntryData* pItem, size_t Index )
 157 {
 158     if ( Index < maEntryDataList.size() )
 159     {
 160         FmEntryDataBaseList::iterator it = maEntryDataList.begin();
 161         ::std::advance( it, Index );
 162         maEntryDataList.insert( it, pItem );
 163     }
 164     else
 165         maEntryDataList.push_back( pItem );
 166 }
 167
 168
 169 void FmEntryDataList::clear()
 170 {
 171     for ( size_t i = 0, n = maEntryDataList.size(); i < n; ++i )
 172         delete maEntryDataList[ i ];
 173     maEntryDataList.clear();
 174 }
 175
 176 TYPEINIT0( FmEntryData );
 177
 178 FmEntryData::FmEntryData( FmEntryData* pParentData, const Reference< XInterface >& _rxIFace )
 179     :pParent( pParentData )
 180 {
 181     pChildList = new FmEntryDataList();
 182
 183     newObject( _rxIFace );
 184 }
 185
 186
 187 FmEntryData::~FmEntryData()
 188 {
 189     Clear();
 190     delete pChildList;
 191 }
 192
 193
 194 void FmEntryData::newObject( const ::com::sun::star::uno::Reference< ::com::sun::star::uno::XInterface >& _rxIFace )
 195 {
 196     // do not just copy, normalize it
 197     m_xNormalizedIFace = Reference< XInterface >( _rxIFace, UNO_QUERY );
 198     m_xProperties.set(m_xNormalizedIFace, css::uno::UNO_QUERY);
 199     m_xChild.set(m_xNormalizedIFace, css::uno::UNO_QUERY);
 200 }
 201
 202
 203 FmEntryData::FmEntryData( const FmEntryData& rEntryData )
 204 {
 205     pChildList = new FmEntryDataList();
 206     aText = rEntryData.GetText();
 207     m_aNormalImage = rEntryData.GetNormalImage();
 208     pParent = rEntryData.GetParent();
 209
 210     FmEntryData* pChildData;
 211     size_t nEntryCount = rEntryData.GetChildList()->size();
 212     for( size_t i = 0; i < nEntryCount; i++ )
 213     {
 214         pChildData = rEntryData.GetChildList()->at( i );
 215         FmEntryData* pNewChildData = pChildData->Clone();
 216         pChildList->insert( pNewChildData, size_t(-1) );
 217     }
 218
 219     m_xNormalizedIFace = rEntryData.m_xNormalizedIFace;
 220     m_xProperties = rEntryData.m_xProperties;
 221     m_xChild = rEntryData.m_xChild;
 222 }
 223
 224
 225 void FmEntryData::Clear()
 226 {
 227     GetChildList()->clear();
 228 }
 229
 230
 231 bool FmEntryData::IsEqualWithoutChildren( FmEntryData* pEntryData )
 232 {
 233     if(this == pEntryData)
 234         return true;
 235
 236     if( !pEntryData )
 237         return false;
 238
 239     if( !aText.equals(pEntryData->GetText()))
 240         return false;
 241
 242     if( !pEntryData->GetParent() && pParent )
 243         return false;
 244
 245     if( pEntryData->GetParent() && !pParent )
 246         return false;
 247
 248     if( !pEntryData->GetParent() && !pParent )
 249         return true;
 250
 251     if( !pParent->IsEqualWithoutChildren(pEntryData->GetParent()) )
 252         return false;
 253
 254     return true;
 255 }
 256
 257 TYPEINIT1( FmFormData, FmEntryData );
 258
 259 FmFormData::FmFormData(
 260     const Reference< XForm >& _rxForm,
 261     const ImageList& _rNormalImages,
 262     FmFormData* _pParent
 263 )
 264 :   FmEntryData( _pParent, _rxForm ),
 265     m_xForm( _rxForm )
 266 {
 267
 268     // Images setzen
 269
 270     m_aNormalImage = _rNormalImages.GetImage( RID_SVXIMG_FORM );
 271
 272
 273     // Titel setzen
 274     if (m_xForm.is())
 275     {
 276         Reference< XPropertySet >  xSet(m_xForm, UNO_QUERY);
 277         if (xSet.is())
 278         {
 279             OUString aEntryName(::comphelper::getString(xSet->getPropertyValue( FM_PROP_NAME )));
 280             SetText(aEntryName);
 281         }
 282     }
 283     else
 284         SetText( OUString() );
 285 }
 286
 287
 288 FmFormData::~FmFormData()
 289 {
 290 }
 291
 292
 293 FmFormData::FmFormData( const FmFormData& rFormData )
 294     :FmEntryData( rFormData )
 295 {
 296     m_xForm = rFormData.GetFormIface();
 297 }
 298
 299
 300 FmEntryData* FmFormData::Clone()
 301 {
 302     return new FmFormData( *this );
 303 }
 304
 305
 306 bool FmFormData::IsEqualWithoutChildren( FmEntryData* pEntryData )
 307 {
 308     if(this == pEntryData)
 309         return true;
 310     if( !pEntryData->ISA(FmFormData) )
 311         return false;
 312     FmFormData* pFormData = static_cast<FmFormData*>(pEntryData);
 313     if( (XForm*)m_xForm.get() != (XForm*)pFormData->GetFormIface().get() )
 314         return false;
 315
 316     return FmEntryData::IsEqualWithoutChildren( pFormData );
 317 }
 318
 319 TYPEINIT1( FmControlData, FmEntryData );
 320
 321 FmControlData::FmControlData(
 322     const Reference< XFormComponent >& _rxComponent,
 323     const ImageList& _rNormalImages,
 324     FmFormData* _pParent
 325 )
 326 :   FmEntryData( _pParent, _rxComponent ),
 327     m_xFormComponent( _rxComponent )
 328 {
 329
 330     // Images setzen
 331     m_aNormalImage = GetImage( _rNormalImages );
 332
 333
 334     // Titel setzen
 335     Reference< XPropertySet >  xSet(m_xFormComponent, UNO_QUERY);
 336     if( xSet.is() )
 337     {
 338         SetText( ::comphelper::getString(xSet->getPropertyValue( FM_PROP_NAME )));
 339     }
 340 }
 341
 342
 343 FmControlData::~FmControlData()
 344 {
 345 }
 346
 347
 348 FmControlData::FmControlData( const FmControlData& rControlData )
 349     :FmEntryData( rControlData )
 350 {
 351     m_xFormComponent = rControlData.GetFormComponent();
 352 }
 353
 354
 355 FmEntryData* FmControlData::Clone()
 356 {
 357     return new FmControlData( *this );
 358 }
 359
 360
 361 Image FmControlData::GetImage(const ImageList& ilNavigatorImages) const
 362 {
 363
 364     // Default-Image
 365     Image aImage = ilNavigatorImages.GetImage( RID_SVXIMG_CONTROL );
 366
 367     Reference< XServiceInfo > xInfo( m_xFormComponent, UNO_QUERY );
 368     if (!m_xFormComponent.is())
 369         return aImage;
 370
 371
 372     // Spezielle Control-Images
 373     sal_Int16 nObjectType = getControlTypeByObject(xInfo);
 374     switch (nObjectType)
 375     {
 376     case OBJ_FM_BUTTON:
 377         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_BUTTON );
 378         break;
 379
 380     case OBJ_FM_FIXEDTEXT:
 381         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_FIXEDTEXT );
 382         break;
 383
 384     case OBJ_FM_EDIT:
 385         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_EDIT );
 386         break;
 387
 388     case OBJ_FM_RADIOBUTTON:
 389         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_RADIOBUTTON );
 390         break;
 391
 392     case OBJ_FM_CHECKBOX:
 393         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_CHECKBOX );
 394         break;
 395
 396     case OBJ_FM_LISTBOX:
 397         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_LISTBOX );
 398         break;
 399
 400     case OBJ_FM_COMBOBOX:
 401         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_COMBOBOX );
 402         break;
 403
 404     case OBJ_FM_NAVIGATIONBAR:
 405         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_NAVIGATIONBAR );
 406         break;
 407
 408     case OBJ_FM_GROUPBOX:
 409         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_GROUPBOX );
 410         break;
 411
 412     case OBJ_FM_IMAGEBUTTON:
 413         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_IMAGEBUTTON );
 414         break;
 415
 416     case OBJ_FM_FILECONTROL:
 417         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_FILECONTROL );
 418         break;
 419
 420     case OBJ_FM_HIDDEN:
 421         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_HIDDEN );
 422         break;
 423
 424     case OBJ_FM_DATEFIELD:
 425         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_DATEFIELD );
 426         break;
 427
 428     case OBJ_FM_TIMEFIELD:
 429         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_TIMEFIELD );
 430         break;
 431
 432     case OBJ_FM_NUMERICFIELD:
 433         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_NUMERICFIELD );
 434         break;
 435
 436     case OBJ_FM_CURRENCYFIELD:
 437         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_CURRENCYFIELD );
 438         break;
 439
 440     case OBJ_FM_PATTERNFIELD:
 441         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_PATTERNFIELD );
 442         break;
 443
 444     case OBJ_FM_IMAGECONTROL:
 445         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_IMAGECONTROL );
 446         break;
 447
 448     case OBJ_FM_FORMATTEDFIELD:
 449         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_FORMATTEDFIELD );
 450         break;
 451
 452     case OBJ_FM_GRID:
 453         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_GRID );
 454         break;
 455
 456     case OBJ_FM_SCROLLBAR:
 457         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_SCROLLBAR );
 458         break;
 459
 460     case OBJ_FM_SPINBUTTON:
 461         aImage = ilNavigatorImages.GetImage( RID_SVXIMG_SPINBUTTON);
 462         break;
 463     }
 464
 465     return aImage;
 466 }
 467
 468
 469 bool FmControlData::IsEqualWithoutChildren( FmEntryData* pEntryData )
 470 {
 471     if(this == pEntryData)
 472         return true;
 473
 474     if( !pEntryData->ISA(FmControlData) )
 475         return false;
 476     FmControlData* pControlData = static_cast<FmControlData*>(pEntryData);
 477
 478     if( (XFormComponent*)m_xFormComponent.get() != (XFormComponent*)pControlData->GetFormComponent().get() )
 479         return false;
 480
 481     return FmEntryData::IsEqualWithoutChildren( pControlData );
 482 }
 483
 484
 485 void FmControlData::ModelReplaced(
 486     const Reference< XFormComponent >& _rxNew,
 487     const ImageList& _rNormalImages
 488 )
 489 {
 490     m_xFormComponent = _rxNew;
 491     newObject( m_xFormComponent );
 492
 493     // Images neu setzen
 494     m_aNormalImage = GetImage( _rNormalImages );
 495 }
 496
 497
 498 namespace svxform
 499 {
 500
 501     NavigatorFrame::NavigatorFrame( SfxBindings* _pBindings, SfxChildWindow* _pMgr,
 502                                   vcl::Window* _pParent )
 503       :SfxDockingWindow( _pBindings, _pMgr, _pParent, WinBits(WB_STDMODELESS|WB_SIZEABLE|WB_ROLLABLE|WB_3DLOOK|WB_DOCKABLE) )
 504       ,SfxControllerItem( SID_FM_FMEXPLORER_CONTROL, *_pBindings )
 505     {
 506         SetHelpId( HID_FORM_NAVIGATOR_WIN );
 507
 508         m_pNavigatorTree = VclPtr<NavigatorTree>::Create( this );
 509         m_pNavigatorTree->Show();
 510         SetText( SVX_RES(RID_STR_FMEXPLORER) );
 511         SfxDockingWindow::SetFloatingSize( Size(200,200) );
 512     }
 513
 514
 515     NavigatorFrame::~NavigatorFrame()
 516     {
 517         disposeOnce();
 518     }
 519
 520     void NavigatorFrame::dispose()
 521     {
 522         m_pNavigatorTree.disposeAndClear();
 523         SfxDockingWindow::dispose();
 524     }
 525
 526
 527     void NavigatorFrame::UpdateContent( FmFormShell* pFormShell )
 528     {
 529         m_pNavigatorTree->UpdateContent( pFormShell );
 530     }
 531
 532
 533     void NavigatorFrame::StateChanged( sal_uInt16 nSID, SfxItemState eState, const SfxPoolItem* pState )
 534     {
 535         if( !pState  || SID_FM_FMEXPLORER_CONTROL != nSID )
 536             return;
 537
 538         if( eState >= SfxItemState::DEFAULT )
 539         {
 540             FmFormShell* pShell = PTR_CAST( FmFormShell, static_cast<const SfxObjectItem*>(pState)->GetShell() );
 541             UpdateContent( pShell );
 542         }
 543         else
 544             UpdateContent( NULL );
 545     }
 546
 547
 548     void NavigatorFrame::GetFocus()
 549     {
 550         if ( m_pNavigatorTree )
 551             m_pNavigatorTree->GrabFocus();
 552         else
 553             SfxDockingWindow::GetFocus();
 554     }
 555
 556
 557     bool NavigatorFrame::Close()
 558     {
 559         UpdateContent( NULL );
 560         return SfxDockingWindow::Close();
 561     }
 562
 563
 564     void NavigatorFrame::FillInfo( SfxChildWinInfo& rInfo ) const
 565     {
 566         SfxDockingWindow::FillInfo( rInfo );
 567         rInfo.bVisible = false;
 568     }
 569
 570
 571     Size NavigatorFrame::CalcDockingSize( SfxChildAlignment eAlign )
 572     {
 573         if ( ( eAlign == SfxChildAlignment::TOP ) || ( eAlign == SfxChildAlignment::BOTTOM ) )
 574             return Size();
 575
 576         return SfxDockingWindow::CalcDockingSize( eAlign );
 577     }
 578
 579
 580     SfxChildAlignment NavigatorFrame::CheckAlignment( SfxChildAlignment _eActAlign, SfxChildAlignment _eAlign )
 581     {
 582         if ( ( _eAlign == SfxChildAlignment::LEFT ) || ( _eAlign == SfxChildAlignment::RIGHT ) || ( _eAlign == SfxChildAlignment::NOALIGNMENT ) )
 583             return _eAlign;
 584         return _eActAlign;
 585     }
 586
 587
 588     void NavigatorFrame::Resize()
 589     {
 590         SfxDockingWindow::Resize();
 591
 592         Size aLogOutputSize = PixelToLogic( GetOutputSizePixel(), MAP_APPFONT );
 593         Size aLogExplSize = aLogOutputSize;
 594         aLogExplSize.Width() -= 6;
 595         aLogExplSize.Height() -= 6;
 596
 597         Point aExplPos = LogicToPixel( Point(3,3), MAP_APPFONT );
 598         Size aExplSize = LogicToPixel( aLogExplSize, MAP_APPFONT );
 599
 600         m_pNavigatorTree->SetPosSizePixel( aExplPos, aExplSize );
 601     }
 602
 603
 604
 605     // class NavigatorFrameManager
 606
 607
 608
 609     SFX_IMPL_DOCKINGWINDOW( NavigatorFrameManager, SID_FM_SHOW_FMEXPLORER )
 610
 611
 612     NavigatorFrameManager::NavigatorFrameManager( vcl::Window* _pParent, sal_uInt16 _nId,
 613                                         SfxBindings* _pBindings, SfxChildWinInfo* _pInfo )
 614                      :SfxChildWindow( _pParent, _nId )
 615     {
 616         pWindow = VclPtr<NavigatorFrame>::Create( _pBindings, this, _pParent );
 617         eChildAlignment = SfxChildAlignment::NOALIGNMENT;
 618         static_cast<SfxDockingWindow*>(pWindow.get())->Initialize( _pInfo );
 619     }
 620
 621
 622 }
 623
 624
 625 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */