sw/source/ui/app/appenv.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: appenv.cxx,v $
  10  * $Revision: 1.33 $
  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_sw.hxx"
  33
  34
  35 #if STLPORT_VERSION>=321
  36 #include <cstdarg>
  37 #endif
  38
  39
  40 #include <hintids.hxx>
  41
  42 #include <sfx2/request.hxx>
  43 #include <svx/svxids.hrc>
  44
  45 #include <svtools/svmedit.hxx>
  46 #ifndef _APP_HXX //autogen
  47 #include <vcl/svapp.hxx>
  48 #endif
  49 #ifndef _WRKWIN_HXX //autogen
  50 #include <vcl/wrkwin.hxx>
  51 #endif
  52 #include <sfx2/app.hxx>
  53 #include <sfx2/docfac.hxx>
  54 #include <sfx2/printer.hxx>
  55 #ifndef _MSGBOX_HXX //autogen
  56 #include <vcl/msgbox.hxx>
  57 #endif
  58 #include <sfx2/dispatch.hxx>
  59 #include <svx/boxitem.hxx>
  60 #include <svx/lrspitem.hxx>
  61 #include <svx/ulspitem.hxx>
  62 #include <svx/pbinitem.hxx>
  63 #include <svx/paperinf.hxx>
  64 #include <svx/brkitem.hxx>
  65 #include <fmthdft.hxx>
  66 #include <swwait.hxx>
  67 #include <paratr.hxx>
  68 #include <swmodule.hxx>
  69 #include <wrtsh.hxx>
  70 #ifndef _VIEW_HXX
  71 #include <view.hxx>
  72 #endif
  73 #ifndef _DOCSH_HXX
  74 #include <docsh.hxx>
  75 #endif
  76 #include <frmatr.hxx>
  77 #include <fldbas.hxx>
  78 #include <swundo.hxx>
  79 #ifndef IDOCUMENTDEVICEACCESS_HXX_INCLUDED
  80 #include <IDocumentDeviceAccess.hxx>
  81 #endif
  82 #ifndef _DBMGR_HXX
  83 #include <dbmgr.hxx>
  84 #endif
  85 #include <fmtcol.hxx>
  86 #include <frmmgr.hxx>
  87 #include <fldmgr.hxx>
  88 #include <pagedesc.hxx>
  89 #include <poolfmt.hxx>
  90 #include <expfld.hxx>
  91 #include <SwStyleNameMapper.hxx>
  92 #include <crsskip.hxx>
  93
  94 #ifndef _CMDID_H
  95 #include <cmdid.h>
  96 #endif
  97 #ifndef _GLOBALS_HRC
  98 #include <globals.hrc>
  99 #endif
 100 #ifndef _APP_HRC
 101 #include <app.hrc>
 102 #endif
 103 #ifndef _POOLFMT_HRC
 104 #include <poolfmt.hrc>
 105 #endif
 106 #include "swabstdlg.hxx"
 107 #include "envelp.hrc"
 108 #include "envimg.hxx"
 109
 110 #define ENV_NEWDOC              RET_OK
 111 #define ENV_INSERT              RET_USER
 112 #define ENV_CANCEL              SHRT_MAX
 113
 114
 115 // --------------------------------------------------------------------------
 116
 117
 118 // Funktion wird fuer Etiketten und Briefumschlaege benutzt!
 119 //      im applab.cxx und appenv.cxx
 120 String InsertLabEnvText( SwWrtShell& rSh, SwFldMgr& rFldMgr, const String& rText )
 121 {
 122     String sRet;
 123     String aText(rText);
 124     aText.EraseAllChars( '\r' );
 125
 126
 127     USHORT nTokenPos = 0;
 128     while( STRING_NOTFOUND != nTokenPos )
 129     {
 130         String aLine = aText.GetToken( 0, '\n', nTokenPos );
 131         while ( aLine.Len() )
 132         {
 133             String sTmpText;
 134             BOOL bField = FALSE;
 135
 136             USHORT nPos = aLine.Search( '<' );
 137             if ( nPos )
 138             {
 139                 sTmpText = aLine.Copy( 0, nPos );
 140                 aLine.Erase( 0, nPos );
 141 //                              sTmpText = aLine.Cut( 0, nPos );
 142             }
 143             else
 144             {
 145                 nPos = aLine.Search( '>' );
 146                 if ( nPos == STRING_NOTFOUND )
 147                 {
 148                     sTmpText = aLine;
 149                     aLine.Erase();
 150 //                                      sTmpText = aLine.Cut();
 151                 }
 152                 else
 153                 {
 154                     sTmpText = aLine.Copy( 0, nPos + 1);
 155                     aLine.Erase( 0, nPos + 1);
 156 //                                      sTmpText = aLine.Cut( 0, nPos + 1 );
 157
 158                     // Datenbankfelder muesen mind. 3 Punkte beinhalten!
 159                     String sDBName( sTmpText.Copy( 1, sTmpText.Len() - 2));
 160                     USHORT nCnt = sDBName.GetTokenCount('.');
 161                     if (nCnt >= 3)
 162                     {
 163                         ::ReplacePoint(sDBName, TRUE);
 164                         SwInsertFld_Data aData(TYP_DBFLD, 0, sDBName, aEmptyStr, 0, &rSh );
 165                         rFldMgr.InsertFld( aData );
 166                         sRet = sDBName;
 167                         bField = TRUE;
 168                     }
 169                 }
 170             }
 171             if ( !bField )
 172                 rSh.Insert( sTmpText );
 173         }
 174         rSh.InsertLineBreak();
 175     }
 176     rSh.DelLeft();      // Letzten Linebreak wieder l???schen
 177
 178     return sRet;
 179 }
 180
 181 // ----------------------------------------------------------------------------
 182
 183
 184 void lcl_CopyCollAttr(SwWrtShell* pOldSh, SwWrtShell* pNewSh, USHORT nCollId)
 185 {
 186     USHORT nCollCnt = pOldSh->GetTxtFmtCollCount();
 187     SwTxtFmtColl* pColl;
 188     for( USHORT nCnt = 0; nCnt < nCollCnt; ++nCnt )
 189         if(nCollId == (pColl = &pOldSh->GetTxtFmtColl(nCnt))->GetPoolFmtId())
 190             pNewSh->GetTxtCollFromPool(nCollId)->SetFmtAttr(pColl->GetAttrSet());
 191 }
 192
 193 // ----------------------------------------------------------------------------
 194
 195
 196 void SwModule::InsertEnv( SfxRequest& rReq )
 197 {
 198 static USHORT nTitleNo = 0;
 199
 200     SwDocShell          *pMyDocSh;
 201     SfxViewFrame        *pFrame;
 202     SwView          *pNewView;
 203     SwWrtShell          *pOldSh,
 204                     *pSh;
 205
 206     //aktuelle Shell besorgen
 207     pMyDocSh = (SwDocShell*) SfxObjectShell::Current();
 208     pOldSh       = pMyDocSh ? pMyDocSh->GetWrtShell() : 0;
 209
 210     // Neues Dokument erzeugen (kein Show!)
 211     SfxObjectShellRef xDocSh( new SwDocShell( SFX_CREATE_MODE_STANDARD ) );
 212     xDocSh->DoInitNew( 0 );
 213     pFrame = SfxViewFrame::CreateViewFrame( *xDocSh, 0, TRUE );
 214     pNewView = (SwView*) pFrame->GetViewShell();
 215     pNewView->AttrChangedNotify( &pNewView->GetWrtShell() );//Damit SelectShell gerufen wird.
 216     pSh = pNewView->GetWrtShellPtr();
 217
 218     String aTmp( SW_RES(STR_ENV_TITLE) );
 219     aTmp += String::CreateFromInt32( ++nTitleNo );
 220     xDocSh->SetTitle( aTmp );
 221
 222     // Ggf. alte Collections "Absender" und "Empfaenger" in neues
 223     // Dokument kopieren
 224     if ( pOldSh )
 225     {
 226         ::lcl_CopyCollAttr(pOldSh, pSh, RES_POOLCOLL_JAKETADRESS);
 227         ::lcl_CopyCollAttr(pOldSh, pSh, RES_POOLCOLL_SENDADRESS);
 228     }
 229
 230     // SwEnvItem aus Config lesen
 231     SwEnvCfgItem aEnvCfg;
 232
 233     //Haben wir schon einen Briefumschlag.
 234     BOOL bEnvChange = FALSE;
 235
 236     SfxItemSet aSet(GetPool(), FN_ENVELOP, FN_ENVELOP, 0);
 237     aSet.Put(aEnvCfg.GetItem());
 238
 239     SfxPrinter* pTempPrinter = pSh->getIDocumentDeviceAccess()->getPrinter( true );
 240     if(pOldSh )
 241     {
 242         const SwPageDesc& rCurPageDesc = pOldSh->GetPageDesc(pOldSh->GetCurPageDesc());
 243         String sJacket;
 244         SwStyleNameMapper::FillUIName( RES_POOLPAGE_JAKET, sJacket );
 245         bEnvChange = rCurPageDesc.GetName() == sJacket;
 246
 247         IDocumentDeviceAccess* pIDDA_old = pOldSh->getIDocumentDeviceAccess();
 248         if( pIDDA_old->getPrinter( false ) )
 249         {
 250             IDocumentDeviceAccess* pIDDA = pSh->getIDocumentDeviceAccess();
 251             pIDDA->setJobsetup( *pIDDA_old->getJobsetup() );
 252             //#69563# if it isn't the same printer then the pointer has been invalidated!
 253             pTempPrinter = pIDDA->getPrinter( true );
 254         }
 255         pTempPrinter->SetPaperBin(rCurPageDesc.GetMaster().GetPaperBin().GetValue());
 256
 257     }
 258
 259     Window *pParent = pOldSh ? pOldSh->GetWin() : 0;
 260     SfxAbstractTabDialog * pDlg=NULL;
 261     short nMode = ENV_INSERT;
 262
 263     SFX_REQUEST_ARG( rReq, pItem, SwEnvItem, FN_ENVELOP, sal_False );
 264     if ( !pItem )
 265     {
 266         SwAbstractDialogFactory* pFact = SwAbstractDialogFactory::Create();
 267         DBG_ASSERT(pFact, "SwAbstractDialogFactory fail!");
 268
 269         pDlg = pFact->CreateSwEnvDlg( pParent, aSet, pOldSh, pTempPrinter, !bEnvChange, DLG_ENV );
 270         DBG_ASSERT(pDlg, "Dialogdiet fail!");
 271         nMode = pDlg->Execute();
 272     }
 273     else
 274     {
 275         SFX_REQUEST_ARG( rReq, pBoolItem, SfxBoolItem, FN_PARAM_1, sal_False );
 276         if ( pBoolItem && pBoolItem->GetValue() )
 277             nMode = ENV_NEWDOC;
 278     }
 279
 280     if (nMode == ENV_NEWDOC || nMode == ENV_INSERT)
 281     {
 282         SwWait aWait( (SwDocShell&)*xDocSh, TRUE );
 283
 284         // Dialog auslesen, Item in Config speichern
 285         const SwEnvItem& rItem = pItem ? *pItem : (const SwEnvItem&) pDlg->GetOutputItemSet()->Get(FN_ENVELOP);
 286         aEnvCfg.GetItem() = rItem;
 287         aEnvCfg.Commit();
 288
 289         //Wenn wir Drucken uebernehmen wir den eingestellten Jobsetup aus
 290         //dem Dialog. Die Informationen muessen hier vor dem evtl. zerstoeren
 291         //der neuen Shell gesetzt werden, weil deren Drucker an den Dialog
 292         //gereicht wurde.
 293         if ( nMode != ENV_NEWDOC )
 294         {
 295             ASSERT(pOldSh, "Kein Dokument - war 'Einfuegen' nicht disabled???");
 296             SvxPaperBinItem aItem( RES_PAPER_BIN );
 297             aItem.SetValue((BYTE)pSh->getIDocumentDeviceAccess()->getPrinter(true)->GetPaperBin());
 298             pOldSh->GetPageDescFromPool(RES_POOLPAGE_JAKET)->GetMaster().SetFmtAttr(aItem);
 299         }
 300
 301         SwWrtShell *pTmp = nMode == ENV_INSERT ? pOldSh : pSh;
 302         const SwPageDesc* pFollow = 0;
 303         SwTxtFmtColl *pSend = pTmp->GetTxtCollFromPool( RES_POOLCOLL_SENDADRESS ),
 304                      *pAddr = pTmp->GetTxtCollFromPool( RES_POOLCOLL_JAKETADRESS);
 305         const String &rSendMark = pSend->GetName();
 306         const String &rAddrMark = pAddr->GetName();
 307
 308         if (nMode == ENV_INSERT)
 309         {
 310
 311             SetView(&pOldSh->GetView()); // Pointer auf oberste View restaurieren
 312
 313             //Neues Dok wieder loeschen
 314             xDocSh->DoClose();
 315             pSh = pOldSh;
 316             //#i4251# selected text or objects in the document should
 317             //not be deleted on inserting envelopes
 318             pSh->EnterStdMode();
 319             // Los geht's (Einfuegen)
 320             pSh->StartUndo(UNDO_UI_INSERT_ENVELOPE, NULL);
 321             pSh->StartAllAction();
 322             pSh->SttEndDoc(TRUE);
 323
 324             if (bEnvChange)
 325             {
 326                 // Folgevorlage: Seite 2
 327                 pFollow = pSh->GetPageDesc(pSh->GetCurPageDesc()).GetFollow();
 328
 329                 // Text der ersten Seite loeschen
 330                 if ( !pSh->SttNxtPg(TRUE) )
 331                     pSh->EndPg(TRUE);
 332                 pSh->DelRight();
 333                 // Rahmen der ersten Seite loeschen
 334                 if( pSh->GotoFly( rSendMark ) )
 335                 {
 336                     pSh->EnterSelFrmMode();
 337                     pSh->DelRight();
 338                 }
 339                 if ( pSh->GotoFly( rAddrMark ) )
 340                 {
 341                     pSh->EnterSelFrmMode();
 342                     pSh->DelRight();
 343                 }
 344                 pSh->SttEndDoc(TRUE);
 345             }
 346             else
 347                 // Folgevorlage: Seite 1
 348                 pFollow = &pSh->GetPageDesc(pSh->GetCurPageDesc());
 349
 350             // Seitenumbruch einfuegen
 351             if ( pSh->IsCrsrInTbl() )
 352             {
 353                 pSh->SplitNode();
 354                 pSh->Right( CRSR_SKIP_CHARS, FALSE, 1, FALSE );
 355                 SfxItemSet aBreakSet( pSh->GetAttrPool(), RES_BREAK, RES_BREAK, 0 );
 356                 aBreakSet.Put( SvxFmtBreakItem(SVX_BREAK_PAGE_BEFORE, RES_BREAK) );
 357                 pSh->SetTblAttr( aBreakSet );
 358             }
 359             else
 360                 pSh->InsertPageBreak(0, FALSE);
 361             pSh->SttEndDoc(TRUE);
 362         }
 363         else
 364         {
 365             pFollow = &pSh->GetPageDesc(pSh->GetCurPageDesc());
 366             // Los geht's (Drucken)
 367             pSh->StartAllAction();
 368             pSh->DoUndo(FALSE);
 369
 370             // Neue Collections "Absender" und "Empfaenger" wieder in neues
 371             // Dokument kopieren
 372             if ( pOldSh )
 373             {
 374                 ::lcl_CopyCollAttr(pOldSh, pSh, RES_POOLCOLL_JAKETADRESS);
 375                 ::lcl_CopyCollAttr(pOldSh, pSh, RES_POOLCOLL_SENDADRESS);
 376             }
 377         }
 378
 379         SET_CURR_SHELL(pSh);
 380         pSh->SetNewDoc();               // Performanceprobleme vermeiden
 381
 382         // Flys dieser Seite merken
 383         SvPtrarr aFlyArr(0, 5);
 384         if( ENV_NEWDOC != nMode && !bEnvChange )
 385             pSh->GetPageObjs( aFlyArr );
 386
 387         // Page-Desc ermitteln
 388         SwPageDesc* pDesc = pSh->GetPageDescFromPool(RES_POOLPAGE_JAKET);
 389         SwFrmFmt&   rFmt  = pDesc->GetMaster();
 390
 391         Printer *pPrt = pSh->getIDocumentDeviceAccess()->getPrinter( true );
 392
 393         // Raender (setzen sich zusammen aus Shift-Offset und
 394         // Ausrichtung)
 395         Size aPaperSize = pPrt->PixelToLogic( pPrt->GetPaperSizePixel(),
 396                                               MAP_TWIP);
 397         if ( !aPaperSize.Width() && !aPaperSize.Height() )
 398                     aPaperSize = SvxPaperInfo::GetPaperSize(PAPER_A4);
 399         if ( aPaperSize.Width() > aPaperSize.Height() )
 400             Swap( aPaperSize );
 401
 402         long lLeft  = rItem.lShiftRight,
 403              lUpper = rItem.lShiftDown;
 404
 405         USHORT nPageW = (USHORT) Max(rItem.lWidth, rItem.lHeight),
 406                nPageH = (USHORT) Min(rItem.lWidth, rItem.lHeight);
 407
 408         switch (rItem.eAlign)
 409         {
 410             case ENV_HOR_LEFT: break;
 411             case ENV_HOR_CNTR: lLeft  += Max(0L, long(aPaperSize.Width() - nPageW)) / 2;
 412                                break;
 413             case ENV_HOR_RGHT: lLeft  += Max(0L, long(aPaperSize.Width() - nPageW));
 414                                break;
 415             case ENV_VER_LEFT: lUpper += Max(0L, long(aPaperSize.Width() - nPageH));
 416                                break;
 417             case ENV_VER_CNTR: lUpper += Max(0L, long(aPaperSize.Width() - nPageH)) / 2;
 418                                break;
 419             case ENV_VER_RGHT: break;
 420         }
 421         SvxLRSpaceItem aLRMargin( RES_LR_SPACE );
 422         SvxULSpaceItem aULMargin( RES_UL_SPACE );
 423         aLRMargin.SetLeft ((USHORT) lLeft );
 424         aULMargin.SetUpper((USHORT) lUpper);
 425         aLRMargin.SetRight(0);
 426         aULMargin.SetLower(0);
 427         rFmt.SetFmtAttr(aLRMargin);
 428         rFmt.SetFmtAttr(aULMargin);
 429
 430         // Kopf-, Fusszeilen
 431         rFmt.SetFmtAttr(SwFmtHeader(BOOL(FALSE)));
 432         pDesc->ChgHeaderShare(FALSE);
 433         rFmt.SetFmtAttr(SwFmtFooter(BOOL(FALSE)));
 434         pDesc->ChgFooterShare(FALSE);
 435
 436         // Seitennumerierung
 437         pDesc->SetUseOn(nsUseOnPage::PD_ALL);
 438
 439         // Einstellen der Seitengroesse
 440         rFmt.SetFmtAttr(SwFmtFrmSize(ATT_FIX_SIZE,
 441                                             nPageW + lLeft, nPageH + lUpper));
 442
 443         // Einstellen der Numerierungsart der Seite
 444         SvxNumberType aType;
 445         aType.SetNumberingType(SVX_NUM_NUMBER_NONE);
 446         pDesc->SetNumType(aType);
 447
 448         // Folgevorlage
 449         if (pFollow)
 450             pDesc->SetFollow(pFollow);
 451
 452         // Landscape
 453         pDesc->SetLandscape( rItem.eAlign >= ENV_VER_LEFT &&
 454                              rItem.eAlign <= ENV_VER_RGHT);
 455
 456         // Page-Desc anwenden
 457
 458         USHORT nPos;
 459         pSh->FindPageDescByName( pDesc->GetName(),
 460                                     FALSE,
 461                                     &nPos );
 462
 463
 464         pSh->ChgPageDesc( nPos, *pDesc);
 465         pSh->ChgCurPageDesc(*pDesc);
 466
 467         // Rahmen einfuegen
 468         SwFlyFrmAttrMgr aMgr(FALSE, pSh, FRMMGR_TYPE_ENVELP);
 469         SwFldMgr aFldMgr;
 470         aMgr.SetHeightSizeType(ATT_VAR_SIZE);
 471
 472         //Defaults ueberschreiben!
 473         aMgr.GetAttrSet().Put( SvxBoxItem(RES_BOX) );
 474         aMgr.SetULSpace( 0L, 0L );
 475         aMgr.SetLRSpace( 0L, 0L );
 476
 477         // Absender
 478         if (rItem.bSend)
 479         {
 480             pSh->SttEndDoc(TRUE);
 481             aMgr.InsertFlyFrm(FLY_PAGE,
 482                 Point(rItem.lSendFromLeft + lLeft, rItem.lSendFromTop  + lUpper),
 483                 Size (rItem.lAddrFromLeft - rItem.lSendFromLeft, 0));
 484
 485             pSh->EnterSelFrmMode();
 486             pSh->SetFlyName( rSendMark );
 487             pSh->UnSelectFrm();
 488             pSh->LeaveSelFrmMode();
 489             pSh->SetTxtFmtColl( pSend );
 490             InsertLabEnvText( *pSh, aFldMgr, rItem.aSendText );
 491             aMgr.UpdateAttrMgr();
 492         }
 493
 494         // Empfaenger
 495         pSh->SttEndDoc(TRUE);
 496
 497         aMgr.InsertFlyFrm(FLY_PAGE,
 498             Point(rItem.lAddrFromLeft + lLeft, rItem.lAddrFromTop  + lUpper),
 499             Size (nPageW - rItem.lAddrFromLeft - 566, 0));
 500         pSh->EnterSelFrmMode();
 501         pSh->SetFlyName( rAddrMark );
 502         pSh->UnSelectFrm();
 503         pSh->LeaveSelFrmMode();
 504         pSh->SetTxtFmtColl( pAddr );
 505         InsertLabEnvText(*pSh, aFldMgr, rItem.aAddrText);
 506
 507         // Flys auf die "alten" Seiten verschieben
 508         if (aFlyArr.Count())
 509             pSh->SetPageObjsNewPage(aFlyArr, 1);
 510
 511         // Fertig
 512         pSh->SttEndDoc(TRUE);
 513
 514         pSh->EndAllAction();
 515
 516         if (nMode == ENV_NEWDOC)
 517             pSh->DoUndo(TRUE);
 518         else
 519             pSh->EndUndo(UNDO_UI_INSERT_ENVELOPE);
 520
 521         if (nMode == ENV_NEWDOC)
 522         {
 523             pFrame->GetFrame()->Appear();
 524
 525             if ( rItem.aAddrText.indexOf('<') >= 0 )
 526             {
 527                 static USHORT __READONLY_DATA aInva[] =
 528                                     {
 529                                         SID_SBA_BRW_UPDATE,
 530                                         SID_SBA_BRW_INSERT,
 531                                         SID_SBA_BRW_MERGE,
 532                                         0
 533                                     };
 534                 pFrame->GetBindings().Invalidate( aInva );
 535
 536                 // Datenbankbeamer oeffnen
 537                 ShowDBObj(*pNewView, pSh->GetDBData());
 538             }
 539         }
 540
 541         if ( !pItem )
 542         {
 543             rReq.AppendItem( rItem );
 544             if ( nMode == ENV_NEWDOC )
 545                 rReq.AppendItem( SfxBoolItem( FN_PARAM_1, TRUE ) );
 546         }
 547
 548         rReq.Done();
 549     }
 550     else        //Abbruch
 551     {
 552         rReq.Ignore();
 553
 554         xDocSh->DoClose();
 555         --nTitleNo;
 556
 557         // Pointer auf oberste View restaurieren
 558         if (pOldSh)
 559             SetView(&pOldSh->GetView());
 560     }
 561     delete pDlg;
 562 }
 563
 564