cui/source/options/optdict.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 <editeng/unolingu.hxx>
  22 #include <svx/dlgutil.hxx>
  23 #include <sfx2/sfxuno.hxx>
  24 #include <svl/eitem.hxx>
  25 #include <com/sun/star/frame/XStorable.hpp>
  26 #include <comphelper/processfactory.hxx>
  27 #include <comphelper/string.hxx>
  28 #include <unotools/intlwrapper.hxx>
  29 #include <vcl/svapp.hxx>
  30 #include <vcl/msgbox.hxx>
  31 #include <vcl/settings.hxx>
  32 #include <svx/dialogs.hrc>
  33
  34 #include <linguistic/misc.hxx>
  35 #include <cuires.hrc>
  36 #include "optdict.hxx"
  37 #include <dialmgr.hxx>
  38 #include <svx/svxerr.hxx>
  39
  40 using namespace ::com::sun::star;
  41 using namespace ::com::sun::star::uno;
  42 using namespace ::com::sun::star::linguistic2;
  43
  44 // static ----------------------------------------------------------------
  45
  46 static const short  NOACTDICT   = -1;
  47
  48 static long nStaticTabs[]=
  49 {
  50     2,10,71,120
  51 };
  52
  53 // static function -------------------------------------------------------
  54
  55 static OUString getNormDicEntry_Impl(const OUString &rText)
  56 {
  57     OUString aTmp(comphelper::string::stripEnd(rText, '.'));
  58     // non-standard hyphenation
  59     if (aTmp.indexOf('[') > -1)
  60     {
  61         OUStringBuffer aTmp2 ( aTmp.getLength() );
  62         bool bSkip = false;
  63         for (sal_Int32 i = 0; i < aTmp.getLength(); i++)
  64         {
  65             sal_Unicode cTmp = aTmp[i];
  66             if (cTmp == '[')
  67                 bSkip = true;
  68             else if (!bSkip)
  69                 aTmp2.append( cTmp );
  70             else if (cTmp == ']')
  71                 bSkip = false;
  72         }
  73         aTmp = aTmp2.makeStringAndClear();
  74     }
  75     return comphelper::string::remove(aTmp, '=');
  76 }
  77
  78 // Compare Dictionary Entry  result
  79 enum CDE_RESULT { CDE_EQUAL, CDE_SIMILAR, CDE_DIFFERENT };
  80
  81 static CDE_RESULT cmpDicEntry_Impl( const OUString &rText1, const OUString &rText2 )
  82 {
  83     CDE_RESULT eRes = CDE_DIFFERENT;
  84
  85     if (rText1 == rText2)
  86         eRes = CDE_EQUAL;
  87     else
  88     {   // similar = equal up to trailing '.' and hyphenation positions
  89         // marked with '=' and '[' + alternative spelling pattern + ']'
  90         if (getNormDicEntry_Impl( rText1 ) == getNormDicEntry_Impl( rText2 ))
  91             eRes = CDE_SIMILAR;
  92     }
  93
  94     return eRes;
  95 }
  96
  97 // class SvxNewDictionaryDialog -------------------------------------------
  98
  99 SvxNewDictionaryDialog::SvxNewDictionaryDialog( Window* pParent,
 100         Reference< XSpellChecker1 >  &xSpl ) :
 101
 102     ModalDialog( pParent, "OptNewDictionaryDialog" , "cui/ui/optnewdictionarydialog.ui" ),
 103
 104     xSpell( xSpl )
 105 {
 106     get(pNameEdit,"nameedit");
 107     get(pLanguageLB,"language");
 108     get(pExceptBtn,"except");
 109     get(pOKBtn,"ok");
 110     // install handler
 111     pNameEdit->SetModifyHdl(
 112         LINK( this, SvxNewDictionaryDialog, ModifyHdl_Impl ) );
 113     pOKBtn->SetClickHdl( LINK( this, SvxNewDictionaryDialog, OKHdl_Impl ) );
 114
 115     // display languages
 116     pLanguageLB->SetLanguageList( LANG_LIST_ALL, true, true );
 117     pLanguageLB->SelectEntryPos(0);
 118 }
 119
 120
 121
 122 IMPL_LINK_NOARG(SvxNewDictionaryDialog, OKHdl_Impl)
 123 {
 124     OUString sDict = comphelper::string::stripEnd(pNameEdit->GetText(), ' ');
 125     // add extension for personal dictionaries
 126     sDict += ".dic";
 127
 128     Reference< XSearchableDictionaryList >  xDicList( SvxGetDictionaryList() );
 129
 130     Sequence< Reference< XDictionary >  > aDics;
 131     if (xDicList.is())
 132         aDics = xDicList->getDictionaries();
 133     const Reference< XDictionary >  *pDic = aDics.getConstArray();
 134     sal_Int32 nCount = aDics.getLength();
 135
 136     bool bFound = false;
 137     sal_Int32 i;
 138     for (i = 0; !bFound && i < nCount; ++i )
 139         if ( sDict.equalsIgnoreAsciiCase( pDic[i]->getName()) )
 140             bFound = true;
 141
 142     if ( bFound )
 143     {
 144         // duplicate names?
 145         InfoBox( this, CUI_RESSTR( RID_SVXSTR_OPT_DOUBLE_DICTS ) ).Execute();
 146         pNameEdit->GrabFocus();
 147         return 0;
 148     }
 149
 150     // create and add
 151     sal_uInt16 nLang = pLanguageLB->GetSelectLanguage();
 152     try
 153     {
 154         // create new dictionary
 155         DictionaryType eType = pExceptBtn->IsChecked() ?
 156                 DictionaryType_NEGATIVE : DictionaryType_POSITIVE;
 157         if (xDicList.is())
 158         {
 159             lang::Locale aLocale( LanguageTag::convertToLocale(nLang) );
 160             OUString aURL( linguistic::GetWritableDictionaryURL( sDict ) );
 161             xNewDic = Reference< XDictionary > (
 162                     xDicList->createDictionary( sDict, aLocale, eType, aURL ) , UNO_QUERY );
 163             xNewDic->setActive( sal_True );
 164         }
 165         DBG_ASSERT(xNewDic.is(), "NULL pointer");
 166     }
 167     catch(...)
 168     {
 169         xNewDic = NULL;
 170
 171         // error: couldn't create new dictionary
 172         SfxErrorContext aContext( ERRCTX_SVX_LINGU_DICTIONARY, OUString(),
 173             this, RID_SVXERRCTX, &CUI_MGR() );
 174         ErrorHandler::HandleError( *new StringErrorInfo(
 175                 ERRCODE_SVX_LINGU_DICT_NOTWRITEABLE, sDict ) );
 176
 177         EndDialog( RET_CANCEL );
 178     }
 179
 180     if (xDicList.is() && xNewDic.is())
 181     {
 182         xDicList->addDictionary( Reference< XDictionary > ( xNewDic, UNO_QUERY ) );
 183
 184         // refresh list of dictionaries
 185         //! dictionaries may have been added/removed elsewhere too.
 186         aDics = xDicList->getDictionaries();
 187     }
 188
 189
 190     EndDialog( RET_OK );
 191     return 0;
 192 }
 193
 194
 195
 196 IMPL_LINK_NOARG_INLINE_START(SvxNewDictionaryDialog, ModifyHdl_Impl)
 197 {
 198     if ( !pNameEdit->GetText().isEmpty() )
 199         pOKBtn->Enable();
 200     else
 201         pOKBtn->Disable();
 202     return 0;
 203 }
 204 IMPL_LINK_NOARG_INLINE_END(SvxNewDictionaryDialog, ModifyHdl_Impl)
 205
 206
 207
 208 // class SvxEditDictionaryDialog -------------------------------------------
 209
 210
 211
 212 extern "C" SAL_DLLPUBLIC_EXPORT Window* SAL_CALL makeSvxDictEdit(Window *pParent, VclBuilder::stringmap&)
 213 {
 214     WinBits nWinStyle = WB_LEFT|WB_VCENTER|WB_BORDER|WB_3DLOOK;
 215     SvxDictEdit *pEdit = new SvxDictEdit(pParent, nWinStyle);
 216     return pEdit;
 217 };
 218
 219 SvxEditDictionaryDialog::SvxEditDictionaryDialog(
 220             Window* pParent,
 221             const OUString& rName,
 222             Reference< XSpellChecker1 >  &xSpl ) :
 223
 224     ModalDialog( pParent, "EditDictionaryDialog" ,"cui/ui/editdictionarydialog.ui" ),
 225
 226     sModify         (CUI_RESSTR(STR_MODIFY)),
 227     aDecoView       ( this),
 228     xSpell          ( xSpl ),
 229     nOld            ( NOACTDICT ),
 230     bFirstSelect    (true),
 231     bDoNothing      (false),
 232     bDicIsReadonly  (false)
 233
 234 {
 235     get(pAllDictsLB,"book");
 236     get(pLangFT,"lang_label");
 237     get(pLangLB,"lang");
 238
 239     get(pWordED,"word");
 240     get(pReplaceFT,"replace_label");
 241     get(pReplaceED,"replace");
 242     get(pWordsLB,"words");
 243     pWordsLB->set_height_request(pWordsLB->GetTextHeight() * 8);
 244     get(pNewReplacePB,"newreplace");
 245     get(pDeletePB,"delete");
 246
 247     sNew=pNewReplacePB->GetText();
 248     if (SvxGetDictionaryList().is())
 249         aDics = SvxGetDictionaryList()->getDictionaries();
 250
 251     pWordsLB->SetSelectHdl(LINK(this, SvxEditDictionaryDialog, SelectHdl));
 252     pWordsLB->SetTabs(nStaticTabs);
 253
 254     //! we use an algorithm of our own to insert elements sorted
 255     pWordsLB->SetStyle(pWordsLB->GetStyle()|/*WB_SORT|*/WB_HSCROLL|WB_CLIPCHILDREN);
 256
 257
 258     nWidth=pWordED->GetSizePixel().Width();
 259     // install handler
 260     pNewReplacePB->SetClickHdl(
 261         LINK( this, SvxEditDictionaryDialog, NewDelHdl));
 262     pDeletePB->SetClickHdl(
 263         LINK( this, SvxEditDictionaryDialog, NewDelHdl));
 264
 265     pLangLB->SetSelectHdl(
 266         LINK( this, SvxEditDictionaryDialog, SelectLangHdl_Impl ) );
 267     pAllDictsLB->SetSelectHdl(
 268         LINK( this, SvxEditDictionaryDialog, SelectBookHdl_Impl ) );
 269
 270     pWordED->SetModifyHdl(LINK(this, SvxEditDictionaryDialog, ModifyHdl));
 271     pReplaceED->SetModifyHdl(LINK(this, SvxEditDictionaryDialog, ModifyHdl));
 272     pWordED->SetActionHdl(LINK(this, SvxEditDictionaryDialog, NewDelHdl));
 273     pReplaceED->SetActionHdl(LINK(this, SvxEditDictionaryDialog, NewDelHdl));
 274
 275     // fill listbox with all available WB's
 276     const Reference< XDictionary >  *pDic = aDics.getConstArray();
 277     sal_Int32 nCount = aDics.getLength();
 278
 279     OUString aLookUpEntry;
 280     for ( sal_Int32 i = 0; i < nCount; ++i )
 281     {
 282         Reference< XDictionary >  xDic( pDic[i], UNO_QUERY );
 283         if (xDic.is())
 284         {
 285             bool bNegative = xDic->getDictionaryType() == DictionaryType_NEGATIVE;
 286             OUString aDicName( xDic->getName() );
 287             const OUString aTxt( ::GetDicInfoStr( aDicName,
 288                         LanguageTag( xDic->getLocale() ).getLanguageType(), bNegative ) );
 289             pAllDictsLB->InsertEntry( aTxt );
 290
 291             if (rName == aDicName)
 292                 aLookUpEntry = aTxt;
 293         }
 294     }
 295
 296     pLangLB->SetLanguageList( LANG_LIST_ALL, true, true );
 297
 298     pReplaceED->SetSpaces(true);
 299     pWordED->SetSpaces(true);
 300
 301     if ( nCount > 0 )
 302     {
 303         pAllDictsLB->SelectEntry( aLookUpEntry );
 304         sal_Int32 nPos = pAllDictsLB->GetSelectEntryPos();
 305
 306         if ( nPos == LISTBOX_ENTRY_NOTFOUND )
 307         {
 308             nPos = 0;
 309             pAllDictsLB->SelectEntryPos( nPos );
 310         }
 311         Reference< XDictionary >  xDic;
 312         if (nPos != LISTBOX_ENTRY_NOTFOUND)
 313             xDic = Reference< XDictionary > ( aDics.getConstArray()[ nPos ], UNO_QUERY );
 314         if (xDic.is())
 315             SetLanguage_Impl( LanguageTag( xDic->getLocale() ).getLanguageType() );
 316
 317         // check if dictionary is read-only
 318         SetDicReadonly_Impl(xDic);
 319         bool bEnable = !IsDicReadonly_Impl();
 320         pNewReplacePB->Enable( false );
 321         pDeletePB->Enable( false );
 322         pLangFT->Enable( bEnable );
 323         pLangLB->Enable( bEnable );
 324         ShowWords_Impl( nPos );
 325
 326     }
 327     else
 328     {
 329         pNewReplacePB->Disable();
 330         pDeletePB->Disable();
 331     }
 332 }
 333
 334
 335
 336 SvxEditDictionaryDialog::~SvxEditDictionaryDialog()
 337 {
 338 }
 339
 340
 341 /*
 342 void SvxEditDictionaryDialog::Paint( const Rectangle& rRect )
 343 {
 344     ModalDialog::Paint(rRect );
 345
 346     //Rectangle aRect(aEditDictsBox.GetPosPixel(),aEditDictsBox.GetSizePixel());
 347
 348     sal_uInt16 nStyle=BUTTON_DRAW_NOFILL;
 349 //    aDecoView.DrawButton( aRect, nStyle);
 350 }
 351 */
 352
 353
 354 void SvxEditDictionaryDialog::SetDicReadonly_Impl(
 355             Reference< XDictionary >  &xDic )
 356 {
 357     // enable or disable new and delete button according to file attributes
 358     bDicIsReadonly = true;
 359     if (xDic.is())
 360     {
 361         Reference< frame::XStorable >  xStor( xDic, UNO_QUERY );
 362         if (   !xStor.is()              // non persistent dictionary
 363             || !xStor->hasLocation()    // not yet persistent
 364             || !xStor->isReadonly() )
 365         {
 366             bDicIsReadonly = false;
 367         }
 368     }
 369 }
 370
 371
 372
 373 void SvxEditDictionaryDialog::SetLanguage_Impl( util::Language nLanguage )
 374 {
 375     // select language
 376     pLangLB->SelectLanguage( nLanguage );
 377 }
 378
 379 sal_uLong SvxEditDictionaryDialog::GetLBInsertPos(const OUString &rDicWord)
 380 {
 381     sal_uLong nPos = TREELIST_ENTRY_NOTFOUND;
 382
 383     IntlWrapper aIntlWrapper( Application::GetSettings().GetLanguageTag() );
 384     const CollatorWrapper* pCollator = aIntlWrapper.getCollator();
 385     sal_uLong j;
 386     for( j = 0; j < pWordsLB->GetEntryCount(); j++ )
 387     {
 388         SvTreeListEntry* pEntry = pWordsLB->GetEntry(j);
 389         DBG_ASSERT( pEntry, "NULL pointer");
 390         OUString aNormEntry( getNormDicEntry_Impl( rDicWord ) );
 391         sal_Int32 nCmpRes = pCollator->
 392             compareString( aNormEntry, getNormDicEntry_Impl( pWordsLB->GetEntryText(pEntry, 0) ) );
 393         if (nCmpRes < 0)
 394             break;
 395     }
 396     if (j < pWordsLB->GetEntryCount())   // entry found?
 397         nPos = j;
 398
 399     return nPos;
 400 }
 401
 402 void SvxEditDictionaryDialog::RemoveDictEntry(SvTreeListEntry* pEntry)
 403 {
 404     sal_Int32 nLBPos = pAllDictsLB->GetSelectEntryPos();
 405
 406     if ( pEntry != NULL && nLBPos != LISTBOX_ENTRY_NOTFOUND )
 407     {
 408         OUString sTmpShort(pWordsLB->GetEntryText(pEntry, 0));
 409
 410         Reference< XDictionary >  xDic = aDics.getConstArray()[ nLBPos ];
 411         if (xDic->remove( sTmpShort ))  // sal_True on success
 412         {
 413             pWordsLB->GetModel()->Remove(pEntry);
 414         }
 415     }
 416 }
 417
 418
 419
 420 IMPL_LINK_NOARG(SvxEditDictionaryDialog, SelectBookHdl_Impl)
 421 {
 422     sal_Int32 nPos = pAllDictsLB->GetSelectEntryPos();
 423
 424     if ( nPos != LISTBOX_ENTRY_NOTFOUND )
 425     {
 426         pNewReplacePB->Enable( false );
 427         pDeletePB->Enable( false );
 428         // display dictionary
 429         ShowWords_Impl( nPos );
 430         // enable or disable new and delete button according to file attributes
 431         Reference< XDictionary >  xDic( aDics.getConstArray()[ nPos ], UNO_QUERY );
 432         if (xDic.is())
 433             SetLanguage_Impl( LanguageTag( xDic->getLocale() ).getLanguageType() );
 434
 435         SetDicReadonly_Impl(xDic);
 436         bool bEnable = !IsDicReadonly_Impl();
 437         pLangFT->Enable( bEnable );
 438         pLangLB->Enable( bEnable );
 439     }
 440     return 0;
 441 }
 442
 443
 444
 445 IMPL_LINK_NOARG(SvxEditDictionaryDialog, SelectLangHdl_Impl)
 446 {
 447     sal_Int32 nDicPos = pAllDictsLB->GetSelectEntryPos();
 448     sal_Int32 nLang = pLangLB->GetSelectLanguage();
 449     Reference< XDictionary >  xDic( aDics.getConstArray()[ nDicPos ], UNO_QUERY );
 450     sal_Int16 nOldLang = LanguageTag( xDic->getLocale() ).getLanguageType();
 451
 452     if ( nLang != nOldLang )
 453     {
 454         QueryBox aBox( this, CUI_RES( RID_SFXQB_SET_LANGUAGE ) );
 455         OUString sTxt( aBox.GetMessText() );
 456         sTxt = sTxt.replaceFirst( "%1", pAllDictsLB->GetSelectEntry() );
 457         aBox.SetMessText( sTxt );
 458
 459         if ( aBox.Execute() == RET_YES )
 460         {
 461             xDic->setLocale( LanguageTag::convertToLocale( nLang ) );
 462             bool bNegativ = xDic->getDictionaryType() == DictionaryType_NEGATIVE;
 463
 464             const OUString sName(
 465                 ::GetDicInfoStr( xDic->getName(),
 466                                  LanguageTag( xDic->getLocale() ).getLanguageType(),
 467                                  bNegativ ) );
 468             pAllDictsLB->RemoveEntry( nDicPos );
 469             pAllDictsLB->InsertEntry( sName, nDicPos );
 470             pAllDictsLB->SelectEntryPos( nDicPos );
 471         }
 472         else
 473             SetLanguage_Impl( nOldLang );
 474     }
 475     return 1;
 476 }
 477
 478
 479
 480 void SvxEditDictionaryDialog::ShowWords_Impl( sal_uInt16 nId )
 481 {
 482     Reference< XDictionary >  xDic = aDics.getConstArray()[ nId ];
 483
 484     nOld = nId;
 485     EnterWait();
 486
 487     OUString aStr;
 488
 489     pWordED->SetText(aStr);
 490     pReplaceED->SetText(aStr);
 491
 492     if(xDic->getDictionaryType() != DictionaryType_POSITIVE)
 493     {
 494         nStaticTabs[0]=2;
 495
 496         // make controls for replacement text active
 497         if(!pReplaceFT->IsVisible())
 498         {
 499             Size aSize=pWordED->GetSizePixel();
 500             aSize.Width()=nWidth;
 501             pWordED->SetSizePixel(aSize);
 502             pReplaceFT->Show();
 503             pReplaceED->Show();
 504         }
 505     }
 506     else
 507     {
 508         nStaticTabs[0]=1;
 509
 510         // deactivate controls for replacement text
 511         if(pReplaceFT->IsVisible())
 512         {
 513             Size aSize=pWordED->GetSizePixel();
 514             aSize.Width()=pWordsLB->GetSizePixel().Width();
 515             pWordED->SetSizePixel(aSize);
 516             pReplaceFT->Hide();
 517             pReplaceED->Hide();
 518         }
 519
 520     }
 521
 522     pWordsLB->SetTabs(nStaticTabs);
 523     pWordsLB->Clear();
 524
 525     Sequence< Reference< XDictionaryEntry >  > aEntries( xDic->getEntries() );
 526     const Reference< XDictionaryEntry >  *pEntry = aEntries.getConstArray();
 527     sal_Int32 nCount = aEntries.getLength();
 528
 529     for (sal_Int32 i = 0;  i < nCount;  i++)
 530     {
 531         aStr = pEntry[i]->getDictionaryWord();
 532         sal_uLong nPos = GetLBInsertPos( aStr );
 533         if(pEntry[i]->isNegative())
 534         {
 535             aStr += "\t";
 536             aStr += pEntry[i]->getReplacementText();
 537         }
 538         pWordsLB->InsertEntry(aStr, 0, false, nPos == TREELIST_ENTRY_NOTFOUND ?  TREELIST_APPEND : nPos);
 539     }
 540
 541     if (pWordsLB->GetEntryCount())
 542     {
 543         pWordED->SetText( pWordsLB->GetEntryText((sal_uLong)0, 0) );
 544         pReplaceED->SetText( pWordsLB->GetEntryText((sal_uLong)0, 1) );
 545     }
 546
 547     LeaveWait();
 548 }
 549
 550
 551
 552 IMPL_LINK(SvxEditDictionaryDialog, SelectHdl, SvTabListBox*, pBox)
 553 {
 554     if(!bDoNothing)
 555     {
 556         if(!bFirstSelect)
 557         {
 558             SvTreeListEntry* pEntry = pBox->FirstSelected();
 559             OUString sTmpShort(pBox->GetEntryText(pEntry, 0));
 560             // without this the curser is always at the beginning of a word, if the text
 561             // is set over the ModifyHdl, although you're editing there at the moment
 562             if(pWordED->GetText() != sTmpShort)
 563                 pWordED->SetText(sTmpShort);
 564             pReplaceED->SetText(pBox->GetEntryText(pEntry, 1));
 565         }
 566         else
 567             bFirstSelect = false;
 568
 569         // entries in the list box should exactly correspond to those from the
 570         // dictionary. Thus:
 571         pNewReplacePB->Enable(false);
 572         pDeletePB->Enable( true && !IsDicReadonly_Impl() );
 573     }
 574     return 0;
 575 };
 576
 577
 578
 579 IMPL_LINK(SvxEditDictionaryDialog, NewDelHdl, PushButton*, pBtn)
 580 {
 581     SvTreeListEntry* pEntry = pWordsLB->FirstSelected();
 582
 583     if(pBtn == pDeletePB)
 584     {
 585         DBG_ASSERT(pEntry, "keine Eintrag selektiert");
 586         OUString aStr;
 587
 588         pWordED->SetText(aStr);
 589         pReplaceED->SetText(aStr);
 590         pDeletePB->Disable();
 591
 592         RemoveDictEntry(pEntry);    // remove entry from dic and list-box
 593     }
 594     if(pBtn == pNewReplacePB || pNewReplacePB->IsEnabled())
 595     {
 596         SvTreeListEntry* _pEntry = pWordsLB->FirstSelected();
 597         OUString aNewWord(pWordED->GetText());
 598         OUString sEntry(aNewWord);
 599         OUString aReplaceStr(pReplaceED->GetText());
 600
 601         sal_Int16 nAddRes = DIC_ERR_UNKNOWN;
 602         sal_Int32 nPos = pAllDictsLB->GetSelectEntryPos();
 603         if ( nPos != LISTBOX_ENTRY_NOTFOUND && !aNewWord.isEmpty())
 604         {
 605             DBG_ASSERT(nPos < aDics.getLength(), "invalid dictionary index");
 606             Reference< XDictionary >  xDic( aDics.getConstArray()[ nPos ], UNO_QUERY );
 607             if (xDic.is())
 608             {
 609                 // make changes in dic
 610
 611                 //! ...IsVisible should reflect whether the dictionary is a negativ
 612                 //! or not (hopefully...)
 613                 bool bIsNegEntry = pReplaceFT->IsVisible();
 614                 OUString aRplcText;
 615                 if(bIsNegEntry)
 616                     aRplcText = aReplaceStr;
 617
 618                 if (_pEntry) // entry selected in pWordsLB ie action = modify entry
 619                     xDic->remove( pWordsLB->GetEntryText( _pEntry, 0 ) );
 620                 // if remove has failed the following add should fail too
 621                 // and thus a warning message should be triggered...
 622
 623                 nAddRes = linguistic::AddEntryToDic( xDic,
 624                             aNewWord, bIsNegEntry,
 625                             aRplcText, LanguageTag( xDic->getLocale() ).getLanguageType(), false );
 626              }
 627         }
 628         if (DIC_ERR_NONE != nAddRes)
 629             SvxDicError( this, nAddRes );
 630
 631         if(DIC_ERR_NONE == nAddRes && !sEntry.isEmpty())
 632         {
 633             // insert new entry in list-box etc...
 634
 635             pWordsLB->SetUpdateMode(false);
 636             sal_uLong _nPos = TREELIST_ENTRY_NOTFOUND;
 637
 638             if(pReplaceFT->IsVisible())
 639             {
 640                 sEntry += "\t";
 641                 sEntry += aReplaceStr;
 642             }
 643
 644             SvTreeListEntry* pNewEntry = NULL;
 645             if(_pEntry) // entry selected in pWordsLB ie action = modify entry
 646             {
 647                 pWordsLB->SetEntryText( sEntry, _pEntry );
 648                 pNewEntry = _pEntry;
 649             }
 650             else
 651             {
 652                 _nPos = GetLBInsertPos( aNewWord );
 653                 SvTreeListEntry* pInsEntry = pWordsLB->InsertEntry(sEntry, 0, false,
 654                             _nPos == TREELIST_ENTRY_NOTFOUND ? TREELIST_APPEND : _nPos);
 655                 pNewEntry = pInsEntry;
 656             }
 657
 658             pWordsLB->MakeVisible( pNewEntry );
 659             pWordsLB->SetUpdateMode(true);
 660             // if the request came from the ReplaceEdit, give focus to the ShortEdit
 661             if(pReplaceED->HasFocus())
 662                 pWordED->GrabFocus();
 663         }
 664     }
 665     else
 666     {
 667         // this can only be an enter in one of the two edit fields
 668         // which means EndDialog() - has to be evaluated in KeyInput
 669         return 0;
 670     }
 671     ModifyHdl(pWordED);
 672     return 1;
 673 }
 674
 675
 676
 677 IMPL_LINK(SvxEditDictionaryDialog, ModifyHdl, Edit*, pEdt)
 678 {
 679     SvTreeListEntry* pFirstSel = pWordsLB->FirstSelected();
 680     OUString rEntry = pEdt->GetText();
 681
 682     sal_Int32 nWordLen = rEntry.getLength();
 683     const OUString& rRepString = pReplaceED->GetText();
 684
 685     bool bEnableNewReplace  = false;
 686     bool bEnableDelete      = false;
 687     OUString aNewReplaceText  = sNew;
 688
 689     if(pEdt == pWordED)
 690     {
 691         if(nWordLen>0)
 692         {
 693             bool bFound = false;
 694             bool bTmpSelEntry=false;
 695             CDE_RESULT eCmpRes = CDE_DIFFERENT;
 696
 697             for(sal_uLong i = 0; i < pWordsLB->GetEntryCount(); i++)
 698             {
 699                 SvTreeListEntry*  pEntry = pWordsLB->GetEntry( i );
 700                 OUString aTestStr( pWordsLB->GetEntryText(pEntry, 0) );
 701                 eCmpRes = cmpDicEntry_Impl( rEntry, aTestStr );
 702                 if(CDE_DIFFERENT != eCmpRes)
 703                 {
 704                     if(!rRepString.isEmpty())
 705                         bFirstSelect = true;
 706                     bDoNothing=true;
 707                     pWordsLB->SetCurEntry(pEntry);
 708                     bDoNothing=false;
 709                     pFirstSel = pEntry;
 710                     pReplaceED->SetText(pWordsLB->GetEntryText(pEntry, 1));
 711
 712                     if (CDE_SIMILAR == eCmpRes)
 713                     {
 714                         aNewReplaceText = sModify;
 715                         bEnableNewReplace = true;
 716                     }
 717                     bFound= true;
 718                     break;
 719                 }
 720                 else if(getNormDicEntry_Impl(aTestStr).indexOf(
 721                             getNormDicEntry_Impl( rEntry ) ) == 0
 722                         && !bTmpSelEntry)
 723                 {
 724                     bDoNothing=true;
 725                     pWordsLB->MakeVisible(pEntry);
 726                     bDoNothing=false;
 727                     bTmpSelEntry=true;
 728
 729                     aNewReplaceText = sNew;
 730                     bEnableNewReplace = true;
 731                 }
 732             }
 733
 734             if(!bFound)
 735             {
 736                 pWordsLB->SelectAll(false);
 737                 pFirstSel = 0;
 738
 739                 aNewReplaceText = sNew;
 740                 bEnableNewReplace = true;
 741             }
 742             bEnableDelete = CDE_DIFFERENT != eCmpRes;
 743         }
 744         else if(pWordsLB->GetEntryCount()>0)
 745         {
 746             SvTreeListEntry*  pEntry = pWordsLB->GetEntry( 0 );
 747             bDoNothing=true;
 748             pWordsLB->MakeVisible(pEntry);
 749             bDoNothing=false;
 750         }
 751     }
 752     else if(pEdt == pReplaceED)
 753     {
 754         OUString aReplaceText;
 755         OUString aWordText;
 756         if (pFirstSel)  // a pWordsLB entry is selected
 757         {
 758             aWordText    = pWordsLB->GetEntryText( pFirstSel, 0 );
 759             aReplaceText = pWordsLB->GetEntryText( pFirstSel, 1 );
 760
 761             aNewReplaceText = sModify;
 762             bEnableDelete = true;
 763         }
 764         bool bIsChange =
 765                 CDE_EQUAL != cmpDicEntry_Impl(pWordED->GetText(), aWordText)
 766              || CDE_EQUAL != cmpDicEntry_Impl(pReplaceED->GetText(), aReplaceText);
 767         if (!pWordED->GetText().isEmpty()  &&  bIsChange)
 768             bEnableNewReplace = true;
 769     }
 770
 771     pNewReplacePB->SetText( aNewReplaceText );
 772     pNewReplacePB->Enable( bEnableNewReplace && !IsDicReadonly_Impl() );
 773     pDeletePB->Enable( bEnableDelete     && !IsDicReadonly_Impl() );
 774
 775     return 0;
 776 }
 777
 778
 779 //SvxDictEdit
 780
 781 void SvxDictEdit::KeyInput( const KeyEvent& rKEvt )
 782 {
 783     const KeyCode aKeyCode = rKEvt.GetKeyCode();
 784     const sal_uInt16 nModifier = aKeyCode.GetModifier();
 785     if( aKeyCode.GetCode() == KEY_RETURN )
 786     {
 787         // if there's nothing done on enter, call the
 788         // base class after all to close the dialog
 789         if(!nModifier && !aActionLink.Call(this))
 790                  Edit::KeyInput(rKEvt);
 791     }
 792     else if(bSpaces || aKeyCode.GetCode() != KEY_SPACE)
 793         Edit::KeyInput(rKEvt);
 794 }
 795
 796
 797 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */