svx/source/cui/optdict.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: optdict.cxx,v $
  10  * $Revision: 1.12 $
  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_svx.hxx"
  33
  34 #ifdef SVX_DLLIMPLEMENTATION
  35 #undef SVX_DLLIMPLEMENTATION
  36 #endif
  37
  38 // include ---------------------------------------------------------------
  39 #include <tools/shl.hxx>
  40
  41
  42 #include <unolingu.hxx>
  43 #include <dlgutil.hxx>
  44 #include <sfx2/sfxuno.hxx>
  45 #include <svtools/eitem.hxx>
  46 #include <com/sun/star/frame/XStorable.hpp>
  47 #ifndef _UNOTOOLS_PROCESSFACTORY_HXX
  48 #include <comphelper/processfactory.hxx>
  49 #endif
  50 #include <unotools/intlwrapper.hxx>
  51 #include <vcl/svapp.hxx>
  52 #include <vcl/msgbox.hxx>
  53
  54 #define _SVX_OPTDICT_CXX
  55
  56 #ifndef _LINGUISTIC_MISC_HHX_
  57 #include <linguistic/misc.hxx>
  58 #endif
  59 #include <svx/dialogs.hrc>
  60 #include "optdict.hrc"
  61
  62
  63
  64 #include "optdict.hxx"
  65 #include <svx/dialmgr.hxx>
  66 #include "svxerr.hxx"
  67
  68 using namespace ::com::sun::star;
  69 using namespace ::com::sun::star::uno;
  70 using namespace ::com::sun::star::linguistic2;
  71
  72 // static ----------------------------------------------------------------
  73
  74 static const sal_uInt16 nNameLen    = 8;
  75 static const short  NOACTDICT   = -1;
  76
  77 static long nStaticTabs[]=
  78 {
  79     2,10,71,120
  80 };
  81
  82 // static function -------------------------------------------------------
  83
  84 static String getNormDicEntry_Impl( const String &rText )
  85 {
  86     String aTmp( rText );
  87     aTmp.EraseTrailingChars( '.' );
  88     aTmp.EraseAllChars( '=' );
  89     return aTmp;
  90 }
  91
  92
  93 // Compare Dictionary Entry  result
  94 enum CDE_RESULT { CDE_EQUAL, CDE_SIMILAR, CDE_DIFFERENT };
  95
  96 static CDE_RESULT cmpDicEntry_Impl( const String &rText1, const String &rText2 )
  97 {
  98     CDE_RESULT eRes = CDE_DIFFERENT;
  99
 100     if (rText1 == rText2)
 101         eRes = CDE_EQUAL;
 102     else
 103     {   // similar = equal up to trailing '.' and hyphenation positions
 104         // marked with '='
 105         if (getNormDicEntry_Impl( rText1 ) == getNormDicEntry_Impl( rText2 ))
 106             eRes = CDE_SIMILAR;
 107     }
 108
 109     return eRes;
 110 }
 111
 112 // class SvxNewDictionaryDialog -------------------------------------------
 113
 114 SvxNewDictionaryDialog::SvxNewDictionaryDialog( Window* pParent,
 115         Reference< XSpellChecker1 >  &xSpl ) :
 116
 117     ModalDialog( pParent, SVX_RES( RID_SFXDLG_NEWDICT ) ),
 118
 119     aNameText           ( this, SVX_RES( FT_DICTNAME ) ),
 120     aNameEdit           ( this, SVX_RES( ED_DICTNAME ) ),
 121     aLanguageText       ( this, SVX_RES( FT_DICTLANG ) ),
 122     aLanguageLB         ( this, SVX_RES( LB_DICTLANG ) ),
 123     aExceptBtn          ( this, SVX_RES( BTN_EXCEPT ) ),
 124     aNewDictBox         ( this, SVX_RES( GB_NEWDICT ) ),
 125     aOKBtn                      ( this, SVX_RES( BTN_NEWDICT_OK ) ),
 126     aCancelBtn          ( this, SVX_RES( BTN_NEWDICT_ESC ) ),
 127     aHelpBtn            ( this, SVX_RES( BTN_NEWDICT_HLP ) ),
 128     xSpell( xSpl )
 129 {
 130     // Handler installieren
 131     aNameEdit.SetModifyHdl(
 132         LINK( this, SvxNewDictionaryDialog, ModifyHdl_Impl ) );
 133     aOKBtn.SetClickHdl( LINK( this, SvxNewDictionaryDialog, OKHdl_Impl ) );
 134
 135     // Sprachen anzeigen
 136     aLanguageLB.SetLanguageList( LANG_LIST_ALL, TRUE, TRUE );
 137     aLanguageLB.SelectEntryPos(0);
 138
 139     FreeResource();
 140 }
 141
 142 // -----------------------------------------------------------------------
 143
 144 IMPL_LINK( SvxNewDictionaryDialog, OKHdl_Impl, Button *, EMPTYARG )
 145 {
 146     String sDict = aNameEdit.GetText();
 147     sDict.EraseTrailingChars();
 148     // add extension for personal dictionaries
 149     sDict.AppendAscii(".dic");
 150
 151     Reference< XDictionaryList >  xDicList( SvxGetDictionaryList() );
 152
 153     Sequence< Reference< XDictionary >  > aDics;
 154     if (xDicList.is())
 155         aDics = xDicList->getDictionaries();
 156     const Reference< XDictionary >  *pDic = aDics.getConstArray();
 157     sal_Int32 nCount = (sal_uInt16) aDics.getLength();
 158
 159     sal_Bool bFound = sal_False;
 160     sal_uInt16 i;
 161     for (i = 0; !bFound && i < nCount; ++i )
 162         if ( sDict.EqualsIgnoreCaseAscii( String(pDic[i]->getName()) ))
 163             bFound = sal_True;
 164
 165     if ( bFound )
 166     {
 167         // Doppelte Namen?
 168         InfoBox( this, SVX_RESSTR( RID_SVXSTR_OPT_DOUBLE_DICTS ) ).Execute();
 169         aNameEdit.GrabFocus();
 170         return 0;
 171     }
 172
 173     // Erzeugen und hinzufuegen
 174     sal_uInt16 nLang = aLanguageLB.GetSelectLanguage();
 175     try
 176     {
 177         // create new dictionary
 178         DictionaryType eType = aExceptBtn.IsChecked() ?
 179                 DictionaryType_NEGATIVE : DictionaryType_POSITIVE;
 180         if (xDicList.is())
 181         {
 182             lang::Locale aLocale( SvxCreateLocale(nLang) );
 183             String aURL( linguistic::GetWritableDictionaryURL( sDict ) );
 184             xNewDic = Reference< XDictionary > (
 185                     xDicList->createDictionary( sDict, aLocale, eType, aURL ) , UNO_QUERY );
 186         }
 187         DBG_ASSERT(xNewDic.is(), "NULL pointer");
 188     }
 189     catch(...)
 190     {
 191         xNewDic = NULL;
 192
 193         // Fehler: konnte neues W"orterbuch nicht anlegen
 194         SfxErrorContext aContext( ERRCTX_SVX_LINGU_DICTIONARY, String(),
 195             this, RID_SVXERRCTX, &DIALOG_MGR() );
 196         ErrorHandler::HandleError( *new StringErrorInfo(
 197                 ERRCODE_SVX_LINGU_DICT_NOTWRITEABLE, sDict ) );
 198
 199         EndDialog( RET_CANCEL );
 200     }
 201
 202     if (xDicList.is() && xNewDic.is())
 203     {
 204         xDicList->addDictionary( Reference< XDictionary > ( xNewDic, UNO_QUERY ) );
 205
 206         // refresh list of dictionaries
 207         //! dictionaries may have been added/removed elsewhere too.
 208         aDics = xDicList->getDictionaries();
 209     }
 210     pDic = aDics.getConstArray();
 211     nCount = (sal_uInt16) aDics.getLength();
 212
 213
 214     EndDialog( RET_OK );
 215     return 0;
 216 }
 217
 218 // -----------------------------------------------------------------------
 219
 220 IMPL_LINK_INLINE_START( SvxNewDictionaryDialog, ModifyHdl_Impl, Edit *, EMPTYARG )
 221 {
 222     if ( aNameEdit.GetText().Len() )
 223         aOKBtn.Enable();
 224     else
 225         aOKBtn.Disable();
 226     return 0;
 227 }
 228 IMPL_LINK_INLINE_END( SvxNewDictionaryDialog, ModifyHdl_Impl, Edit *, EMPTYARG )
 229
 230 //==========================================================================
 231 //
 232 // class SvxEditDictionaryDialog -------------------------------------------
 233 //
 234 //==========================================================================
 235
 236 SvxEditDictionaryDialog::SvxEditDictionaryDialog(
 237             Window* pParent,
 238             const String& rName,
 239             Reference< XSpellChecker1 >  &xSpl ) :
 240
 241     ModalDialog( pParent, SVX_RES( RID_SFXDLG_EDITDICT ) ),
 242
 243     aBookFT                     ( this, SVX_RES( FT_BOOK ) ),
 244     aAllDictsLB         ( this, SVX_RES( LB_ALLDICTS ) ),
 245     aLangFT                     ( this, SVX_RES( FT_DICTLANG ) ),
 246     aLangLB                     ( this, SVX_RES( LB_DICTLANG ) ),
 247     aWordFT                     ( this, SVX_RES( FT_WORD ) ),
 248     aWordED                     ( this, SVX_RES( ED_WORD ) ),
 249     aReplaceFT          ( this, SVX_RES( FT_REPLACE ) ),
 250     aReplaceED          ( this, SVX_RES( ED_REPLACE ) ),
 251     aWordsLB            ( this, SVX_RES( TLB_REPLACE ) ),
 252     aNewReplacePB       ( this, SVX_RES( PB_NEW_REPLACE ) ),
 253     aDeletePB           ( this, SVX_RES( PB_DELETE_REPLACE ) ),
 254     aEditDictsBox       ( this, SVX_RES( GB_EDITDICTS ) ),
 255     aCloseBtn           ( this, SVX_RES( BTN_EDITCLOSE ) ),
 256     aHelpBtn            ( this, SVX_RES( BTN_EDITHELP ) ),
 257     sModify                     (SVX_RES(STR_MODIFY)),
 258     sNew                        (aNewReplacePB.GetText()),
 259     aDecoView           ( this),
 260     xSpell          ( xSpl ),
 261     nOld            ( NOACTDICT ),
 262     bFirstSelect    (sal_True),
 263     bDoNothing      (sal_False)
 264
 265 {
 266     if (SvxGetDictionaryList().is())
 267         aDics = SvxGetDictionaryList()->getDictionaries();
 268
 269     aWordsLB.SetSelectHdl(LINK(this, SvxEditDictionaryDialog, SelectHdl));
 270     aWordsLB.SetTabs(nStaticTabs);
 271
 272     //! we use an algorithm of our own to insert elements sorted
 273     aWordsLB.SetWindowBits(/*WB_SORT|*/WB_HSCROLL|WB_CLIPCHILDREN);
 274
 275
 276     nWidth=aWordED.GetSizePixel().Width();
 277     // Handler installieren
 278     aNewReplacePB.SetClickHdl(
 279         LINK( this, SvxEditDictionaryDialog, NewDelHdl));
 280     aDeletePB.SetClickHdl(
 281         LINK( this, SvxEditDictionaryDialog, NewDelHdl));
 282
 283     aLangLB.SetSelectHdl(
 284         LINK( this, SvxEditDictionaryDialog, SelectLangHdl_Impl ) );
 285     aAllDictsLB.SetSelectHdl(
 286         LINK( this, SvxEditDictionaryDialog, SelectBookHdl_Impl ) );
 287
 288     aWordED.SetModifyHdl(LINK(this, SvxEditDictionaryDialog, ModifyHdl));
 289     aReplaceED.SetModifyHdl(LINK(this, SvxEditDictionaryDialog, ModifyHdl));
 290     aWordED.SetActionHdl(LINK(this, SvxEditDictionaryDialog, NewDelHdl));
 291     aReplaceED.SetActionHdl(LINK(this, SvxEditDictionaryDialog, NewDelHdl));
 292
 293     // Listbox mit allen verfuegbaren WB's fuellen
 294     const Reference< XDictionary >  *pDic = aDics.getConstArray();
 295     sal_Int32 nCount = aDics.getLength();
 296
 297     String aLookUpEntry;
 298     for ( sal_Int32 i = 0; i < nCount; ++i )
 299     {
 300         Reference< XDictionary >  xDic( pDic[i], UNO_QUERY );
 301         if (xDic.is())
 302         {
 303             sal_Bool bNegative = xDic->getDictionaryType() == DictionaryType_NEGATIVE ?
 304                                 sal_True : sal_False;
 305             String aDicName( xDic->getName() );
 306             const String aTxt( ::GetDicInfoStr( aDicName, SvxLocaleToLanguage( xDic->getLocale() ),
 307                                                  bNegative ) );
 308             aAllDictsLB.InsertEntry( aTxt );
 309
 310             if (rName == aDicName)
 311                 aLookUpEntry = aTxt;
 312         }
 313     }
 314
 315     aLangLB.SetLanguageList( LANG_LIST_ALL, TRUE, TRUE );
 316
 317     aReplaceED.SetSpaces(sal_True);
 318     aWordED.SetSpaces(sal_True);
 319
 320     if ( nCount > 0 )
 321     {
 322         aAllDictsLB.SelectEntry( aLookUpEntry );
 323         sal_uInt16 nPos = aAllDictsLB.GetSelectEntryPos();
 324
 325         if ( nPos == LISTBOX_ENTRY_NOTFOUND )
 326         {
 327             nPos = 0;
 328             aAllDictsLB.SelectEntryPos( nPos );
 329         }
 330         Reference< XDictionary >  xDic;
 331         if (nPos != LISTBOX_ENTRY_NOTFOUND)
 332             xDic = Reference< XDictionary > ( aDics.getConstArray()[ nPos ], UNO_QUERY );
 333         if (xDic.is())
 334             SetLanguage_Impl( SvxLocaleToLanguage( xDic->getLocale() ) );
 335
 336         // check if dictionary is read-only
 337         SetDicReadonly_Impl(xDic);
 338         sal_Bool bEnable = !IsDicReadonly_Impl();
 339         aNewReplacePB   .Enable( sal_False );
 340         aDeletePB               .Enable( sal_False );
 341         aLangFT.Enable( bEnable );
 342         aLangLB.Enable( bEnable );
 343         ShowWords_Impl( nPos );
 344
 345     }
 346     else
 347     {
 348         aNewReplacePB.Disable();
 349         aDeletePB        .Disable();
 350     }
 351     FreeResource();
 352 }
 353
 354 // -----------------------------------------------------------------------
 355
 356 SvxEditDictionaryDialog::~SvxEditDictionaryDialog()
 357 {
 358 }
 359
 360 // -----------------------------------------------------------------------
 361
 362 void SvxEditDictionaryDialog::Paint( const Rectangle& rRect )
 363 {
 364     ModalDialog::Paint(rRect );
 365
 366     Rectangle aRect(aEditDictsBox.GetPosPixel(),aEditDictsBox.GetSizePixel());
 367
 368     sal_uInt16 nStyle=BUTTON_DRAW_NOFILL;
 369     aDecoView.DrawButton( aRect, nStyle);
 370 }
 371
 372 // -----------------------------------------------------------------------
 373
 374 void SvxEditDictionaryDialog::SetDicReadonly_Impl(
 375             Reference< XDictionary >  &xDic )
 376 {
 377     // enable or disable new and delete button according to file attributes
 378     bDicIsReadonly = sal_True;
 379     if (xDic.is())
 380     {
 381         Reference< frame::XStorable >  xStor( xDic, UNO_QUERY );
 382         if (   !xStor.is()                              // non persistent dictionary
 383             || !xStor->hasLocation()    // not yet persistent
 384             || !xStor->isReadonly() )
 385         {
 386             bDicIsReadonly = sal_False;
 387         }
 388     }
 389 }
 390
 391 // -----------------------------------------------------------------------
 392
 393 void SvxEditDictionaryDialog::SetLanguage_Impl( util::Language nLanguage )
 394 {
 395     // select language
 396     aLangLB.SelectLanguage( nLanguage );
 397 }
 398
 399 USHORT SvxEditDictionaryDialog::GetLBInsertPos(const String &rDicWord)
 400 {
 401     USHORT nPos = USHRT_MAX;
 402
 403     IntlWrapper aIntlWrapper( ::comphelper::getProcessServiceFactory(), Application::GetSettings().GetLocale() );
 404     const CollatorWrapper* pCollator = aIntlWrapper.getCollator();
 405     USHORT j;
 406     for( j = 0; j < aWordsLB.GetEntryCount(); j++ )
 407     {
 408         SvLBoxEntry* pEntry = aWordsLB.GetEntry(j);
 409         DBG_ASSERT( pEntry, "NULL pointer");
 410         String aNormEntry( getNormDicEntry_Impl( rDicWord ) );
 411         StringCompare eCmpRes = (StringCompare)pCollator->
 412             compareString( aNormEntry, getNormDicEntry_Impl( aWordsLB.GetEntryText(pEntry, 0) ) );
 413         if( COMPARE_LESS == eCmpRes )
 414             break;
 415     }
 416     if (j < aWordsLB.GetEntryCount())   // entry found?
 417         nPos = j;
 418
 419     return nPos;
 420 }
 421
 422 void SvxEditDictionaryDialog::RemoveDictEntry(SvLBoxEntry* pEntry)
 423 {
 424     sal_uInt16 nLBPos = aAllDictsLB.GetSelectEntryPos();
 425
 426     if ( pEntry != NULL && nLBPos != LISTBOX_ENTRY_NOTFOUND )
 427     {
 428         String sTmpShort(aWordsLB.GetEntryText(pEntry, 0));
 429
 430         Reference< XDictionary >  xDic = aDics.getConstArray()[ nLBPos ];
 431         if (xDic->remove( sTmpShort ))  // sal_True on success
 432         {
 433             aWordsLB.GetModel()->Remove(pEntry);
 434         }
 435     }
 436 }
 437
 438 // -----------------------------------------------------------------------
 439
 440 IMPL_LINK( SvxEditDictionaryDialog, SelectBookHdl_Impl, ListBox *, EMPTYARG )
 441 {
 442     sal_uInt16 nPos = aAllDictsLB.GetSelectEntryPos();
 443
 444     if ( nPos != LISTBOX_ENTRY_NOTFOUND )
 445     {
 446         aNewReplacePB.Enable( sal_False );
 447         aDeletePB        .Enable( sal_False );
 448         // Dictionary anzeigen
 449         ShowWords_Impl( nPos );
 450         // enable or disable new and delete button according to file attributes
 451         Reference< XDictionary >  xDic( aDics.getConstArray()[ nPos ], UNO_QUERY );
 452         if (xDic.is())
 453             SetLanguage_Impl( SvxLocaleToLanguage( xDic->getLocale() ) );
 454
 455         SetDicReadonly_Impl(xDic);
 456         sal_Bool bEnable = !IsDicReadonly_Impl();
 457         aLangFT.Enable( bEnable );
 458         aLangLB.Enable( bEnable );
 459     }
 460     return 0;
 461 }
 462
 463 // -----------------------------------------------------------------------
 464
 465 IMPL_LINK( SvxEditDictionaryDialog, SelectLangHdl_Impl, ListBox *, EMPTYARG )
 466 {
 467     sal_uInt16 nDicPos = aAllDictsLB.GetSelectEntryPos();
 468     sal_uInt16 nLang = aLangLB.GetSelectLanguage();
 469     Reference< XDictionary >  xDic( aDics.getConstArray()[ nDicPos ], UNO_QUERY );
 470     INT16 nOldLang = SvxLocaleToLanguage( xDic->getLocale() );
 471
 472     if ( nLang != nOldLang )
 473     {
 474         QueryBox aBox( this, SVX_RES( RID_SFXQB_SET_LANGUAGE ) );
 475         String sTxt( aBox.GetMessText() );
 476         sTxt.SearchAndReplaceAscii( "%1", aAllDictsLB.GetSelectEntry() );
 477         aBox.SetMessText( sTxt );
 478
 479         if ( aBox.Execute() == RET_YES )
 480         {
 481             xDic->setLocale( SvxCreateLocale( nLang ) );
 482             sal_Bool bNegativ = xDic->getDictionaryType() == DictionaryType_NEGATIVE;
 483
 484             const String sName(
 485                 ::GetDicInfoStr( xDic->getName(),
 486                                  SvxLocaleToLanguage( xDic->getLocale() ),
 487                                  bNegativ ) );
 488             aAllDictsLB.RemoveEntry( nDicPos );
 489             aAllDictsLB.InsertEntry( sName, nDicPos );
 490             aAllDictsLB.SelectEntryPos( nDicPos );
 491         }
 492         else
 493             SetLanguage_Impl( nOldLang );
 494     }
 495     return 1;
 496 }
 497
 498 // -----------------------------------------------------------------------
 499
 500 void SvxEditDictionaryDialog::ShowWords_Impl( sal_uInt16 nId )
 501 {
 502     Reference< XDictionary >  xDic = aDics.getConstArray()[ nId ];
 503
 504     nOld = nId;
 505     EnterWait();
 506
 507     String aStr;
 508
 509     aWordED.SetText(aStr);
 510     aReplaceED.SetText(aStr);
 511
 512     if(xDic->getDictionaryType() != DictionaryType_POSITIVE)
 513     {
 514         nStaticTabs[0]=2;
 515
 516         // make controls for replacement text active
 517         if(!aReplaceFT.IsVisible())
 518         {
 519             Size aSize=aWordED.GetSizePixel();
 520             aSize.Width()=nWidth;
 521             aWordED.SetSizePixel(aSize);
 522             aReplaceFT.Show();
 523             aReplaceED.Show();
 524         }
 525     }
 526     else
 527     {
 528         nStaticTabs[0]=1;
 529
 530         // deactivate controls for replacement text
 531         if(aReplaceFT.IsVisible())
 532         {
 533             Size aSize=aWordED.GetSizePixel();
 534             aSize.Width()=aWordsLB.GetSizePixel().Width();
 535             aWordED.SetSizePixel(aSize);
 536             aReplaceFT.Hide();
 537             aReplaceED.Hide();
 538         }
 539
 540     }
 541
 542     aWordsLB.SetTabs(nStaticTabs);
 543     aWordsLB.Clear();
 544
 545     Sequence< Reference< XDictionaryEntry >  > aEntries( xDic->getEntries() );
 546     const Reference< XDictionaryEntry >  *pEntry = aEntries.getConstArray();
 547     sal_Int32 nCount = aEntries.getLength();
 548
 549     for (sal_Int32 i = 0;  i < nCount;  i++)
 550     {
 551         aStr = String(pEntry[i]->getDictionaryWord());
 552         USHORT nPos = GetLBInsertPos( aStr );
 553         if(pEntry[i]->isNegative())
 554         {
 555             aStr += '\t';
 556             aStr += String(pEntry[i]->getReplacementText());
 557         }
 558         aWordsLB.InsertEntry(aStr, 0, sal_False, nPos == USHRT_MAX ?  LIST_APPEND : nPos);
 559     }
 560
 561     if (aWordsLB.GetEntryCount())
 562     {
 563         aWordED   .SetText( aWordsLB.GetEntryText(0LU, 0) );
 564         aReplaceED.SetText( aWordsLB.GetEntryText(0LU, 1) );
 565     }
 566
 567     LeaveWait();
 568 }
 569
 570 // -----------------------------------------------------------------------
 571
 572 IMPL_LINK(SvxEditDictionaryDialog, SelectHdl, SvTabListBox*, pBox)
 573 {
 574     if(!bDoNothing)
 575     {
 576         if(!bFirstSelect)
 577         {
 578             SvLBoxEntry* pEntry = pBox->FirstSelected();
 579             String sTmpShort(pBox->GetEntryText(pEntry, 0));
 580             // wird der Text ueber den ModifyHdl gesetzt, dann steht der Cursor
 581             //sonst immer am Wortanfang, obwohl man gerade hier editiert
 582             if(aWordED.GetText() != sTmpShort)
 583                 aWordED.SetText(sTmpShort);
 584             aReplaceED.SetText(pBox->GetEntryText(pEntry, 1));
 585         }
 586         else
 587             bFirstSelect = sal_False;
 588
 589         // entries in the list box should exactly correspond to those from the
 590         // dictionary. Thus:
 591         aNewReplacePB.Enable(sal_False);
 592         aDeletePB        .Enable( sal_True && !IsDicReadonly_Impl() );
 593     }
 594     return 0;
 595 };
 596
 597 // -----------------------------------------------------------------------
 598
 599 IMPL_LINK(SvxEditDictionaryDialog, NewDelHdl, PushButton*, pBtn)
 600 {
 601     SvLBoxEntry* pEntry = aWordsLB.FirstSelected();
 602
 603     if(pBtn == &aDeletePB)
 604     {
 605         DBG_ASSERT(pEntry, "keine Eintrag selektiert");
 606         String aStr;
 607
 608         aWordED.SetText(aStr);
 609         aReplaceED.SetText(aStr);
 610         aDeletePB.Disable();
 611
 612         RemoveDictEntry(pEntry);        // remove entry from dic and list-box
 613     }
 614     if(pBtn == &aNewReplacePB || aNewReplacePB.IsEnabled())
 615     {
 616         SvLBoxEntry* _pEntry = aWordsLB.FirstSelected();
 617         XubString aNewWord(aWordED.GetText());
 618         String sEntry(aNewWord);
 619         XubString aReplaceStr(aReplaceED.GetText());
 620
 621         sal_Int16 nAddRes = DIC_ERR_UNKNOWN;
 622         sal_uInt16 nPos = aAllDictsLB.GetSelectEntryPos();
 623         if ( nPos != LISTBOX_ENTRY_NOTFOUND && aNewWord.Len() > 0)
 624         {
 625             DBG_ASSERT(nPos < aDics.getLength(), "invalid dictionary index");
 626             Reference< XDictionary >  xDic( aDics.getConstArray()[ nPos ], UNO_QUERY );
 627             if (xDic.is())
 628             {
 629                 // make changes in dic
 630
 631                 //! ...IsVisible should reflect wether the dictionary is a negativ
 632                 //! or not (hopefully...)
 633                 sal_Bool bIsNegEntry = aReplaceFT.IsVisible();
 634                 ::rtl::OUString aRplcText;
 635                 if(bIsNegEntry)
 636                     aRplcText = aReplaceStr;
 637
 638                 if (_pEntry) // entry selected in aWordsLB ie action = modify entry
 639                     xDic->remove( aWordsLB.GetEntryText( _pEntry, 0 ) );
 640                 // if remove has failed the following add should fail too
 641                 // and thus a warning message should be triggered...
 642
 643                 Reference<XDictionary> aXDictionary(xDic, UNO_QUERY);
 644                 nAddRes = linguistic::AddEntryToDic( aXDictionary,
 645                             aNewWord, bIsNegEntry,
 646                             aRplcText, SvxLocaleToLanguage( xDic->getLocale() ), sal_False );
 647              }
 648         }
 649         if (DIC_ERR_NONE != nAddRes)
 650             SvxDicError( this, nAddRes );
 651
 652         if(DIC_ERR_NONE == nAddRes && sEntry.Len())
 653         {
 654             // insert new entry in list-box etc...
 655
 656             aWordsLB.SetUpdateMode(sal_False);
 657             sal_uInt16 _nPos = USHRT_MAX;
 658
 659             if(aReplaceFT.IsVisible())
 660             {
 661                 sEntry += '\t';
 662                 sEntry += aReplaceStr;
 663             }
 664
 665             SvLBoxEntry* pNewEntry = NULL;
 666             if(_pEntry) // entry selected in aWordsLB ie action = modify entry
 667             {
 668                 aWordsLB.SetEntryText( sEntry, _pEntry );
 669                 pNewEntry = _pEntry;
 670             }
 671             else
 672             {
 673                 _nPos = GetLBInsertPos( aNewWord );
 674                 SvLBoxEntry* pInsEntry = aWordsLB.InsertEntry(sEntry, 0, sal_False,
 675                             _nPos == USHRT_MAX ? LIST_APPEND : (sal_uInt32)_nPos);
 676                 pNewEntry = pInsEntry;
 677             }
 678
 679             aWordsLB.MakeVisible( pNewEntry );
 680             aWordsLB.SetUpdateMode(sal_True);
 681             // falls der Request aus dem ReplaceEdit kam, dann Focus in das ShortEdit setzen
 682             if(aReplaceED.HasFocus())
 683                 aWordED.GrabFocus();
 684         }
 685     }
 686     else
 687     {
 688         // das kann nur ein Enter in einem der beiden Edit-Felder sein und das
 689         // bedeutet EndDialog() - muss im KeyInput ausgewertet werden
 690         return 0;
 691     }
 692     ModifyHdl(&aWordED);
 693     return 1;
 694 }
 695
 696 // -----------------------------------------------------------------------
 697
 698 IMPL_LINK(SvxEditDictionaryDialog, ModifyHdl, Edit*, pEdt)
 699 {
 700     SvLBoxEntry* pFirstSel = aWordsLB.FirstSelected();
 701     String rEntry = pEdt->GetText();
 702
 703     xub_StrLen nWordLen=rEntry.Len();
 704     const String& rRepString = aReplaceED.GetText();
 705
 706     BOOL bEnableNewReplace      = FALSE;
 707     BOOL bEnableDelete          = FALSE;
 708     String aNewReplaceText      = sNew;
 709
 710     if(pEdt == &aWordED)
 711     {
 712         if(nWordLen>0)
 713         {
 714             sal_Bool bFound = sal_False;
 715             sal_Bool bTmpSelEntry=sal_False;
 716             CDE_RESULT eCmpRes = CDE_DIFFERENT;
 717
 718             for(sal_uInt16 i = 0; i < aWordsLB.GetEntryCount(); i++)
 719             {
 720                 SvLBoxEntry*  pEntry = aWordsLB.GetEntry( i );
 721                 String aTestStr( aWordsLB.GetEntryText(pEntry, 0) );
 722                 eCmpRes = cmpDicEntry_Impl( rEntry, aTestStr );
 723                 if(CDE_DIFFERENT != eCmpRes)
 724                 {
 725                     if(rRepString.Len())
 726                         bFirstSelect = sal_True;
 727                     bDoNothing=sal_True;
 728                     aWordsLB.SetCurEntry(pEntry);
 729                     bDoNothing=sal_False;
 730                     pFirstSel = pEntry;
 731                     aReplaceED.SetText(aWordsLB.GetEntryText(pEntry, 1));
 732
 733                     if (CDE_SIMILAR == eCmpRes)
 734                     {
 735                         aNewReplaceText = sModify;
 736                         bEnableNewReplace = TRUE;
 737                     }
 738                     bFound= sal_True;
 739                     break;
 740                 }
 741                 else if(getNormDicEntry_Impl(aTestStr).Search(
 742                             getNormDicEntry_Impl( rEntry ) ) == 0
 743                         && !bTmpSelEntry)
 744                 {
 745                     bDoNothing=sal_True;
 746                     aWordsLB.MakeVisible(pEntry);
 747                     bDoNothing=sal_False;
 748                     bTmpSelEntry=sal_True;
 749
 750                     aNewReplaceText = sNew;
 751                     bEnableNewReplace = TRUE;
 752                 }
 753             }
 754
 755             if(!bFound)
 756             {
 757                 aWordsLB.SelectAll(sal_False);
 758                 pFirstSel = 0;
 759
 760                 aNewReplaceText = sNew;
 761                 bEnableNewReplace = TRUE;
 762             }
 763             bEnableDelete = CDE_DIFFERENT != eCmpRes;
 764         }
 765         else if(aWordsLB.GetEntryCount()>0)
 766         {
 767             SvLBoxEntry*  pEntry = aWordsLB.GetEntry( 0 );
 768             bDoNothing=sal_True;
 769             aWordsLB.MakeVisible(pEntry);
 770             bDoNothing=sal_False;
 771         }
 772     }
 773     else if(pEdt == &aReplaceED)
 774     {
 775         String aReplaceText;
 776         String aWordText;
 777         if (pFirstSel)  // a aWordsLB entry is selected
 778         {
 779             aWordText    = aWordsLB.GetEntryText( pFirstSel, 0 );
 780              aReplaceText = aWordsLB.GetEntryText( pFirstSel, 1 );
 781
 782             aNewReplaceText = sModify;
 783             bEnableDelete = TRUE;
 784         }
 785         BOOL bIsChange =
 786                 CDE_EQUAL != cmpDicEntry_Impl(aWordED.GetText(), aWordText)
 787              || CDE_EQUAL != cmpDicEntry_Impl(aReplaceED.GetText(), aReplaceText);
 788         if (aWordED.GetText().Len()  &&  bIsChange)
 789             bEnableNewReplace = TRUE;
 790     }
 791
 792     aNewReplacePB.SetText( aNewReplaceText );
 793     aNewReplacePB.Enable( bEnableNewReplace && !IsDicReadonly_Impl() );
 794     aDeletePB    .Enable( bEnableDelete     && !IsDicReadonly_Impl() );
 795
 796     return 0;
 797 }
 798
 799 //=========================================================
 800 //SvxDictEdit
 801 //=========================================================
 802 void SvxDictEdit::KeyInput( const KeyEvent& rKEvt )
 803 {
 804     const KeyCode aKeyCode = rKEvt.GetKeyCode();
 805     const sal_uInt16 nModifier = aKeyCode.GetModifier();
 806     if( aKeyCode.GetCode() == KEY_RETURN )
 807     {
 808         //wird bei Enter nichts getan, dann doch die Basisklasse rufen
 809         // um den Dialog zu schliessen
 810         if(!nModifier && !aActionLink.Call(this))
 811                  Edit::KeyInput(rKEvt);
 812     }
 813     else if(bSpaces || aKeyCode.GetCode() != KEY_SPACE)
 814         Edit::KeyInput(rKEvt);
 815 }
 816
 817