cui/source/tabpages/tplnedef.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 #include <tools/shl.hxx>
  21 #include <tools/urlobj.hxx>
  22 #include <vcl/msgbox.hxx>
  23 #include <unotools/pathoptions.hxx>
  24 #include <sfx2/app.hxx>
  25 #include <sfx2/module.hxx>
  26 #include <sfx2/filedlghelper.hxx>
  27 #include "com/sun/star/ui/dialogs/TemplateDescription.hpp"
  28
  29 #include <cuires.hrc>
  30 #include "tabline.hrc"
  31 #include "helpid.hrc"
  32
  33 #include "svx/xattr.hxx"
  34 #include <svx/xpool.hxx>
  35 #include <svx/xtable.hxx>
  36
  37 #include "svx/drawitem.hxx"
  38 #include "cuitabline.hxx"
  39 #include "dlgname.hxx"
  40 #include "defdlgname.hxx"
  41 #include <svx/svxdlg.hxx>
  42 #include <dialmgr.hxx>
  43 #include "svx/dlgutil.hxx"
  44 #include <svx/dialmgr.hxx>
  45 #include <svx/dialogs.hrc>
  46
  47 #define XOUT_WIDTH    150
  48
  49 SvxLineDefTabPage::SvxLineDefTabPage
  50 (
  51     Window* pParent,
  52     const SfxItemSet& rInAttrs
  53 ) :
  54
  55     SfxTabPage( pParent, CUI_RES( RID_SVXPAGE_LINE_DEF ), rInAttrs ),
  56
  57     aFlDefinition   ( this, CUI_RES( FL_DEFINITION ) ),
  58     aFTLinestyle    ( this, CUI_RES( FT_LINESTYLE ) ),
  59     aLbLineStyles   ( this, CUI_RES( LB_LINESTYLES ) ),
  60     aFtType         ( this, CUI_RES( FT_TYPE ) ),
  61     aLbType1        ( this, CUI_RES( LB_TYPE_1 ) ),
  62     aLbType2        ( this, CUI_RES( LB_TYPE_2 ) ),
  63     aFtNumber       ( this, CUI_RES( FT_NUMBER ) ),
  64     aNumFldNumber1  ( this, CUI_RES( NUM_FLD_1 ) ),
  65     aNumFldNumber2  ( this, CUI_RES( NUM_FLD_2 ) ),
  66     aFtLength       ( this, CUI_RES( FT_LENGTH ) ),
  67     aMtrLength1     ( this, CUI_RES( MTR_FLD_LENGTH_1 ) ),
  68     aMtrLength2     ( this, CUI_RES( MTR_FLD_LENGTH_2 ) ),
  69     aFtDistance     ( this, CUI_RES( FT_DISTANCE ) ),
  70     aMtrDistance    ( this, CUI_RES( MTR_FLD_DISTANCE ) ),
  71     aCbxSynchronize ( this, CUI_RES( CBX_SYNCHRONIZE ) ),
  72     aBtnAdd         ( this, CUI_RES( BTN_ADD ) ),
  73     aBtnModify      ( this, CUI_RES( BTN_MODIFY ) ),
  74     aBtnDelete      ( this, CUI_RES( BTN_DELETE ) ),
  75     aBtnLoad        ( this, CUI_RES( BTN_LOAD ) ),
  76     aBtnSave        ( this, CUI_RES( BTN_SAVE ) ),
  77     aCtlPreview     ( this, CUI_RES( CTL_PREVIEW ) ),
  78
  79     rOutAttrs       ( rInAttrs ),
  80
  81     pXPool              ( (XOutdevItemPool*) rInAttrs.GetPool() ),
  82     aXLStyle            ( XLINE_DASH ),
  83     aXWidth             ( XOUT_WIDTH ),
  84     aXDash              ( String(), XDash( XDASH_RECT, 3, 7, 2, 40, 15 ) ),
  85     aXColor             ( String(), COL_BLACK ),
  86     aXLineAttr          ( pXPool ),
  87     rXLSet              ( aXLineAttr.GetItemSet() )
  88 {
  89     aLbType1.SetAccessibleName(String(CUI_RES( STR_START_TYPE ) ) );
  90     aLbType2.SetAccessibleName(String(CUI_RES( STR_END_TYPE ) ) );
  91     aNumFldNumber1.SetAccessibleName(String(CUI_RES( STR_START_NUM ) ) );
  92     aNumFldNumber2.SetAccessibleName(String(CUI_RES( STR_END_NUM ) ) );
  93     aMtrLength1.SetAccessibleName(String(CUI_RES( STR_START_LENGTH ) ) );
  94     aMtrLength2.SetAccessibleName(String(CUI_RES( STR_END_LENGTH ) ) );
  95
  96     FreeResource();
  97
  98     // this page needs ExchangeSupport
  99     SetExchangeSupport();
 100
 101     // adjust metric
 102     eFUnit = GetModuleFieldUnit( rInAttrs );
 103
 104     switch ( eFUnit )
 105     {
 106         case FUNIT_M:
 107         case FUNIT_KM:
 108             eFUnit = FUNIT_MM;
 109             break;
 110         default: ; //prevent warning
 111     }
 112     SetFieldUnit( aMtrDistance, eFUnit );
 113     SetFieldUnit( aMtrLength1, eFUnit );
 114     SetFieldUnit( aMtrLength2, eFUnit );
 115
 116     // determine PoolUnit
 117     SfxItemPool* pPool = rOutAttrs.GetPool();
 118     DBG_ASSERT( pPool, "Wo ist der Pool?" );
 119     ePoolUnit = pPool->GetMetric( SID_ATTR_LINE_WIDTH );
 120
 121     rXLSet.Put( aXLStyle );
 122     rXLSet.Put( aXWidth );
 123     rXLSet.Put( aXDash );
 124     rXLSet.Put( aXColor );
 125
 126     // #i34740#
 127     aCtlPreview.SetLineAttributes(aXLineAttr.GetItemSet());
 128
 129     aBtnAdd.SetClickHdl( LINK( this, SvxLineDefTabPage, ClickAddHdl_Impl ) );
 130     aBtnModify.SetClickHdl(
 131         LINK( this, SvxLineDefTabPage, ClickModifyHdl_Impl ) );
 132     aBtnDelete.SetClickHdl(
 133         LINK( this, SvxLineDefTabPage, ClickDeleteHdl_Impl ) );
 134     aBtnLoad.SetClickHdl( LINK( this, SvxLineDefTabPage, ClickLoadHdl_Impl ) );
 135     aBtnSave.SetClickHdl( LINK( this, SvxLineDefTabPage, ClickSaveHdl_Impl ) );
 136
 137     aNumFldNumber1.SetModifyHdl(
 138         LINK( this, SvxLineDefTabPage, ChangeNumber1Hdl_Impl ) );
 139     aNumFldNumber2.SetModifyHdl(
 140         LINK( this, SvxLineDefTabPage, ChangeNumber2Hdl_Impl ) );
 141     aLbLineStyles.SetSelectHdl(
 142         LINK( this, SvxLineDefTabPage, SelectLinestyleHdl_Impl ) );
 143
 144     // #i122042# switch off default adding of 'none' and 'solid' entries
 145     // for this ListBox; we want to select only editable/dashed styles
 146     aLbLineStyles.setAddStandardFields(false);
 147
 148     // absolute (in mm) or relative (in %)
 149     aCbxSynchronize.SetClickHdl(
 150         LINK( this, SvxLineDefTabPage, ChangeMetricHdl_Impl ) );
 151
 152     // preview must be updated when there's something changed
 153     Link aLink = LINK( this, SvxLineDefTabPage, SelectTypeHdl_Impl );
 154     aLbType1.SetSelectHdl( aLink );
 155     aLbType2.SetSelectHdl( aLink );
 156     aLink = LINK( this, SvxLineDefTabPage, ChangePreviewHdl_Impl );
 157     aMtrLength1.SetModifyHdl( aLink );
 158     aMtrLength2.SetModifyHdl( aLink );
 159     aMtrDistance.SetModifyHdl( aLink );
 160
 161     pDashList = NULL;
 162
 163     aBtnAdd.SetAccessibleRelationMemberOf( &aFlDefinition );
 164     aBtnModify.SetAccessibleRelationMemberOf( &aFlDefinition );
 165     aBtnDelete.SetAccessibleRelationMemberOf( &aFlDefinition );
 166     aBtnLoad.SetAccessibleRelationMemberOf( &aFlDefinition );
 167     aBtnSave.SetAccessibleRelationMemberOf( &aFlDefinition );
 168 }
 169
 170
 171 // -----------------------------------------------------------------------
 172
 173 void SvxLineDefTabPage::Construct()
 174 {
 175     // Line style fill; do *not* add default fields here
 176     aLbLineStyles.Fill( pDashList );
 177 }
 178
 179 // -----------------------------------------------------------------------
 180
 181 void SvxLineDefTabPage::ActivatePage( const SfxItemSet& )
 182 {
 183     if( *pDlgType == 0 ) // area dialog
 184     {
 185         // ActivatePage() is called before the dialog receives PageCreated() !!!
 186         if( pDashList.is() )
 187         {
 188             if( *pPageType == 1 &&
 189                 *pPosDashLb != LISTBOX_ENTRY_NOTFOUND )
 190             {
 191                 aLbLineStyles.SelectEntryPos( *pPosDashLb );
 192             }
 193             // so that a possibly existing line style is discarded
 194             SelectLinestyleHdl_Impl( this );
 195
 196             // determining (and possibly cutting) the name
 197             // and displaying it in the GroupBox
 198             OUString        aString( CUI_RES( RID_SVXSTR_TABLE ) );
 199             aString         += ": ";
 200             INetURLObject   aURL( pDashList->GetPath() );
 201
 202             aURL.Append( pDashList->GetName() );
 203             DBG_ASSERT( aURL.GetProtocol() != INET_PROT_NOT_VALID, "invalid URL" );
 204
 205             *pPageType = 0; // 2
 206             *pPosDashLb = LISTBOX_ENTRY_NOTFOUND;
 207         }
 208     }
 209 }
 210
 211 // -----------------------------------------------------------------------
 212
 213 int SvxLineDefTabPage::DeactivatePage( SfxItemSet* _pSet )
 214 {
 215     CheckChanges_Impl();
 216
 217     if( _pSet )
 218         FillItemSet( *_pSet );
 219
 220     return( LEAVE_PAGE );
 221 }
 222
 223 // -----------------------------------------------------------------------
 224
 225 void SvxLineDefTabPage::CheckChanges_Impl()
 226 {
 227     // is here used to NOT lose changes
 228     //XDashStyle eXDS;
 229
 230     if( aNumFldNumber1.GetText()     != aNumFldNumber1.GetSavedValue() ||
 231         aMtrLength1.GetText()        != aMtrLength1.GetSavedValue() ||
 232         aLbType1.GetSelectEntryPos() != aLbType1.GetSavedValue() ||
 233         aNumFldNumber2.GetText()     != aNumFldNumber2.GetSavedValue() ||
 234         aMtrLength2.GetText()        != aMtrLength2.GetSavedValue() ||
 235         aLbType2.GetSelectEntryPos() != aLbType2.GetSavedValue() ||
 236         aMtrDistance.GetText()       != aMtrDistance.GetSavedValue() )
 237     {
 238         ResMgr& rMgr = CUI_MGR();
 239         Image aWarningBoxImage = WarningBox::GetStandardImage();
 240         SvxMessDialog* aMessDlg = new SvxMessDialog(GetParentDialog(),
 241                                                     SVX_RESSTR( RID_SVXSTR_LINESTYLE ),
 242                                                     String( ResId( RID_SVXSTR_ASK_CHANGE_LINESTYLE, rMgr ) ),
 243                                                     &aWarningBoxImage );
 244         DBG_ASSERT(aMessDlg, "Dialogdiet fail!");
 245         aMessDlg->SetButtonText( MESS_BTN_1,
 246                                 String( ResId( RID_SVXSTR_CHANGE, rMgr ) ) );
 247         aMessDlg->SetButtonText( MESS_BTN_2,
 248                                 String( ResId( RID_SVXSTR_ADD, rMgr ) ) );
 249
 250         short nRet = aMessDlg->Execute();
 251
 252         switch( nRet )
 253         {
 254             case RET_BTN_1:
 255             {
 256                 ClickModifyHdl_Impl( this );
 257             }
 258             break;
 259
 260             case RET_BTN_2:
 261             {
 262                 ClickAddHdl_Impl( this );
 263             }
 264             break;
 265
 266             case RET_CANCEL:
 267             break;
 268         }
 269         delete aMessDlg;
 270     }
 271
 272
 273
 274     sal_uInt16 nPos = aLbLineStyles.GetSelectEntryPos();
 275     if( nPos != LISTBOX_ENTRY_NOTFOUND )
 276     {
 277         *pPosDashLb = nPos;
 278     }
 279 }
 280
 281 // -----------------------------------------------------------------------
 282
 283 sal_Bool SvxLineDefTabPage::FillItemSet( SfxItemSet& rAttrs )
 284 {
 285     if( *pDlgType == 0 ) // line dialog
 286     {
 287         if( *pPageType == 2 )
 288         {
 289             FillDash_Impl();
 290
 291             String aString( aLbLineStyles.GetSelectEntry() );
 292             rAttrs.Put( XLineStyleItem( XLINE_DASH ) );
 293             rAttrs.Put( XLineDashItem( aString, aDash ) );
 294         }
 295     }
 296     return( sal_True );
 297 }
 298
 299 // -----------------------------------------------------------------------
 300
 301 void SvxLineDefTabPage::Reset( const SfxItemSet& rAttrs )
 302 {
 303     if( rAttrs.GetItemState( GetWhich( XATTR_LINESTYLE ) ) != SFX_ITEM_DONTCARE )
 304     {
 305         XLineStyle eXLS = (XLineStyle) ( ( const XLineStyleItem& ) rAttrs.Get( GetWhich( XATTR_LINESTYLE ) ) ).GetValue();
 306
 307         switch( eXLS )
 308         {
 309             case XLINE_NONE:
 310             case XLINE_SOLID:
 311                 aLbLineStyles.SelectEntryPos( 0 );
 312                 break;
 313
 314             case XLINE_DASH:
 315             {
 316                 const XLineDashItem& rDashItem = ( const XLineDashItem& ) rAttrs.Get( XATTR_LINEDASH );
 317                 aDash = rDashItem.GetDashValue();
 318
 319                 aLbLineStyles.SetNoSelection();
 320                 aLbLineStyles.SelectEntry( rDashItem.GetName() );
 321             }
 322                 break;
 323
 324             default:
 325                 break;
 326         }
 327     }
 328     SelectLinestyleHdl_Impl( NULL );
 329
 330     // determine button state
 331     if( pDashList->Count() )
 332     {
 333         aBtnModify.Enable();
 334         aBtnDelete.Enable();
 335         aBtnSave.Enable();
 336     }
 337     else
 338     {
 339         aBtnModify.Disable();
 340         aBtnDelete.Disable();
 341         aBtnSave.Disable();
 342     }
 343 }
 344
 345 // -----------------------------------------------------------------------
 346
 347 SfxTabPage* SvxLineDefTabPage::Create( Window* pWindow,
 348                 const SfxItemSet& rOutAttrs )
 349 {
 350     return( new SvxLineDefTabPage( pWindow, rOutAttrs ) );
 351 }
 352
 353 //------------------------------------------------------------------------
 354
 355 IMPL_LINK( SvxLineDefTabPage, SelectLinestyleHdl_Impl, void *, p )
 356 {
 357     if(pDashList->Count())
 358     {
 359         int nTmp = aLbLineStyles.GetSelectEntryPos();
 360
 361         if(LISTBOX_ENTRY_NOTFOUND == nTmp)
 362         {
 363             OSL_ENSURE(false, "OOps, non-existent LineDash selected (!)");
 364             nTmp = 1;
 365         }
 366
 367         aDash = pDashList->GetDash( nTmp )->GetDash();
 368
 369         FillDialog_Impl();
 370
 371         rXLSet.Put( XLineDashItem( String(), aDash ) );
 372
 373         // #i34740#
 374         aCtlPreview.SetLineAttributes(aXLineAttr.GetItemSet());
 375
 376         aCtlPreview.Invalidate();
 377
 378         // Is not set before, in order to take the new style
 379         // only if there was an entry selected in the ListBox.
 380         // If it was called via Reset(), then p is == NULL
 381         if( p )
 382             *pPageType = 2;
 383     }
 384     return( 0L );
 385 }
 386
 387 //------------------------------------------------------------------------
 388
 389 IMPL_LINK_NOARG_INLINE_START(SvxLineDefTabPage, ChangePreviewHdl_Impl)
 390 {
 391     FillDash_Impl();
 392     aCtlPreview.Invalidate();
 393
 394     return( 0L );
 395 }
 396 IMPL_LINK_NOARG_INLINE_END(SvxLineDefTabPage, ChangePreviewHdl_Impl)
 397
 398 //------------------------------------------------------------------------
 399
 400 IMPL_LINK_NOARG(SvxLineDefTabPage, ChangeNumber1Hdl_Impl)
 401 {
 402     if( aNumFldNumber1.GetValue() == 0L )
 403     {
 404         aNumFldNumber2.SetMin( 1L );
 405         aNumFldNumber2.SetFirst( 1L );
 406     }
 407     else
 408     {
 409         aNumFldNumber2.SetMin( 0L );
 410         aNumFldNumber2.SetFirst( 0L );
 411     }
 412
 413     ChangePreviewHdl_Impl( this );
 414
 415     return( 0L );
 416 }
 417
 418 //------------------------------------------------------------------------
 419
 420 IMPL_LINK_NOARG(SvxLineDefTabPage, ChangeNumber2Hdl_Impl)
 421 {
 422     if( aNumFldNumber2.GetValue() == 0L )
 423     {
 424         aNumFldNumber1.SetMin( 1L );
 425         aNumFldNumber1.SetFirst( 1L );
 426     }
 427     else
 428     {
 429         aNumFldNumber1.SetMin( 0L );
 430         aNumFldNumber1.SetFirst( 0L );
 431     }
 432
 433     ChangePreviewHdl_Impl( this );
 434
 435     return( 0L );
 436 }
 437
 438
 439 //------------------------------------------------------------------------
 440
 441 IMPL_LINK( SvxLineDefTabPage, ChangeMetricHdl_Impl, void *, p )
 442 {
 443     if( !aCbxSynchronize.IsChecked() && aMtrLength1.GetUnit() != eFUnit )
 444     {
 445         long nTmp1, nTmp2, nTmp3;
 446
 447         // was changed with Control
 448         if( p )
 449         {
 450             nTmp1 = GetCoreValue( aMtrLength1, ePoolUnit ) * XOUT_WIDTH / 100;
 451             nTmp2 = GetCoreValue( aMtrLength2, ePoolUnit ) * XOUT_WIDTH / 100;
 452             nTmp3 = GetCoreValue( aMtrDistance, ePoolUnit ) * XOUT_WIDTH / 100;
 453         }
 454         else
 455         {
 456             nTmp1 = GetCoreValue( aMtrLength1, ePoolUnit );
 457             nTmp2 = GetCoreValue( aMtrLength2, ePoolUnit );
 458             nTmp3 = GetCoreValue( aMtrDistance, ePoolUnit );
 459         }
 460         aMtrLength1.SetDecimalDigits( 2 );
 461         aMtrLength2.SetDecimalDigits( 2 );
 462         aMtrDistance.SetDecimalDigits( 2 );
 463
 464         // adjust metric
 465         aMtrLength1.SetUnit( eFUnit );
 466         aMtrLength2.SetUnit( eFUnit );
 467         aMtrDistance.SetUnit( eFUnit );
 468
 469         SetMetricValue( aMtrLength1, nTmp1, ePoolUnit );
 470         SetMetricValue( aMtrLength2, nTmp2, ePoolUnit );
 471         SetMetricValue( aMtrDistance, nTmp3, ePoolUnit );
 472     }
 473     else if( aCbxSynchronize.IsChecked() && aMtrLength1.GetUnit() != FUNIT_CUSTOM )
 474     {
 475         long nTmp1, nTmp2, nTmp3;
 476
 477         // was changed with Control
 478         if( p )
 479         {
 480             nTmp1 = GetCoreValue( aMtrLength1, ePoolUnit ) * 100 / XOUT_WIDTH;
 481             nTmp2 = GetCoreValue( aMtrLength2, ePoolUnit ) * 100 / XOUT_WIDTH;
 482             nTmp3 = GetCoreValue( aMtrDistance, ePoolUnit ) * 100 / XOUT_WIDTH;
 483         }
 484         else
 485         {
 486             nTmp1 = GetCoreValue( aMtrLength1, ePoolUnit );
 487             nTmp2 = GetCoreValue( aMtrLength2, ePoolUnit );
 488             nTmp3 = GetCoreValue( aMtrDistance, ePoolUnit );
 489         }
 490
 491         aMtrLength1.SetDecimalDigits( 0 );
 492         aMtrLength2.SetDecimalDigits( 0 );
 493         aMtrDistance.SetDecimalDigits( 0 );
 494
 495         aMtrLength1.SetUnit( FUNIT_CUSTOM );
 496         aMtrLength2.SetUnit( FUNIT_CUSTOM );
 497         aMtrDistance.SetUnit( FUNIT_CUSTOM );
 498
 499
 500         SetMetricValue( aMtrLength1, nTmp1, ePoolUnit );
 501         SetMetricValue( aMtrLength2, nTmp2, ePoolUnit );
 502         SetMetricValue( aMtrDistance, nTmp3, ePoolUnit );
 503     }
 504     SelectTypeHdl_Impl( NULL );
 505
 506     return( 0L );
 507 }
 508
 509 //------------------------------------------------------------------------
 510
 511 IMPL_LINK( SvxLineDefTabPage, SelectTypeHdl_Impl, void *, p )
 512 {
 513     if ( p == &aLbType1 || !p )
 514     {
 515         if ( aLbType1.GetSelectEntryPos() == 0 )
 516         {
 517             aMtrLength1.Disable();
 518             aMtrLength1.SetText( String() );
 519         }
 520         else if ( !aMtrLength1.IsEnabled() )
 521         {
 522             aMtrLength1.Enable();
 523             aMtrLength1.Reformat();
 524         }
 525     }
 526
 527     if ( p == &aLbType2 || !p )
 528     {
 529         if ( aLbType2.GetSelectEntryPos() == 0 )
 530         {
 531             aMtrLength2.Disable();
 532             aMtrLength2.SetText( String() );
 533         }
 534         else if ( !aMtrLength2.IsEnabled() )
 535         {
 536             aMtrLength2.Enable();
 537             aMtrLength2.Reformat();
 538         }
 539     }
 540     ChangePreviewHdl_Impl( p );
 541     return( 0L );
 542 }
 543
 544 //------------------------------------------------------------------------
 545
 546 IMPL_LINK_NOARG(SvxLineDefTabPage, ClickAddHdl_Impl)
 547 {
 548     ResMgr& rMgr = CUI_MGR();
 549     String aNewName( SVX_RES( RID_SVXSTR_LINESTYLE ) );
 550     String aDesc( ResId( RID_SVXSTR_DESC_LINESTYLE, rMgr ) );
 551     String aName;
 552     XDashEntry* pEntry;
 553
 554     long nCount = pDashList->Count();
 555     long j = 1;
 556     sal_Bool bDifferent = sal_False;
 557
 558     while ( !bDifferent )
 559     {
 560         aName = aNewName;
 561         aName += sal_Unicode(' ');
 562         aName += OUString::valueOf( j++ );
 563         bDifferent = sal_True;
 564
 565         for ( long i = 0; i < nCount && bDifferent; i++ )
 566             if ( aName == pDashList->GetDash( i )->GetName() )
 567                 bDifferent = sal_False;
 568     }
 569
 570     SvxAbstractDialogFactory* pFact = SvxAbstractDialogFactory::Create();
 571     DBG_ASSERT(pFact, "Dialogdiet fail!");
 572     AbstractSvxNameDialog* pDlg = pFact->CreateSvxNameDialog( GetParentDialog(), aName, aDesc );
 573     DBG_ASSERT(pDlg, "Dialogdiet fail!");
 574     sal_Bool bLoop = sal_True;
 575
 576     while ( bLoop && pDlg->Execute() == RET_OK )
 577     {
 578         pDlg->GetName( aName );
 579         bDifferent = sal_True;
 580
 581         for( long i = 0; i < nCount && bDifferent; i++ )
 582         {
 583             if( aName == pDashList->GetDash( i )->GetName() )
 584                 bDifferent = sal_False;
 585         }
 586
 587         if( bDifferent )
 588         {
 589             bLoop = sal_False;
 590             FillDash_Impl();
 591
 592             pEntry = new XDashEntry( aDash, aName );
 593
 594             long nDashCount = pDashList->Count();
 595             pDashList->Insert( pEntry, nDashCount );
 596             const Bitmap aBitmap = pDashList->GetUiBitmap( nDashCount );
 597             aLbLineStyles.Append( pEntry, &aBitmap );
 598
 599             aLbLineStyles.SelectEntryPos( aLbLineStyles.GetEntryCount() - 1 );
 600
 601             *pnDashListState |= CT_MODIFIED;
 602
 603             *pPageType = 2;
 604
 605             // save values for changes recognition (-> method)
 606             aNumFldNumber1.SaveValue();
 607             aMtrLength1.SaveValue();
 608             aLbType1.SaveValue();
 609             aNumFldNumber2.SaveValue();
 610             aMtrLength2.SaveValue();
 611             aLbType2.SaveValue();
 612             aMtrDistance.SaveValue();
 613         }
 614         else
 615         {
 616             WarningBox aBox( GetParentDialog(), WinBits( WB_OK ),String( ResId( RID_SVXSTR_WARN_NAME_DUPLICATE, rMgr ) ) );
 617             aBox.SetHelpId( HID_WARN_NAME_DUPLICATE );
 618             aBox.Execute();
 619         }
 620     }
 621     delete( pDlg );
 622
 623     // determine button state
 624     if ( pDashList->Count() )
 625     {
 626         aBtnModify.Enable();
 627         aBtnDelete.Enable();
 628         aBtnSave.Enable();
 629     }
 630     return( 0L );
 631 }
 632
 633 //------------------------------------------------------------------------
 634
 635 IMPL_LINK_NOARG(SvxLineDefTabPage, ClickModifyHdl_Impl)
 636 {
 637     sal_uInt16 nPos = aLbLineStyles.GetSelectEntryPos();
 638
 639     if( nPos != LISTBOX_ENTRY_NOTFOUND )
 640     {
 641         ResMgr& rMgr = CUI_MGR();
 642         String aDesc( ResId( RID_SVXSTR_DESC_LINESTYLE, rMgr ) );
 643         String aName( pDashList->GetDash( nPos )->GetName() );
 644         String aOldName = aName;
 645
 646         SvxAbstractDialogFactory* pFact = SvxAbstractDialogFactory::Create();
 647         DBG_ASSERT(pFact, "Dialogdiet fail!");
 648         AbstractSvxNameDialog* pDlg = pFact->CreateSvxNameDialog( GetParentDialog(), aName, aDesc );
 649         DBG_ASSERT(pDlg, "Dialogdiet fail!");
 650
 651         long nCount = pDashList->Count();
 652         sal_Bool bDifferent = sal_False;
 653         sal_Bool bLoop = sal_True;
 654
 655         while ( bLoop && pDlg->Execute() == RET_OK )
 656         {
 657             pDlg->GetName( aName );
 658             bDifferent = sal_True;
 659
 660             for( long i = 0; i < nCount && bDifferent; i++ )
 661             {
 662                 if( aName == pDashList->GetDash( i )->GetName() &&
 663                     aName != aOldName )
 664                     bDifferent = sal_False;
 665             }
 666
 667             if ( bDifferent )
 668             {
 669                 bLoop = sal_False;
 670                 FillDash_Impl();
 671
 672                 XDashEntry* pEntry = new XDashEntry( aDash, aName );
 673
 674                 delete pDashList->Replace( pEntry, nPos );
 675                 const Bitmap aBitmap = pDashList->GetUiBitmap( nPos );
 676                 aLbLineStyles.Modify( pEntry, nPos, &aBitmap );
 677
 678                 aLbLineStyles.SelectEntryPos( nPos );
 679
 680                 *pnDashListState |= CT_MODIFIED;
 681
 682                 *pPageType = 2;
 683
 684                 // save values for changes recognition (-> method)
 685                 aNumFldNumber1.SaveValue();
 686                 aMtrLength1.SaveValue();
 687                 aLbType1.SaveValue();
 688                 aNumFldNumber2.SaveValue();
 689                 aMtrLength2.SaveValue();
 690                 aLbType2.SaveValue();
 691                 aMtrDistance.SaveValue();
 692             }
 693             else
 694             {
 695                 WarningBox aBox( GetParentDialog(), WinBits( WB_OK ), String( ResId( RID_SVXSTR_WARN_NAME_DUPLICATE, rMgr ) ) );
 696                 aBox.SetHelpId( HID_WARN_NAME_DUPLICATE );
 697                 aBox.Execute();
 698             }
 699         }
 700         delete( pDlg );
 701     }
 702     return( 0L );
 703 }
 704
 705 //------------------------------------------------------------------------
 706
 707 IMPL_LINK_NOARG(SvxLineDefTabPage, ClickDeleteHdl_Impl)
 708 {
 709     sal_uInt16 nPos = aLbLineStyles.GetSelectEntryPos();
 710
 711     if ( nPos != LISTBOX_ENTRY_NOTFOUND )
 712     {
 713         QueryBox aQueryBox( GetParentDialog(), WinBits( WB_YES_NO | WB_DEF_NO ),
 714             String( CUI_RES( RID_SVXSTR_ASK_DEL_LINESTYLE ) ) );
 715
 716         if ( aQueryBox.Execute() == RET_YES )
 717         {
 718             delete pDashList->Remove( nPos );
 719             aLbLineStyles.RemoveEntry( nPos );
 720             aLbLineStyles.SelectEntryPos( 0 );
 721
 722             SelectLinestyleHdl_Impl( this );
 723             *pPageType = 0; // style should not be taken
 724
 725             *pnDashListState |= CT_MODIFIED;
 726
 727             ChangePreviewHdl_Impl( this );
 728         }
 729     }
 730
 731     // determine button state
 732     if ( !pDashList->Count() )
 733     {
 734         aBtnModify.Disable();
 735         aBtnDelete.Disable();
 736         aBtnSave.Disable();
 737     }
 738     return( 0L );
 739 }
 740
 741 // -----------------------------------------------------------------------
 742
 743 IMPL_LINK_NOARG(SvxLineDefTabPage, ClickLoadHdl_Impl)
 744 {
 745     ResMgr& rMgr = CUI_MGR();
 746     sal_uInt16 nReturn = RET_YES;
 747
 748     if ( *pnDashListState & CT_MODIFIED )
 749     {
 750         nReturn = WarningBox( GetParentDialog(), WinBits( WB_YES_NO_CANCEL ),
 751             String( ResId( RID_SVXSTR_WARN_TABLE_OVERWRITE, rMgr ) ) ).Execute();
 752
 753         if ( nReturn == RET_YES )
 754             pDashList->Save();
 755     }
 756
 757     if ( nReturn != RET_CANCEL )
 758     {
 759         ::sfx2::FileDialogHelper aDlg(
 760             com::sun::star::ui::dialogs::TemplateDescription::FILEOPEN_SIMPLE,
 761             0 );
 762         String aStrFilterType( "*.sod" );
 763         aDlg.AddFilter( aStrFilterType, aStrFilterType );
 764         INetURLObject aFile( SvtPathOptions().GetPalettePath() );
 765         aDlg.SetDisplayDirectory( aFile.GetMainURL( INetURLObject::NO_DECODE ) );
 766
 767         if( aDlg.Execute() == ERRCODE_NONE )
 768         {
 769             INetURLObject aURL( aDlg.GetPath() );
 770             INetURLObject aPathURL( aURL );
 771
 772             aPathURL.removeSegment();
 773             aPathURL.removeFinalSlash();
 774
 775             XDashListRef pDshLst = XPropertyList::CreatePropertyList(
 776                 XDASH_LIST, aPathURL.GetMainURL( INetURLObject::NO_DECODE ), pXPool )->AsDashList();
 777             pDshLst->SetName( aURL.getName() );
 778
 779             if( pDshLst->Load() )
 780             {
 781                 pDashList = pDshLst;
 782                 ( (SvxLineTabDialog*) GetParentDialog() )->SetNewDashList( pDashList );
 783
 784                 aLbLineStyles.Clear();
 785                 aLbLineStyles.Fill( pDashList );
 786                 Reset( rOutAttrs );
 787
 788                 pDashList->SetName( aURL.getName() );
 789
 790                 *pnDashListState |= CT_CHANGED;
 791                 *pnDashListState &= ~CT_MODIFIED;
 792             }
 793             else
 794                 //aIStream.Close();
 795                 ErrorBox( GetParentDialog(), WinBits( WB_OK ),
 796                     String( ResId( RID_SVXSTR_READ_DATA_ERROR, rMgr ) ) ).Execute();
 797         }
 798     }
 799
 800     // determine button state
 801     if ( pDashList->Count() )
 802     {
 803         aBtnModify.Enable();
 804         aBtnDelete.Enable();
 805         aBtnSave.Enable();
 806     }
 807     else
 808     {
 809         aBtnModify.Disable();
 810         aBtnDelete.Disable();
 811         aBtnSave.Disable();
 812     }
 813     return( 0L );
 814 }
 815
 816 // -----------------------------------------------------------------------
 817
 818 IMPL_LINK_NOARG(SvxLineDefTabPage, ClickSaveHdl_Impl)
 819 {
 820     ::sfx2::FileDialogHelper aDlg(
 821         com::sun::star::ui::dialogs::TemplateDescription::FILESAVE_SIMPLE, 0 );
 822     String aStrFilterType( "*.sod" );
 823     aDlg.AddFilter( aStrFilterType, aStrFilterType );
 824
 825     INetURLObject aFile( SvtPathOptions().GetPalettePath() );
 826     DBG_ASSERT( aFile.GetProtocol() != INET_PROT_NOT_VALID, "invalid URL" );
 827
 828     if( pDashList->GetName().Len() )
 829     {
 830         aFile.Append( pDashList->GetName() );
 831
 832         if( aFile.getExtension().isEmpty() )
 833             aFile.SetExtension( OUString("sod") );
 834     }
 835
 836     aDlg.SetDisplayDirectory( aFile.GetMainURL( INetURLObject::NO_DECODE ) );
 837     if ( aDlg.Execute() == ERRCODE_NONE )
 838     {
 839         INetURLObject aURL( aDlg.GetPath() );
 840         INetURLObject aPathURL( aURL );
 841
 842         aPathURL.removeSegment();
 843         aPathURL.removeFinalSlash();
 844
 845         pDashList->SetName( aURL.getName() );
 846         pDashList->SetPath( aPathURL.GetMainURL( INetURLObject::NO_DECODE ) );
 847
 848         if( pDashList->Save() )
 849         {
 850             *pnDashListState |= CT_SAVED;
 851             *pnDashListState &= ~CT_MODIFIED;
 852         }
 853         else
 854         {
 855             ErrorBox( GetParentDialog(), WinBits( WB_OK ),
 856                 String( CUI_RES( RID_SVXSTR_WRITE_DATA_ERROR ) ) ).Execute();
 857         }
 858     }
 859
 860     return( 0L );
 861 }
 862
 863 //------------------------------------------------------------------------
 864
 865 void SvxLineDefTabPage::FillDash_Impl()
 866 {
 867     XDashStyle eXDS;
 868
 869     if( aCbxSynchronize.IsChecked() )
 870         eXDS = XDASH_RECTRELATIVE;
 871     else
 872         eXDS = XDASH_RECT;
 873
 874     aDash.SetDashStyle( eXDS );
 875     aDash.SetDots( (sal_uInt8) aNumFldNumber1.GetValue() );
 876     aDash.SetDotLen( aLbType1.GetSelectEntryPos() == 0 ? 0 :
 877                                 GetCoreValue( aMtrLength1, ePoolUnit ) );
 878     aDash.SetDashes( (sal_uInt8) aNumFldNumber2.GetValue() );
 879     aDash.SetDashLen( aLbType2.GetSelectEntryPos() == 0 ? 0 :
 880                                 GetCoreValue( aMtrLength2, ePoolUnit ) );
 881     aDash.SetDistance( GetCoreValue( aMtrDistance, ePoolUnit ) );
 882
 883     rXLSet.Put( XLineDashItem( String(), aDash ) );
 884
 885     // #i34740#
 886     aCtlPreview.SetLineAttributes(aXLineAttr.GetItemSet());
 887 }
 888
 889 //------------------------------------------------------------------------
 890
 891 void SvxLineDefTabPage::FillDialog_Impl()
 892 {
 893     XDashStyle eXDS = aDash.GetDashStyle(); // XDASH_RECT, XDASH_ROUND
 894     if( eXDS == XDASH_RECTRELATIVE )
 895         aCbxSynchronize.Check();
 896     else
 897         aCbxSynchronize.Check( sal_False );
 898
 899     aNumFldNumber1.SetValue( aDash.GetDots() );
 900     SetMetricValue( aMtrLength1, aDash.GetDotLen(), ePoolUnit );
 901     aLbType1.SelectEntryPos( aDash.GetDotLen() == 0 ? 0 : 1 );
 902     aNumFldNumber2.SetValue( aDash.GetDashes() );
 903     SetMetricValue( aMtrLength2, aDash.GetDashLen(), ePoolUnit );
 904     aLbType2.SelectEntryPos( aDash.GetDashLen() == 0 ? 0 : 1 );
 905     SetMetricValue( aMtrDistance, aDash.GetDistance(), ePoolUnit );
 906
 907     ChangeMetricHdl_Impl( NULL );
 908
 909     // save values for changes recognition (-> method)
 910     aNumFldNumber1.SaveValue();
 911     aMtrLength1.SaveValue();
 912     aLbType1.SaveValue();
 913     aNumFldNumber2.SaveValue();
 914     aMtrLength2.SaveValue();
 915     aLbType2.SaveValue();
 916     aMtrDistance.SaveValue();
 917 }
 918
 919
 920 void SvxLineDefTabPage::DataChanged( const DataChangedEvent& rDCEvt )
 921 {
 922     SfxTabPage::DataChanged( rDCEvt );
 923
 924     if ( (rDCEvt.GetType() == DATACHANGED_SETTINGS) && (rDCEvt.GetFlags() & SETTINGS_STYLE) )
 925     {
 926         sal_uInt16 nOldSelect = aLbLineStyles.GetSelectEntryPos();
 927         aLbLineStyles.Clear();
 928         aLbLineStyles.Fill( pDashList );
 929         aLbLineStyles.SelectEntryPos( nOldSelect );
 930     }
 931 }
 932
 933 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */