sfx2/source/dialog/mgetempl.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: mgetempl.cxx,v $
  10  * $Revision: 1.15 $
  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
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_sfx2.hxx"
  33
  34 // include ---------------------------------------------------------------
  35
  36 #ifndef _MSGBOX_HXX //autogen
  37 #include <vcl/msgbox.hxx>
  38 #endif
  39 #include <vcl/field.hxx>
  40 #include <svtools/eitem.hxx>
  41 #include <svtools/intitem.hxx>
  42 #include <svtools/style.hxx>
  43 #ifndef GCC
  44 #endif
  45
  46 #include <sfx2/styfitem.hxx>
  47 #include <sfx2/styledlg.hxx>
  48 #include <sfx2/app.hxx>
  49 #include <sfx2/mgetempl.hxx>
  50 #include <sfx2/objsh.hxx>
  51 #include "sfxtypes.hxx"
  52 #include "sfxresid.hxx"
  53 #include <sfx2/module.hxx>
  54
  55 #include <sfx2/sfx.hrc>
  56 #include "dialog.hrc"
  57 #include "mgetempl.hrc"
  58
  59 #ifndef _SFX_STYLE_HRC
  60 #include <svtools/style.hrc>
  61 #endif
  62
  63 // SfxManageStyleSheetPage -----------------------------------------------
  64
  65 SfxManageStyleSheetPage::SfxManageStyleSheetPage( Window* pParent, const SfxItemSet& rAttrSet ) :
  66
  67     SfxTabPage( pParent, SfxResId( TP_MANAGE_STYLES ), rAttrSet ),
  68
  69     aNameFt             ( this, SfxResId( FT_NAME ) ),
  70     aNameEd             ( this, SfxResId( ED_NAME ) ),
  71     aAutoCB     ( this, SfxResId( CB_AUTO ) ),
  72
  73     aFollowFt   ( this, SfxResId( FT_NEXT ) ),
  74     aFollowLb   ( this, SfxResId( LB_NEXT ) ),
  75
  76     aBaseFt             ( this, SfxResId( FT_BASE ) ),
  77     aBaseLb             ( this, SfxResId( LB_BASE ) ),
  78
  79     aFilterFt   ( this, SfxResId( FT_REGION ) ),
  80     aFilterLb   ( this, SfxResId( LB_REGION ) ),
  81
  82     aDescFt             ( this, SfxResId( FT_DESC ) ),
  83     aDescED             ( this, SfxResId( ED_DESC ) ),
  84     aDescGb             ( this, SfxResId( GB_DESC ) ),
  85
  86     pStyle( &( (SfxStyleDialog*)pParent->GetParent() )->GetStyleSheet() ),
  87
  88     pItem               ( 0 ),
  89     bModified   ( FALSE ),
  90     aName               ( pStyle->GetName() ),
  91     aFollow             ( pStyle->GetFollow() ),
  92     aParent             ( pStyle->GetParent() ),
  93     nFlags              ( pStyle->GetMask() )
  94
  95 /*  [Beschreibung]
  96
  97     Konstruktor; initialisiert die ListBoxen mit den Vorlagen
  98
  99 */
 100
 101 {
 102     FreeResource();
 103
 104     if ( IsBackground() )
 105         aDescED.SetBackground( GetBackground() );
 106     FixedInfo* pInfo = new FixedInfo( this );
 107     aDescED.SetFont( pInfo->GetFont() );
 108     delete pInfo;
 109
 110     aDescED.Hide();
 111     aDescFt.Show();
 112
 113     // diese Page braucht ExchangeSupport
 114     SetExchangeSupport();
 115
 116     ResMgr* pResMgr = SFX_APP()->GetModule_Impl()->GetResMgr();
 117     DBG_ASSERT( pResMgr, "kein ResMgr am Modul" );
 118     pFamilies = new SfxStyleFamilies( ResId( DLG_STYLE_DESIGNER, *pResMgr ) );
 119
 120     SfxStyleSheetBasePool* pPool = 0;
 121     SfxObjectShell* pDocShell = SfxObjectShell::Current();
 122
 123     if ( pDocShell )
 124         pPool = pDocShell->GetStyleSheetPool();
 125     DBG_ASSERT( pPool, "kein Pool oder keine DocShell" );
 126
 127     if ( pPool )
 128     {
 129         pPool->SetSearchMask( pStyle->GetFamily() );
 130         pPool->First();     // fuer SW - interne Liste updaten
 131     }
 132
 133     if ( !pStyle->GetName().Len() && pPool )
 134     {
 135         // NullString als Name -> Name generieren
 136         String aNoName( SfxResId( STR_NONAME ) );
 137         USHORT nNo = 1;
 138         String aNo( aNoName );
 139         aNoName += String::CreateFromInt32( nNo );
 140         while ( pPool->Find( aNoName ) )
 141         {
 142             ++nNo;
 143             aNoName = aNo;
 144             aNoName += String::CreateFromInt32( nNo );
 145         }
 146         pStyle->SetName( aNoName );
 147         aName = aNoName;
 148         aFollow = pStyle->GetFollow();
 149         aParent = pStyle->GetParent();
 150     }
 151     aNameEd.SetText(pStyle->GetName());
 152
 153     if ( !pStyle->IsUserDefined() )
 154         aNameEd.SetReadOnly();
 155
 156     if ( pStyle->HasFollowSupport() && pPool )
 157     {
 158         SfxStyleSheetBase* pPoolStyle = pPool->First();
 159
 160         while ( pPoolStyle )
 161         {
 162             aFollowLb.InsertEntry( pPoolStyle->GetName() );
 163             pPoolStyle = pPool->Next();
 164         }
 165
 166         // eine neue Vorlage ist noch nicht im Pool
 167         if ( LISTBOX_ENTRY_NOTFOUND == aFollowLb.GetEntryPos( pStyle->GetName() ) )
 168             aFollowLb.InsertEntry( pStyle->GetName() );
 169     }
 170     else
 171     {
 172         aFollowFt.Hide();
 173         aFollowLb.Hide();
 174
 175         aFilterFt.SetPosPixel( aBaseFt.GetPosPixel() );
 176         aFilterLb.SetPosPixel( aBaseLb.GetPosPixel() );
 177
 178         aBaseFt.SetPosPixel( aFollowFt.GetPosPixel() );
 179         aBaseLb.SetPosPixel( aFollowLb.GetPosPixel() );
 180     }
 181
 182     if ( pStyle->HasParentSupport() && pPool )
 183     {
 184         if ( pStyle->HasClearParentSupport() )
 185             // die Basisvorlage darf auf NULL gesetzt werden
 186             aBaseLb.InsertEntry( String( SfxResId( STR_NONE ) ) );
 187
 188         SfxStyleSheetBase* pPoolStyle = pPool->First();
 189
 190         while ( pPoolStyle )
 191         {
 192             const String aStr( pPoolStyle->GetName() );
 193             // eigener Namen nicht als Basisvorlage
 194             if ( aStr != aName )
 195                 aBaseLb.InsertEntry( aStr );
 196             pPoolStyle = pPool->Next();
 197         }
 198     }
 199     else
 200     {
 201         aBaseFt.Disable();
 202         aBaseLb.Disable();
 203     }
 204     USHORT nCount = pFamilies->Count();
 205
 206     USHORT i;
 207     for ( i = 0; i < nCount; ++i )
 208     {
 209         pItem = pFamilies->GetObject(i);
 210
 211         if ( pItem->GetFamily() == pStyle->GetFamily() )
 212             break;
 213     }
 214
 215     USHORT nStyleFilterIdx = 0xffff;
 216
 217     if ( i < nCount )
 218     {
 219         // Filterflags
 220         const SfxStyleFilter& rList = pItem->GetFilterList();
 221         nCount = (USHORT)rList.Count();
 222         USHORT nIdx = 0;
 223         USHORT nMask = pStyle->GetMask() & ~SFXSTYLEBIT_USERDEF;
 224
 225         if ( !nMask )   // Benutzervorlage?
 226             nMask = pStyle->GetMask();
 227
 228         for ( i = 0; i < nCount; ++i )
 229         {
 230             SfxFilterTupel* pTupel = rList.GetObject(i);
 231
 232             if ( pTupel->nFlags != SFXSTYLEBIT_AUTO     &&
 233                  pTupel->nFlags != SFXSTYLEBIT_USED             &&
 234 //                               pTupel->nFlags != SFXSTYLEBIT_USERDEF  &&
 235                  pTupel->nFlags != SFXSTYLEBIT_ALL )
 236             {
 237                 aFilterLb.InsertEntry( pTupel->aName, nIdx );
 238                 aFilterLb.SetEntryData(nIdx, (void*)(long)i);
 239
 240                 if ( ( pTupel->nFlags & nMask ) == nMask )
 241                     nStyleFilterIdx = nIdx;
 242                 ++nIdx;
 243             }
 244         }
 245
 246         if ( nStyleFilterIdx != 0xFFFF )
 247             aFilterLb.SelectEntryPos( nStyleFilterIdx );
 248     }
 249
 250     if ( !aFilterLb.GetEntryCount() || !pStyle->IsUserDefined() )
 251     {
 252         pItem = 0;
 253         aFilterFt.Disable();
 254         aFilterLb.Disable();
 255     }
 256     else
 257         aFilterLb.SaveValue();
 258     SetDescriptionText_Impl();
 259
 260     if ( aFollowLb.IsEnabled() || aBaseLb.IsEnabled() )
 261     {
 262         aNameEd.SetGetFocusHdl(
 263             LINK( this, SfxManageStyleSheetPage, GetFocusHdl ) );
 264         aNameEd.SetLoseFocusHdl(
 265             LINK( this, SfxManageStyleSheetPage, LoseFocusHdl ) );
 266     }
 267     // ist es ein Style mit automatischem Update? (nur SW)
 268     if(SFX_ITEM_SET == rAttrSet.GetItemState(SID_ATTR_AUTO_STYLE_UPDATE))
 269     {
 270         Size aSize = aNameEd.GetSizePixel();
 271         aSize.Width() /= 2;
 272         aNameEd.SetSizePixel(aSize);
 273         aAutoCB.Show();
 274     }
 275 }
 276
 277 //-------------------------------------------------------------------------
 278
 279 SfxManageStyleSheetPage::~SfxManageStyleSheetPage()
 280
 281 /*  [Beschreibung]
 282
 283     Destruktor; Freigabe der Daten
 284
 285 */
 286
 287 {
 288     aNameEd.SetGetFocusHdl( Link() );
 289     aNameEd.SetLoseFocusHdl( Link() );
 290     delete pFamilies;
 291     pItem = 0;
 292     pStyle = 0;
 293
 294 }
 295
 296 //-------------------------------------------------------------------------
 297
 298 void SfxManageStyleSheetPage::UpdateName_Impl( ListBox* pBox,
 299                                                const String& rNew )
 300
 301 /*  [Beschreibung]
 302
 303     Nach der "Anderung eines Vorlagennamens die ListBox pBox
 304     aktualisieren
 305
 306     [Parameter]
 307
 308     ListBox* pBox                       ListBox, deren Eintr"age aktualisiert
 309                             werden sollen
 310     const String& rNew          der neue Name
 311
 312 */
 313
 314 {
 315     if ( pBox->IsEnabled() )
 316     {
 317         // ist der aktuelle Eintrag, dessen Namen modifizieren wurde
 318         const BOOL bSelect = pBox->GetSelectEntry() == aBuf;
 319         pBox->RemoveEntry( aBuf );
 320         pBox->InsertEntry( rNew );
 321
 322         if ( bSelect )
 323             pBox->SelectEntry( rNew );
 324     }
 325 }
 326
 327 //-------------------------------------------------------------------------
 328
 329 void SfxManageStyleSheetPage::SetDescriptionText_Impl()
 330
 331 /*  [Beschreibung]
 332
 333     Attributbeschreibung setzen. daf"ur die eingestellte Metrik besorgen.
 334 */
 335
 336 {
 337     SfxMapUnit eUnit = SFX_MAPUNIT_CM;
 338 //    FieldUnit eFieldUnit = pSfxApp->GetOptions().GetMetric();
 339     FieldUnit eFieldUnit( FUNIT_CM );
 340     SfxModule* pModule = SfxModule::GetActiveModule();
 341     if ( pModule )
 342     {
 343         const SfxPoolItem* pPoolItem = pModule->GetItem( SID_ATTR_METRIC );
 344         if ( pPoolItem )
 345             eFieldUnit = (FieldUnit)( (SfxUInt16Item*)pPoolItem )->GetValue();
 346     }
 347
 348     switch ( eFieldUnit )
 349     {
 350         case FUNIT_MM:          eUnit = SFX_MAPUNIT_MM; break;
 351
 352         case FUNIT_CM:
 353         case FUNIT_M:
 354         case FUNIT_KM:          eUnit = SFX_MAPUNIT_CM; break;
 355
 356         case FUNIT_POINT:
 357         case FUNIT_PICA:        eUnit = SFX_MAPUNIT_POINT; break;
 358
 359         case FUNIT_INCH:
 360         case FUNIT_FOOT:
 361         case FUNIT_MILE:        eUnit = SFX_MAPUNIT_INCH; break;
 362
 363         default:
 364             DBG_ERRORFILE( "not supported fieldunit" );
 365     }
 366     aDescFt.SetText( pStyle->GetDescription( eUnit ) );
 367 }
 368
 369 //-------------------------------------------------------------------------
 370
 371 IMPL_LINK_INLINE_START( SfxManageStyleSheetPage, GetFocusHdl, Edit *, pEdit )
 372
 373 /*  [Beschreibung]
 374
 375     StarView Handler; GetFocus-Handler des Edits mit dem Vorlagennamen.
 376
 377 */
 378
 379 {
 380     aBuf = pEdit->GetText().EraseLeadingChars();
 381     return 0;
 382 }
 383 IMPL_LINK_INLINE_END( SfxManageStyleSheetPage, GetFocusHdl, Edit *, pEdit )
 384
 385 //-------------------------------------------------------------------------
 386
 387 IMPL_LINK_INLINE_START( SfxManageStyleSheetPage, LoseFocusHdl, Edit *, pEdit )
 388
 389 /*  [Beschreibung]
 390
 391     StarView Handler; LoseFocus-Handler des Edits mit dem Vorlagennamen.
 392     Dieser aktualisiert ggf. die Listbox mit den Folgevorlagen.
 393     In der Listbox mit den Basisvorlagen ist die aktuelle Vorlage
 394     selbst nicht enthalten.
 395
 396 */
 397
 398 {
 399     const String aStr( pEdit->GetText().EraseLeadingChars() );
 400     pEdit->SetText( aStr );
 401     // ggf. Listbox der Basisvorlagen aktualisieren
 402     if ( aStr != aBuf )
 403         UpdateName_Impl( &aFollowLb, aStr );
 404     return 0;
 405 }
 406 IMPL_LINK_INLINE_END( SfxManageStyleSheetPage, LoseFocusHdl, Edit *, pEdit )
 407
 408 //-------------------------------------------------------------------------
 409
 410 BOOL SfxManageStyleSheetPage::FillItemSet( SfxItemSet& rSet )
 411
 412 /*  [Beschreibung]
 413
 414
 415     Handler f"ur das Setzen der (modifizierten) Daten. Wird aus
 416     dem Ok des SfxTabDialog gerufen.
 417
 418     [Parameter]
 419
 420     SfxItemSet &rAttrSet                das Set, das die Daten entgegennimmt.
 421
 422
 423     [R"uckgabewert]
 424
 425     BOOL                                                TRUE:  es hat eine "Anderung der Daten
 426                                        stattgefunden
 427                                 FALSE: es hat keine "Anderung der Daten
 428                                        stattgefunden
 429
 430     [Querverweise]
 431
 432     <class SfxTabDialog>
 433
 434 */
 435
 436 {
 437     const USHORT nFilterIdx = aFilterLb.GetSelectEntryPos();
 438
 439     // Filter setzen
 440
 441     if ( LISTBOX_ENTRY_NOTFOUND  != nFilterIdx          &&
 442          nFilterIdx != aFilterLb.GetSavedValue()        &&
 443          aFilterLb.IsEnabled() )
 444     {
 445         bModified = TRUE;
 446         DBG_ASSERT( pItem, "kein Item" );
 447         // geht nur bei Benutzervorlagen
 448 #if OSL_DEBUG_LEVEL > 1
 449         USHORT nIdx = (USHORT)(long)aFilterLb.GetEntryData( nFilterIdx );
 450         SfxFilterTupel* p;
 451         p = pItem->GetFilterList().GetObject( nIdx );
 452 #endif
 453         USHORT nMask = pItem->GetFilterList().GetObject(
 454             (USHORT)(long)aFilterLb.GetEntryData( nFilterIdx ) )->nFlags |
 455             SFXSTYLEBIT_USERDEF;
 456         pStyle->SetMask( nMask );
 457     }
 458     if(aAutoCB.IsVisible() &&
 459         aAutoCB.IsChecked() != aAutoCB.GetSavedValue())
 460     {
 461         rSet.Put(SfxBoolItem(SID_ATTR_AUTO_STYLE_UPDATE, aAutoCB.IsChecked()));
 462     }
 463
 464     return bModified;
 465 }
 466
 467 //-------------------------------------------------------------------------
 468
 469 void SfxManageStyleSheetPage::Reset( const SfxItemSet& /*rAttrSet*/ )
 470
 471 /*  [Beschreibung]
 472
 473
 474     Handler f"ur das Initialisieren der Seite mit den initialen Daten.
 475
 476     [Parameter]
 477
 478     const SfxItemSet &rAttrSet          das Set mit den Daten
 479
 480
 481     [Querverweise]
 482
 483     <class SfxTabDialog>
 484
 485 */
 486
 487 {
 488     bModified = FALSE;
 489     String sCmp( pStyle->GetName() );
 490
 491     if ( sCmp != aName )
 492         pStyle->SetName( aName );
 493     aNameEd.SetText( aName );
 494
 495     if ( aFollowLb.IsEnabled() )
 496     {
 497         sCmp = pStyle->GetFollow();
 498
 499         if ( sCmp != aFollow )
 500             pStyle->SetFollow( aFollow );
 501
 502         if ( !aFollow.Len() )
 503             aFollowLb.SelectEntry( aName );
 504         else
 505             aFollowLb.SelectEntry( aFollow );
 506     }
 507
 508     if ( aBaseLb.IsEnabled() )
 509     {
 510         sCmp = pStyle->GetParent();
 511
 512         if ( sCmp != aParent )
 513             pStyle->SetParent( aParent );
 514
 515         if ( !aParent.Len() )
 516             aBaseLb.SelectEntry( String( SfxResId( STR_NONE ) ) );
 517         else
 518             aBaseLb.SelectEntry( aParent );
 519
 520         if ( String( SfxResId( STR_STANDARD ) ) == aName )
 521         {
 522             // die Standardvorlage kann nicht verkn"upft werden
 523             aBaseFt.Disable();
 524             aBaseLb.Disable();
 525         }
 526     }
 527
 528     if ( aFilterLb.IsEnabled() )
 529     {
 530         USHORT nCmp = pStyle->GetMask();
 531
 532         if ( nCmp != nFlags )
 533             pStyle->SetMask( nFlags );
 534         aFilterLb.SelectEntryPos( aFilterLb.GetSavedValue() );
 535     }
 536 }
 537
 538 //-------------------------------------------------------------------------
 539
 540 SfxTabPage* SfxManageStyleSheetPage::Create( Window* pParent,
 541                                              const SfxItemSet &rAttrSet )
 542
 543 /*  [Beschreibung]
 544
 545
 546     Factory f"ur das Erzeugen der Seite
 547
 548     [Querverweise]
 549
 550     <class SfxTabDialog>
 551
 552 */
 553
 554 {
 555     return new SfxManageStyleSheetPage( pParent, rAttrSet );
 556 }
 557
 558 //-------------------------------------------------------------------------
 559
 560 void SfxManageStyleSheetPage::ActivatePage( const SfxItemSet& rSet)
 561
 562 /*  [Beschreibung]
 563
 564     ActivatePage- Handler des SfxTabDialog; wird f"ur die Aktualisierung
 565     des beschreibenden Textes verwendet, da sich dieser durch "Anderungen
 566     der Daten anderer Seiten ge"andert haben kann.
 567
 568     [Parameter]
 569
 570     const SfxItemSet&           das Set f"ur den Datenaustausch; wird
 571                             hier nicht verwendet.
 572
 573     [Querverweise]
 574
 575     <SfxTabDialog::ActivatePage(const SfxItemSet &)>
 576
 577 */
 578
 579 {
 580     SetDescriptionText_Impl();
 581
 582     // ist es ein Style mit automatischem Update? (nur SW)
 583     const SfxPoolItem* pPoolItem;
 584
 585     if ( SFX_ITEM_SET ==
 586          rSet.GetItemState( SID_ATTR_AUTO_STYLE_UPDATE, FALSE, &pPoolItem ) )
 587         aAutoCB.Check( ( (const SfxBoolItem*)pPoolItem )->GetValue() );
 588     aAutoCB.SaveValue();
 589 }
 590
 591 //-------------------------------------------------------------------------
 592
 593 int SfxManageStyleSheetPage::DeactivatePage( SfxItemSet* pItemSet )
 594
 595 /*  [Beschreibung]
 596
 597     DeactivatePage- Handler des SfxTabDialog; die Daten werden
 598     an der Vorlage eingestellt, damit die richtige Vererbung
 599     f"ur die anderen Seiten des Dialoges vorliegt.
 600     Im Fehlerfall wird das Verlassen der Seite unterbunden.
 601
 602     [Parameter]
 603
 604     SfxItemSet*                 das Set f"ur den Datenaustausch; wird hier nicht verwendet.
 605
 606     [Querverweise]
 607
 608     <SfxTabDialog::DeactivatePage(SfxItemSet*)>
 609
 610 */
 611
 612 {
 613     int nRet = SfxTabPage::LEAVE_PAGE;
 614
 615     if ( aNameEd.IsModified() )
 616     {
 617         // bei <Enter> wird kein LoseFocus() durch StarView ausgel"ost
 618         if ( aNameEd.HasFocus() )
 619             LoseFocusHdl( &aNameEd );
 620
 621         if ( !pStyle->SetName( aNameEd.GetText().EraseLeadingChars() ) )
 622         {
 623             InfoBox aBox( this, SfxResId( MSG_TABPAGE_INVALIDNAME ) );
 624             aBox.Execute();
 625             aNameEd.GrabFocus();
 626             aNameEd.SetSelection( Selection( SELECTION_MIN, SELECTION_MAX ) );
 627             return SfxTabPage::KEEP_PAGE;
 628         }
 629         bModified = TRUE;
 630     }
 631
 632     if ( pStyle->HasFollowSupport() && aFollowLb.IsEnabled() )
 633     {
 634         const String aFollowEntry( aFollowLb.GetSelectEntry() );
 635
 636         if ( pStyle->GetFollow() != aFollowEntry )
 637         {
 638             if ( !pStyle->SetFollow( aFollowEntry ) )
 639             {
 640                 InfoBox aBox( this, SfxResId( MSG_TABPAGE_INVALIDSTYLE ) );
 641                 aBox.Execute();
 642                 aFollowLb.GrabFocus();
 643                 return SfxTabPage::KEEP_PAGE;
 644             }
 645             bModified = TRUE;
 646         }
 647     }
 648
 649     if ( aBaseLb.IsEnabled() )
 650     {
 651         String aParentEntry( aBaseLb.GetSelectEntry() );
 652
 653         if ( String( SfxResId( STR_NONE ) ) == aParentEntry || aParentEntry == pStyle->GetName() )
 654             aParentEntry.Erase();
 655
 656         if ( pStyle->GetParent() != aParentEntry )
 657         {
 658             if ( !pStyle->SetParent( aParentEntry ) )
 659             {
 660                 InfoBox aBox( this, SfxResId( MSG_TABPAGE_INVALIDPARENT ) );
 661                 aBox.Execute();
 662                 aBaseLb.GrabFocus();
 663                 return SfxTabPage::KEEP_PAGE;
 664             }
 665             bModified = TRUE;
 666             nRet |= (int)SfxTabPage::REFRESH_SET;
 667         }
 668     }
 669
 670     if ( pItemSet )
 671         FillItemSet( *pItemSet );
 672
 673     return nRet;
 674 }
 675