INTEGRATION: CWS dialogdiet (1.1.2); FILE ADDED

2004/01/21 18:16:23 mba 1.1.2.2: file was changed in old place
2004/01/17 03:30:39 mwu 1.1.2.1: DialogDiet 2004_01_17

1 files changed, 1849 insertions, 0 deletions

diff --git a/svx/source/dialog/optinet2.cxx b/svx/source/dialog/optinet2.cxx
new file mode 100644
index 000000000000..1a3431554b67
--- /dev/null
+++ b/svx/source/dialog/optinet2.cxx
@@ -0,0 +1,1849 @@
+/*************************************************************************
+ *
+ *  $RCSfile: optinet2.cxx,v $
+ *
+ *  $Revision: 1.2 $
+ *
+ *  last change: $Author: hr $ $Date: 2004-02-03 18:45:24 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#pragma hdrstop
+
+// include ---------------------------------------------------------------
+
+#ifndef _SHL_HXX
+#include <tools/shl.hxx>
+#endif
+#ifndef _CONFIG_HXX
+#include <tools/config.hxx>
+#endif
+#ifndef _SV_MSGBOX_HXX //autogen
+#include <vcl/msgbox.hxx>
+#endif
+#ifndef _SFXINTITEM_HXX //autogen
+#include <svtools/intitem.hxx>
+#endif
+#ifndef _SFXSTRITEM_HXX //autogen
+#include <svtools/stritem.hxx>
+#endif
+#ifndef _SFXENUMITEM_HXX //autogen
+#include <svtools/eitem.hxx>
+#endif
+#ifndef _SFXSLSTITM_HXX //autogen
+#include <svtools/slstitm.hxx>
+#endif
+#ifndef _SFX_FCONTNR_HXX //autogen
+#include <sfx2/fcontnr.hxx>
+#endif
+#ifndef _SFXDISPATCH_HXX //autogen
+#include <sfx2/dispatch.hxx>
+#endif
+#ifndef _SFX_DOCFILT_HACK_HXX //autogen
+#include <sfx2/docfilt.hxx>
+#endif
+#ifndef _SFXSIDS_HRC
+#include <sfx2/sfxsids.hrc>
+#endif
+#ifndef _TOOLS_INETDEF_HXX
+#include <tools/inetdef.hxx>
+#endif
+#ifndef SVTOOLS_URIHELPER_HXX
+#include <svtools/urihelper.hxx>
+#endif
+
+#ifndef _CNTWIDS_HRC
+#include <svtools/cntwids.hrc>
+#endif
+#ifndef _SVTOOLS_INETOPTIONS_HXX_
+#include <svtools/inetoptions.hxx>
+#endif
+#ifndef _SV_SVAPP_HXX
+#include <sfx2/app.hxx>
+#endif
+#ifndef _UTL_BOOTSTRAP_HXX
+#include <unotools/bootstrap.hxx>
+#endif
+#ifndef _SV_HELP_HXX
+#include <vcl/help.hxx>
+#endif
+
+#ifndef _SFXVIEWFRM_HXX
+#include <sfx2/viewfrm.hxx>
+#endif
+#ifndef _URLOBJ_HXX
+#include <tools/urlobj.hxx>
+#endif
+#ifndef INCLUDED_SVTOOLS_PATHOPTIONS_HXX
+#include <svtools/pathoptions.hxx>
+#endif
+#ifndef _SVTOOLS_JAVAPTIONS_HXX
+#include <svtools/javaoptions.hxx>
+#endif
+#ifndef _UNOTOOLS_LOCALFILEHELPER_HXX
+#include <unotools/localfilehelper.hxx>
+#endif
+
+#ifndef INCLUDED_SVTOOLS_EXTENDEDSECURITYOPTIONS_HXX
+#include <svtools/extendedsecurityoptions.hxx>
+#endif
+
+#define _SVX_OPTINET2_CXX
+
+#ifndef _SVX_DIALMGR_HXX
+#include "dialmgr.hxx"
+#endif
+#ifndef _SVX_OPTINET_HXX
+#include "optinet2.hxx"
+#endif
+//CHINA001 #ifndef _SVX_MULTIFIL_HXX
+//CHINA001 #include "multifil.hxx"
+//CHINA001 #endif
+#include "svxdlg.hxx" //CHINA001
+#ifndef _SVX_DIALOGS_HRC
+#include "dialogs.hrc"
+#endif
+#ifndef _SVX_OPTINET_HRC
+#include "optinet2.hrc"
+#endif
+#ifndef _SVX_HELPID_HRC
+#include "helpid.hrc"
+#endif
+//CHINA001 copy from multipat.hxx begin
+// define ----------------------------------------------------------------
+
+// different delimiter for Unix (:) and Windows (;)
+
+#ifdef UNX
+#define CLASSPATH_DELIMITER ':'
+#else
+#define CLASSPATH_DELIMITER ';'
+#endif
+//CHINA001 copy from multipat.hxx end
+// static ----------------------------------------------------------------
+
+#define INET_SEARCH_TOKEN   '"'
+#define RET_ALL             ((short)200)
+#define CFG_READONLY_DEFAULT    FALSE
+
+SV_IMPL_PTRARR( SfxFilterPtrArr, SfxFilterPtr )
+
+const char* SEARCHENGINE_INI    = "srcheng.ini";
+const char* SEARCHENGINE_GROUP  = "SearchEngines-$(vlang)";
+
+// -----------------------------------------------------------------------
+
+String lcl_MakeTabEntry(const SfxFilter* pFilter)
+{
+    String sEntry(pFilter->GetMimeType());
+    sEntry += '\t';
+    sEntry += pFilter->GetWildcard().GetWildCard();
+    sEntry += '\t';
+    sEntry += pFilter->GetName();
+#if defined(OS2) || defined(MAC)
+    sEntry += '\t';
+    sEntry += pFilter->GetTypeName();
+#endif
+    return sEntry;
+}
+
+// -----------------------------------------------------------------------
+
+BOOL IsJavaInstalled_Impl( /*!!!SfxIniManager* pIniMgr*/ )
+{
+    BOOL bRet = FALSE;
+/*!!! (pb) needs new implementation
+    String aIniEntry;
+    String aFullName = Config::GetConfigName( pIniMgr->Get( SFX_KEY_USERCONFIG_PATH ),
+                                              String::CreateFromAscii("java") );
+    INetURLObject aIniFileObj( aFullName, INET_PROT_FILE );
+    String aIniPath = aIniFileObj.getName();
+    if ( pIniMgr->SearchFile( aIniPath ) )
+    {
+        Config aJavaCfg( aIniPath );
+        aJavaCfg.SetGroup( "Java" );
+        ByteString sTemp = aJavaCfg.ReadKey( ByteString(::rtl::OUStringToOString(pIniMgr->GetKeyName( SFX_KEY_JAVA_SYSTEMCLASSPATH ),RTL_TEXTENCODING_UTF8)) );
+        String aJavaSystemClassPath = ::rtl::OStringToOUString(sTemp,RTL_TEXTENCODING_UTF8);
+        String aJavaRuntimeLib = ::rtl::OStringToOUString(aJavaCfg.ReadKey( "RuntimeLib" ),RTL_TEXTENCODING_UTF8);
+        if ( aJavaSystemClassPath.Len() && aJavaRuntimeLib.Len() )
+            bRet = TRUE;
+    }
+*/
+    return bRet;
+}
+
+// -----------------------------------------------------------------------
+
+void SvxNoSpaceEdit::KeyInput( const KeyEvent& rKEvent )
+{
+    if ( bOnlyNumeric )
+    {
+        const KeyCode& rKeyCode = rKEvent.GetKeyCode();
+        USHORT nGroup = rKeyCode.GetGroup();
+        USHORT nKey = rKeyCode.GetCode();
+        BOOL bValid = ( KEYGROUP_NUM == nGroup || KEYGROUP_CURSOR == nGroup ||
+                        ( KEYGROUP_MISC == nGroup && ( nKey < KEY_ADD || nKey > KEY_EQUAL ) ) );
+        if ( !bValid && ( rKeyCode.IsMod1() && (
+             KEY_A == nKey || KEY_C == nKey || KEY_V == nKey || KEY_X == nKey || KEY_Z == nKey ) ) )
+            // Erase, Copy, Paste, Select All und Undo soll funktionieren
+            bValid = TRUE;
+
+        if ( bValid )
+            Edit::KeyInput(rKEvent);
+    }
+    else if( rKEvent.GetKeyCode().GetCode() != KEY_SPACE )
+        Edit::KeyInput(rKEvent);
+}
+
+// -----------------------------------------------------------------------
+
+void SvxNoSpaceEdit::Modify()
+{
+    Edit::Modify();
+
+    if ( bOnlyNumeric )
+    {
+        XubString aValue = GetText();
+
+        if ( !ByteString(::rtl::OUStringToOString(aValue,RTL_TEXTENCODING_UTF8)).IsNumericAscii() || (long)aValue.ToInt32() > USHRT_MAX )
+            // der H�chstwert einer Portnummer ist USHRT_MAX
+            ErrorBox( this, SVX_RES( RID_SVXERR_OPT_PROXYPORTS ) ).Execute();
+    }
+}
+
+/********************************************************************/
+/********************************************************************/
+/*                                                                  */
+/*  SvxProxyTabPage                                                 */
+/*                                                                  */
+/*                                                                  */
+/********************************************************************/
+/********************************************************************/
+
+SvxProxyTabPage::SvxProxyTabPage(Window* pParent, const SfxItemSet& rSet ) :
+    SfxTabPage( pParent, ResId( RID_SVXPAGE_INET_PROXY, DIALOG_MGR() ), rSet ),
+    aOptionGB   (this, ResId(GB_SETTINGS)),
+
+    aProxyModeFT  (this, ResId(FT_PROXYMODE)),
+    aProxyModeLB  (this, ResId(LB_PROXYMODE)),
+
+    aHttpProxyFT      (this, ResId( FT_HTTP_PROXY     )),
+    aHttpProxyED      (this, ResId( ED_HTTP_PROXY     )),
+    aHttpPortFT       (this, ResId( FT_HTTP_PORT      )),
+    aHttpPortED       (this, ResId( ED_HTTP_PORT      ), TRUE),
+
+    aFtpProxyFT       (this, ResId( FT_FTP_PROXY      )),
+    aFtpProxyED       (this, ResId( ED_FTP_PROXY      )),
+    aFtpPortFT        (this, ResId( FT_FTP_PORT       )),
+    aFtpPortED        (this, ResId( ED_FTP_PORT       ), TRUE),
+
+//  aSocksProxyFT     (this, ResId( FT_SOCKS_PROXY    )),
+//  aSocksProxyED     (this, ResId( ED_SOCKS_PROXY    )),
+//  aSocksPortFT      (this, ResId( FT_SOCKS_PORT     )),
+//  aSocksPortED      (this, ResId( ED_SOCKS_PORT     ), TRUE),
+
+    aNoProxyForFT     (this, ResId( FT_NOPROXYFOR     )),
+    aNoProxyForED     (this, ResId( ED_NOPROXYFOR     )),
+    aNoProxyDescFT    (this, ResId( ED_NOPROXYDESC    )),
+//     aDNSGB              ( this, ResId( GB_DNS ) ),
+//  aDNSAutoRB          ( this, ResId( RB_DNS_AUTO ) ),
+//  aDNSManualRB        ( this, ResId( RB_DNS_MANUAL ) ),
+//  aDNSED              ( this, ResId( ED_DNS ) ),
+    sMsg255_0           (       ResId( ST_MSG_255_0 ) ),
+    sMsg255_1           (       ResId( ST_MSG_255_1 ) ),
+    sFromBrowser        (       ResId( ST_PROXY_FROM_BROWSER ) )
+{
+    FreeResource();
+
+    aHttpPortED.SetMaxTextLen(5);
+    aFtpPortED.SetMaxTextLen(5);
+//  aSocksPortED.SetMaxTextLen(5);
+    Link aLink = LINK( this, SvxProxyTabPage, LoseFocusHdl_Impl );
+    aHttpPortED.SetLoseFocusHdl( aLink );
+    aFtpPortED.SetLoseFocusHdl( aLink );
+//  aSocksPortED.SetLoseFocusHdl( aLink );
+
+    aProxyModeLB.SetSelectHdl(LINK( this, SvxProxyTabPage, ProxyHdl_Impl ));
+//     aDNSED.SelectFixedFont();
+//  aDNSED.SetFormatFlags(PATTERN_FORMAT_EMPTYLITERALS);
+//     aDNSAutoRB.SetClickHdl( LINK(this, SvxProxyTabPage, AutoDNSHdl_Impl) );
+//     aDNSManualRB.SetClickHdl( LINK(this, SvxProxyTabPage, AutoDNSHdl_Impl) );
+
+    if(SfxApplication::IsPlugin())
+    {
+        aProxyModeLB.InsertEntry(sFromBrowser);
+        aFtpProxyFT.Show(FALSE);
+        aFtpProxyED.Show(FALSE);
+        aFtpPortFT.Show(FALSE);
+        aFtpPortED.Show(FALSE);
+
+//#105461# obsolet entries
+//         aSocksProxyFT.Show(FALSE);
+//         aSocksProxyED.Show(FALSE);
+//         aSocksPortFT.Show(FALSE);
+//         aSocksPortED.Show(FALSE);
+
+        aNoProxyForFT.Show(FALSE);
+        aNoProxyForED.Show(FALSE);
+        aNoProxyDescFT.Show(FALSE);
+
+//#105461# obsolet entries
+//         aDNSGB.Show(FALSE);
+//         aDNSAutoRB.Show(FALSE);
+//         aDNSManualRB.Show(FALSE);
+//         aDNSED.Show(FALSE);
+    }
+}
+
+/*-----------------12.08.96 14.55-------------------
+
+--------------------------------------------------*/
+
+SvxProxyTabPage::~SvxProxyTabPage()
+{
+}
+
+/*-----------------12.08.96 14.55-------------------
+
+--------------------------------------------------*/
+
+SfxTabPage* SvxProxyTabPage::Create(Window* pParent, const SfxItemSet& rAttrSet )
+{
+    return new SvxProxyTabPage(pParent, rAttrSet);
+}
+
+/*-----------------12.08.96 14.55-------------------
+
+--------------------------------------------------*/
+
+void SvxProxyTabPage::Reset(const SfxItemSet&)
+{
+    SfxItemState      eItemState = SFX_ITEM_UNKNOWN;
+    const SfxItemSet&       rSet = GetItemSet();
+    const SfxPoolItem*      pAttr = NULL;
+    for ( USHORT i = SID_INET_PROXY_TYPE; i <= SID_INET_SECURITY_PROXY_PORT; ++i  )
+    {
+        USHORT nWhich = GetWhich(i);
+        eItemState = rSet.GetItemState( nWhich, FALSE, (const SfxPoolItem**)&pAttr );
+
+        if ( eItemState != SFX_ITEM_SET )
+            pAttr = NULL;
+
+        switch ( i )
+        {
+            case SID_INET_PROXY_TYPE:
+            {
+                DBG_ASSERT( !pAttr || pAttr->ISA(SfxUInt16Item), "UInt16Item erwartet" );
+                //none == 0, manual == 2 , automatic only in PluginMode
+                USHORT nProxy = pAttr ? ( (const SfxUInt16Item*)pAttr )->GetValue() : 0;
+                USHORT nPos = 0;
+                switch(nProxy)
+                {
+                    case SvtInetOptions::NONE:      nPos = 0; break;
+                    case SvtInetOptions::MANUAL:    nPos = 1; break;
+                    case SvtInetOptions::AUTOMATIC:
+                        nPos = aProxyModeLB.GetEntryCount() == 3 ? 2 : 0;
+                    break;
+                }
+                aProxyModeLB.SelectEntryPos( nPos );
+                BOOL bEnableProxyControls = nProxy == SvtInetOptions::MANUAL;
+                aProxyModeLB.SaveValue();
+                EnableControls_Impl( bEnableProxyControls );
+            }
+            break;
+
+            case SID_INET_HTTP_PROXY_NAME:
+                DBG_ASSERT( !pAttr || pAttr->ISA(SfxStringItem), "StringItem erwartet" );
+                if ( pAttr )
+                    aHttpProxyED.SetText( ( (const SfxStringItem*)pAttr )->GetValue() );
+                aHttpProxyED.SaveValue();
+            break;
+
+            case SID_INET_HTTP_PROXY_PORT:
+                DBG_ASSERT( !pAttr || pAttr->ISA(SfxInt32Item), "Int32Item erwartet" );
+                if ( pAttr )
+                    aHttpPortED.SetText(
+                        String::CreateFromInt32( ( (const SfxInt32Item*)pAttr )->GetValue() ) );
+                aHttpPortED.SaveValue();
+            break;
+
+            case SID_INET_FTP_PROXY_NAME:
+                DBG_ASSERT( !pAttr || pAttr->ISA(SfxStringItem), "StringItem erwartet" );
+                if ( pAttr )
+                    aFtpProxyED.SetText( ( (const SfxStringItem*)pAttr )->GetValue() );
+                aFtpProxyED.SaveValue();
+            break;
+
+            case SID_INET_FTP_PROXY_PORT:
+                DBG_ASSERT( !pAttr || pAttr->ISA(SfxInt32Item), "Int32Item erwartet" );
+                if ( pAttr )
+                    aFtpPortED.SetText(
+                        String::CreateFromInt32( ( (const SfxInt32Item*)pAttr )->GetValue() ) );
+                aFtpPortED.SaveValue();
+            break;
+
+//#105461# obsolet entries
+//          case SID_INET_SOCKS_PROXY_NAME:
+//              DBG_ASSERT( !pAttr || pAttr->ISA(SfxStringItem), "StringItem erwartet" );
+//              if ( pAttr )
+//                  aSocksProxyED.SetText( ( (const SfxStringItem*)pAttr )->GetValue() );
+//              aSocksProxyED.SaveValue();
+//          break;
+
+//          case SID_INET_SOCKS_PROXY_PORT:
+//              DBG_ASSERT( !pAttr || pAttr->ISA(SfxInt32Item), "Int32Item erwartet" );
+//              if ( pAttr )
+//                  aSocksPortED.SetText(
+//                      String::CreateFromInt32( ( (const SfxInt32Item*)pAttr )->GetValue() ) );
+//              aSocksPortED.SaveValue();
+//          break;
+
+            case SID_INET_NOPROXY:
+                DBG_ASSERT( !pAttr || pAttr->ISA(SfxStringItem), "StringItem erwartet" );
+                if ( pAttr )
+                    aNoProxyForED.SetText( ( (const SfxStringItem*)pAttr )->GetValue() );
+                aNoProxyForED.SaveValue();
+            break;
+        }
+        pAttr = NULL;
+    }
+    // DNS Server
+//#105461# obsolet entries
+//     if( SFX_ITEM_SET == rSet.GetItemState(SID_INET_DNS_AUTO, FALSE, &pAttr) )
+//  {
+//         DBG_ASSERT(pAttr->ISA(SfxBoolItem), "SfxBoolItem erwartet");
+//         aDNSAutoRB.Check(((const SfxBoolItem*)pAttr)->GetValue());
+//  }
+//  aDNSAutoRB.SaveValue();
+//  if( aDNSAutoRB.IsChecked() )
+//  {
+//      aDNSManualRB.Check( FALSE );
+//      aDNSED.Enable( FALSE );
+//  }
+//  else
+//      aDNSManualRB.Check(TRUE);
+//     if( SFX_ITEM_SET == rSet.GetItemState(SID_INET_DNS_SERVER, FALSE, &pAttr) )
+//  {
+//         DBG_ASSERT(pAttr->ISA(SfxStringItem), "SfxStringItem erwartet");
+//         String sValue(((const SfxStringItem*)pAttr)->GetValue());
+//      USHORT nCount = sValue.GetTokenCount('.');
+//      // Format soll wieder an das PatternField angepasst werden
+//      for( USHORT i = 0; i < nCount; i++ )
+//      {
+//          String sPart(sValue.GetToken(i, '.'));
+//          while(sPart.Len() < 3)
+//              sPart.Insert(' ', 0);
+//          sValue.SetToken(i ,'.', sPart);
+//      }
+//      aDNSED.SetText(sValue);
+//  }
+//  if(!aDNSED.GetText().Len())
+//      aDNSED.SetText(aDNSED.GetLiteralMask());
+//  aDNSED.SaveValue();
+}
+
+/*-----------------12.08.96 16.34-------------------
+
+--------------------------------------------------*/
+
+BOOL SvxProxyTabPage::FillItemSet(SfxItemSet& rSet)
+{
+    BOOL bModified=FALSE;
+    USHORT nSelPos = aProxyModeLB.GetSelectEntryPos();
+    if(aProxyModeLB.GetSavedValue() != nSelPos)
+    {
+        USHORT nPut = 0;
+        switch(nSelPos)
+        {
+            case  0: nPut = SvtInetOptions::NONE;     break;
+            case  1: nPut = SvtInetOptions::MANUAL;   break;
+            case  2: nPut = SvtInetOptions::AUTOMATIC;break;
+        }
+        rSet.Put(SfxUInt16Item( SID_INET_PROXY_TYPE, nPut));
+        bModified = TRUE;
+    }
+    if(aHttpProxyED.GetSavedValue() != aHttpProxyED.GetText())
+    {
+        rSet.Put(SfxStringItem( SID_INET_HTTP_PROXY_NAME, aHttpProxyED.GetText()));
+        bModified = TRUE;
+    }
+
+    if ( aHttpPortED.GetSavedValue() != aHttpPortED.GetText() )
+    {
+        rSet.Put(SfxInt32Item(SID_INET_HTTP_PROXY_PORT, aHttpPortED.GetText().ToInt32()));
+        bModified = TRUE;
+    }
+    if(aFtpProxyED.GetSavedValue() != aFtpProxyED.GetText())
+    {
+        rSet.Put(SfxStringItem( SID_INET_FTP_PROXY_NAME, aFtpProxyED.GetText()));
+        bModified = TRUE;
+    }
+
+    if ( aFtpPortED.GetSavedValue() != aFtpPortED.GetText() )
+    {
+        rSet.Put(SfxInt32Item(SID_INET_FTP_PROXY_PORT, aFtpPortED.GetText().ToInt32()));
+        bModified = TRUE;
+    }
+//#105461# obsolet entries
+//  if(aSocksProxyED.GetSavedValue() != aSocksProxyED.GetText())
+//  {
+//      rSet.Put(SfxStringItem( SID_INET_SOCKS_PROXY_NAME, aSocksProxyED.GetText()));
+//      bModified = TRUE;
+//  }
+
+//  if ( aSocksPortED.GetSavedValue() != aSocksPortED.GetText() )
+//  {
+//      rSet.Put(SfxInt32Item(SID_INET_SOCKS_PROXY_PORT, aSocksPortED.GetText().ToInt32()));
+//      bModified = TRUE;
+//  }
+    if ( aNoProxyForED.GetSavedValue() != aNoProxyForED.GetText() )
+    {
+        rSet.Put(SfxStringItem(SID_INET_NOPROXY, aNoProxyForED.GetText()));
+        bModified = TRUE;
+    }
+//#105461# obsolet entries
+//     if ( aDNSManualRB.IsChecked() && aDNSED.IsModified() )
+//  {
+//      ErrorBox aErrBox( this, WB_OK, String() );
+//      String sEntry( aDNSED.GetText() );
+//      String sPart( sEntry.GetToken( 0, '.' ) );
+//      USHORT i, nPart( (USHORT)sPart.EraseLeadingChars().ToInt32() );
+//      BOOL bSet = FALSE;
+//      if ( sPart.Len() && ( !nPart || nPart > 255 ) )
+//      {
+//          // der erste Part darf nicht 0 und nicht gr"osser 255 sein
+//          XubString sMsg( sPart );
+//          sMsg += ' ';
+//          sMsg += sMsg255_1;
+//          aErrBox.SetMessText( sMsg );
+//          aErrBox.Execute();
+
+//          if ( nPart == 0 )
+//              sPart = String::CreateFromAscii("  1");
+//          else
+//              sPart = String::CreateFromAscii("255");
+//          sEntry.SetToken( 0, '.', sPart );
+//          bSet = TRUE;
+//      };
+
+//      for ( i = 1; i < 4; i++ )
+//      {
+//          // die anderen Parts d"urfen nicht gr"osser 255 sein
+//          sPart = sEntry.GetToken( i, '.' );
+//          nPart = (USHORT)sPart.EraseLeadingChars().ToInt32();
+
+//          if ( nPart > 255 )
+//          {
+//              String sMsg( sPart );
+//              sMsg += ' ';
+//              sMsg += sMsg255_0;
+//              aErrBox.SetMessText( sMsg );
+//              aErrBox.Execute();
+
+//              if ( nPart == 0 )
+//                  sPart = String::CreateFromAscii("  1");
+//              else
+//                  sPart = String::CreateFromAscii("255");
+//              sEntry.SetToken( i, '.', sPart );
+//              bSet = TRUE;
+//          };
+//      }
+
+//      if ( bSet )
+//      {
+//          aDNSED.GrabFocus();
+//          aDNSED.SetText( sEntry );
+//      }
+//  }
+
+    // DNS Server
+    // Flag muss auch geputtet werden, wenn sich nur der Wert im
+    // Edit geaendert hat
+//  BOOL bDNSModified = aDNSED.GetSavedValue() != aDNSED.GetText();
+//  if( bDNSModified || aDNSAutoRB.GetSavedValue() != aDNSAutoRB.IsChecked() )
+//  {
+//      rSet.Put( SfxBoolItem(SID_INET_DNS_AUTO, aDNSAutoRB.IsChecked()) );
+//      bModified = TRUE;
+//  }
+//  if( bDNSModified )
+//  {
+//      String sValue(aDNSED.GetText());
+//      sValue.EraseAllChars(' ');
+//      rSet.Put( SfxStringItem(SID_INET_DNS_SERVER, sValue) );
+//      bModified = TRUE;
+//  }
+    return bModified;
+}
+
+/*-----------------21.06.97 13.47-------------------
+
+--------------------------------------------------*/
+
+IMPL_LINK( SvxProxyTabPage, AutoDNSHdl_Impl, RadioButton*,  pBtn )
+{
+//#105461# obsolet entries
+//  if( pBtn == &aDNSAutoRB )
+//  {
+//      aDNSED.Enable( FALSE );
+//      aDNSManualRB.Check( FALSE );
+//  }
+//  else if( pBtn == &aDNSManualRB )
+//  {
+//      aDNSED.Enable( TRUE );
+//      aDNSED.GrabFocus();
+//      aDNSAutoRB.Check( FALSE );
+//  }
+    return 1;
+}
+/*-----------------12.08.96 13.38-------------------
+
+--------------------------------------------------*/
+void SvxProxyTabPage::EnableControls_Impl(BOOL bEnable)
+{
+    aHttpProxyFT.Enable(bEnable);
+    aHttpProxyED.Enable(bEnable);
+    aHttpPortFT.Enable(bEnable);
+    aHttpPortED.Enable(bEnable);
+
+    aFtpProxyFT.Enable(bEnable);
+    aFtpProxyED.Enable(bEnable);
+    aFtpPortFT.Enable(bEnable);
+    aFtpPortED.Enable(bEnable);
+
+//#105461# obsolet entries
+//  aSocksProxyFT.Enable(bEnable);
+//  aSocksProxyED.Enable(bEnable);
+//  aSocksPortFT.Enable(bEnable);
+//  aSocksPortED.Enable(bEnable);
+
+    aNoProxyForFT.Enable(bEnable);
+    aNoProxyForED.Enable(bEnable);
+    aNoProxyDescFT.Enable(bEnable);
+}
+
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxProxyTabPage, ProxyHdl_Impl, ListBox *, pBox )
+{
+    BOOL bEnableProxyControls = pBox->GetSelectEntryPos() == 1;
+    EnableControls_Impl(bEnableProxyControls);
+    return 0;
+}
+
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxProxyTabPage, LoseFocusHdl_Impl, Edit *, pEdit )
+{
+    XubString aValue = pEdit->GetText();
+
+    if ( !ByteString(::rtl::OUStringToOString(aValue,RTL_TEXTENCODING_UTF8)).IsNumericAscii() || (long)aValue.ToInt32() > USHRT_MAX )
+        pEdit->SetText( '0' );
+    return 0;
+}
+
+
+/********************************************************************/
+/********************************************************************/
+/*                                                                  */
+/*  SvxSearchTabPage                                                */
+/*                                                                  */
+/*                                                                  */
+/********************************************************************/
+/********************************************************************/
+
+SvxSearchTabPage::SvxSearchTabPage(Window* pParent, const SfxItemSet& rSet ) :
+
+    SfxTabPage( pParent, SVX_RES( RID_SVXPAGE_INET_SEARCH ), rSet ),
+
+    aSearchGB       ( this, ResId( GB_SEARCH ) ),
+    aSearchFT       ( this, ResId( FT_SEARCH ) ),
+    aSearchLB       ( this, ResId( LB_SEARCH ) ),
+    aSearchNameFT   ( this, ResId( FT_SEARCH_NAME ) ),
+    aSearchNameED   ( this, ResId( ED_SEARCH_NAME ) ),
+    aURLFT          ( this, ResId( FT_URL ) ),
+    aURLED          ( this, ResId( ED_URL ) ),
+    aAndRB          ( this, ResId( RB_AND ) ),
+    aOrRB           ( this, ResId( RB_OR ) ),
+    aExactRB        ( this, ResId( RB_EXACT ) ),
+    aSeparatorFT    ( this, ResId( FT_SEPARATOR ) ),
+    aSeparatorED    ( this, ResId( ED_SEPARATOR ) ),
+    aPostFixFT      ( this, ResId( FT_POSTFIX ) ),
+    aPostFixED      ( this, ResId( ED_POSTFIX ) ),
+    aCaseFT         ( this, ResId( FT_CASE ) ),
+    aCaseED         ( this, ResId( ED_CASE ) ),
+    aNewPB          ( this, ResId( PB_NEW ) ),
+    aAddPB          ( this, ResId( PB_ADD ) ),
+    aChangePB       ( this, ResId( PB_CHANGE ) ),
+    aDeletePB       ( this, ResId( PB_DELETE ) ),
+    sModifyMsg(ResId(MSG_MODIFY))
+{
+    FreeResource();
+    SetExchangeSupport();
+    aCaseED.SelectEntryPos(0); // falls kein Eintrag vorhanden ist, kann es sonst "Arger geben
+
+    aNewPB.SetClickHdl(LINK( this, SvxSearchTabPage, NewSearchHdl_Impl ) );
+    aAddPB.SetClickHdl(LINK( this, SvxSearchTabPage, AddSearchHdl_Impl ) );
+    aChangePB.SetClickHdl(LINK( this, SvxSearchTabPage, ChangeSearchHdl_Impl ) );
+    aDeletePB.SetClickHdl(LINK( this, SvxSearchTabPage, DeleteSearchHdl_Impl ) );
+    aSearchLB.SetSelectHdl(LINK( this, SvxSearchTabPage, SearchEntryHdl_Impl ) );
+
+    Link aLink = LINK( this, SvxSearchTabPage, SearchModifyHdl_Impl );
+    aSearchNameED.SetModifyHdl( aLink );
+    aURLED.SetModifyHdl( aLink );
+    aSeparatorED.SetModifyHdl( aLink );
+    aPostFixED.SetModifyHdl( aLink );
+    aCaseED.SetSelectHdl( aLink );
+
+    aLink = LINK( this, SvxSearchTabPage, SearchPartHdl_Impl );
+    aAndRB.SetClickHdl( aLink );
+    aOrRB.SetClickHdl( aLink );
+    aExactRB.SetClickHdl( aLink );
+}
+
+// -----------------------------------------------------------------------
+SvxSearchTabPage::~SvxSearchTabPage()
+{
+}
+// -----------------------------------------------------------------------
+
+SfxTabPage* SvxSearchTabPage::Create(Window* pParent, const SfxItemSet& rAttrSet )
+{
+    return new SvxSearchTabPage(pParent, rAttrSet);
+}
+
+// -----------------------------------------------------------------------
+
+void SvxSearchTabPage::Reset( const SfxItemSet& )
+{
+    //The two lines below are moved here from the last part of this method by BerryJia for fixing Bug102610 Time:2002-8-29 11:00 (China Standard Time GMT+08:00)
+    aChangePB.Disable();
+    aAddPB.Disable();
+
+    sal_uInt16 nCount = aSearchConfig.Count();
+    aSearchLB.Clear();  //add by BerryJia for fixing Bug102610 Time:2002-8-29 11:00 (China Standard Time GMT+08:00)
+    for(sal_uInt16 i = 0; i < nCount; i++)
+    {
+        const SvxSearchEngineData& rData = aSearchConfig.GetData(i);
+        aSearchLB.InsertEntry(rData.sEngineName);
+    }
+
+    if ( nCount )
+    {
+        aSearchLB.SelectEntryPos(0);
+        SearchEntryHdl_Impl( &aSearchLB );
+    }
+    else
+        aDeletePB.Disable();
+}
+
+// -----------------------------------------------------------------------
+
+BOOL SvxSearchTabPage::FillItemSet( SfxItemSet& rSet )
+{
+    if(aSearchConfig.IsModified())
+        aSearchConfig.Commit();
+    return TRUE;
+}
+/*--------------------------------------------------------------------*/
+
+void SvxSearchTabPage::ActivatePage( const SfxItemSet& rSet )
+{
+}
+
+/*--------------------------------------------------------------------*/
+
+int SvxSearchTabPage::DeactivatePage( SfxItemSet* pSet )
+{
+    //Modified by BerryJia for fixing Bug102610 Time:2002-8-29 11:00 (China Standard Time GMT+08:00)
+    if(!ConfirmLeave(String()))
+        return KEEP_PAGE;
+
+    if ( pSet )
+        FillItemSet( *pSet );
+    return LEAVE_PAGE;
+}
+
+// -----------------------------------------------------------------------
+
+//add by BerryJia for fixing Bug102610 Time:2002-8-29 11:00 (China Standard Time GMT+08:00)
+BOOL SvxSearchTabPage::ConfirmLeave( const String& rStringSelection)
+{
+    if(aChangePB.IsEnabled())
+    {
+        QueryBox aQuery(this, WB_YES_NO_CANCEL|WB_DEF_YES, sModifyMsg);
+        USHORT nRet = aQuery.Execute();
+        if(RET_CANCEL == nRet)
+        {
+            if(rStringSelection.Len())
+                aSearchLB.SelectEntry(sLastSelectedEntry);
+            return FALSE;
+        }
+        else if(RET_YES == nRet)
+        {
+            USHORT nEntryPos = aSearchLB.GetEntryPos( aSearchNameED.GetText() );
+            if ( nEntryPos != LISTBOX_ENTRY_NOTFOUND  )
+                aSearchLB.SelectEntryPos(nEntryPos);
+            else
+                aSearchLB.SetNoSelection();
+            ChangeSearchHdl_Impl(0);
+            if(rStringSelection.Len())
+                aSearchLB.SelectEntry(rStringSelection);
+        }
+        else if(RET_NO == nRet)
+        {
+            aChangePB.Enable(FALSE);
+            aAddPB.Enable(FALSE);
+            SearchEntryHdl_Impl(&aSearchLB);
+        }
+    }
+    if(aAddPB.IsEnabled())
+    {
+        QueryBox aQuery(this, WB_YES_NO_CANCEL|WB_DEF_YES, sModifyMsg);
+        USHORT nRet = aQuery.Execute();
+        if(RET_CANCEL == nRet)
+        {
+            aSearchLB.SetNoSelection();
+            return FALSE;
+        }
+        else if(RET_YES == nRet)
+        {
+            aSearchLB.SetNoSelection();
+            AddSearchHdl_Impl(0);
+            if(rStringSelection.Len())
+                aSearchLB.SelectEntry(rStringSelection);
+        }
+        else if(RET_NO == nRet)
+        {
+            aAddPB.Enable(FALSE);
+            aChangePB.Enable(FALSE);
+            NewSearchHdl_Impl(0);
+        }
+
+    }
+    return TRUE;
+}
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxSearchTabPage, NewSearchHdl_Impl, PushButton *, EMPTYARG )
+{
+    //The 3 lines below is modified by BerryJia for fixing Bug102610 Time:2002-8-29 11:00 (China Standard Time GMT+08:00)
+    SearchEntryHdl_Impl(&aSearchLB);
+    if(aChangePB.IsEnabled() || aAddPB.IsEnabled())
+        return 0;
+    aSearchNameED.SetText( String() );
+    aSearchLB.SetNoSelection();
+    aCurrentSrchData = SvxSearchEngineData();
+    aAndRB.Check( TRUE );
+    SearchEntryHdl_Impl( &aSearchLB );
+    SearchPartHdl_Impl( &aAndRB );
+    return 0;
+}
+
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxSearchTabPage, AddSearchHdl_Impl, PushButton *, EMPTYARG )
+{
+    //The following two lines is added by BerryJia for fixing Bug102610 Time:2002-8-29 11:00 (China Standard Time GMT+08:00)
+    aAddPB.Enable(FALSE);
+    aChangePB.Enable(FALSE);
+    aCurrentSrchData.sEngineName = aSearchNameED.GetText();
+    aSearchConfig.SetData(aCurrentSrchData);
+    aSearchLB.InsertEntry( aCurrentSrchData.sEngineName );
+    aSearchLB.SelectEntry( aCurrentSrchData.sEngineName );
+    SearchEntryHdl_Impl( &aSearchLB );
+    return 0;
+}
+
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxSearchTabPage, ChangeSearchHdl_Impl, PushButton *, EMPTYARG )
+{
+    //The following two lines is added by BerryJia for fixing Bug102610 Time:2002-8-29 11:00 (China Standard Time GMT+08:00)
+    aChangePB.Enable(FALSE);
+    aAddPB.Enable(FALSE);
+    USHORT nPos = aSearchLB.GetSelectEntryPos();
+    if ( nPos != LISTBOX_ENTRY_NOTFOUND )
+    {
+        String sEngine = aSearchLB.GetSelectEntry();
+        aCurrentSrchData.sEngineName = sEngine;
+        aSearchConfig.SetData(aCurrentSrchData);
+        aSearchLB.SelectEntry(sEngine);
+        SearchEntryHdl_Impl(&aSearchLB);
+    }
+    else
+    {
+        SetUpdateMode(FALSE);
+        String sEntry = aSearchNameED.GetText();
+        // im AddHdl wird sLastSelectedEntry umgesetzt
+        String sTemp(sLastSelectedEntry);
+        AddSearchHdl_Impl(0);
+        aSearchLB.SelectEntry(sTemp);
+        DeleteSearchHdl_Impl(0);
+        aSearchLB.SelectEntry(sEntry);
+        SearchEntryHdl_Impl(&aSearchLB);
+        SetUpdateMode(TRUE);
+    }
+    return 0;
+}
+
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxSearchTabPage, DeleteSearchHdl_Impl, PushButton *, EMPTYARG)
+{
+    aChangePB.Enable(FALSE);     //add by BerryJia for fixing Bug102610 Time:2002-8-29 11:00 (China Standard Time GMT+08:00)
+    USHORT nPos = aSearchLB.GetSelectEntryPos();
+    DBG_ASSERT(nPos != LISTBOX_ENTRY_NOTFOUND, "kein Eintrag selektiert!")
+    aSearchConfig.RemoveData(aSearchLB.GetSelectEntry());
+    aSearchLB.RemoveEntry(nPos);
+    aSearchLB.SelectEntryPos(0);
+    SearchEntryHdl_Impl(&aSearchLB);
+    return 0;
+}
+
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxSearchTabPage, SearchEntryHdl_Impl, ListBox*, pBox )
+{
+    USHORT nEntryPos = pBox->GetSelectEntryPos();
+    if ( nEntryPos != LISTBOX_ENTRY_NOTFOUND )
+    {
+        String sSelection(pBox->GetSelectEntry());
+        //Modified by BerryJia for fixing Bug102610 Time:2002-8-29 11:00 (China Standard Time GMT+08:00)
+        if(!ConfirmLeave(sSelection))
+            return 0;
+
+        const SvxSearchEngineData* pData = aSearchConfig.GetData(sSelection);
+        DBG_ASSERT(pData, "SearchEngine not available")
+        if(pData)
+        {
+            aSearchNameED.SetText(sSelection);
+            sLastSelectedEntry = sSelection;
+            sal_Bool bAnd = aAndRB.IsChecked();
+            sal_Bool bOr = aOrRB.IsChecked();
+
+            aURLED.SetText(bAnd ? pData->sAndPrefix : bOr ? pData->sOrPrefix : pData->sExactPrefix);
+            aSeparatorED.SetText( bAnd ? pData->sAndSeparator : bOr ? pData->sOrSeparator : pData->sExactSeparator);
+            aPostFixED.SetText(bAnd ? pData->sAndSuffix : bOr ? pData->sOrSuffix : pData->sExactSuffix );
+            sal_Int32 nCase = bAnd ? pData->nAndCaseMatch : bOr ? pData->nOrCaseMatch : pData->nExactCaseMatch;
+            aCaseED.SelectEntryPos( (USHORT)nCase );
+            aCurrentSrchData = *pData;
+        }
+        aDeletePB.Enable();
+    }
+    else
+    {
+        aDeletePB.Enable(FALSE);
+        sLastSelectedEntry.Erase();
+    }
+    aChangePB.Enable(FALSE);
+    aAddPB.Enable(FALSE);
+    return 0;
+}
+
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxSearchTabPage, SearchModifyHdl_Impl, SvxNoSpaceEdit*, pEdit )
+{
+    if ( pEdit == &aSearchNameED )
+    {
+        BOOL bTextLen = ( 0 != pEdit->GetText().Len() );
+        BOOL bFound = FALSE;
+        if ( bTextLen )
+        {
+            USHORT nEntryPos = aSearchLB.GetEntryPos( pEdit->GetText() );
+            bFound = ( nEntryPos != LISTBOX_ENTRY_NOTFOUND );
+            if ( bFound )
+                aSearchLB.SelectEntryPos(nEntryPos);
+            else
+                aSearchLB.SetNoSelection();
+        }
+        aChangePB.Enable( sLastSelectedEntry.Len() > 0 );
+        aDeletePB.Enable(bFound);
+        aAddPB.Enable(bTextLen && !bFound);
+    }
+    else
+    {
+        if ( aSearchLB.GetSelectEntryCount() && sLastSelectedEntry.Len() > 0 )
+            aChangePB.Enable();
+
+        if(aAndRB.IsChecked())
+        {
+            aCurrentSrchData.sAndPrefix = aURLED.GetText();
+            aCurrentSrchData.sAndSeparator = aSeparatorED.GetText();
+            aCurrentSrchData.sAndSuffix = aPostFixED.GetText();
+            aCurrentSrchData.nAndCaseMatch = aCaseED.GetSelectEntryPos();
+        }
+        else if(aOrRB.IsChecked())
+        {
+            aCurrentSrchData.sOrPrefix = aURLED.GetText();
+            aCurrentSrchData.sOrSeparator = aSeparatorED.GetText();
+            aCurrentSrchData.sOrSuffix = aPostFixED.GetText();
+            aCurrentSrchData.nOrCaseMatch = aCaseED.GetSelectEntryPos();
+        }
+        else
+        {
+            aCurrentSrchData.sExactPrefix = aURLED.GetText();
+            aCurrentSrchData.sExactSeparator = aSeparatorED.GetText();
+            aCurrentSrchData.sExactSuffix = aPostFixED.GetText();
+            aCurrentSrchData.nExactCaseMatch = aCaseED.GetSelectEntryPos();
+        }
+    }
+    return 0;
+}
+
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxSearchTabPage, SearchPartHdl_Impl, RadioButton *, pButton )
+{
+    sal_Bool bAnd = aAndRB.IsChecked();
+    sal_Bool bOr = aOrRB.IsChecked();
+
+    aURLED.SetText(bAnd ? aCurrentSrchData.sAndPrefix : bOr ? aCurrentSrchData.sOrPrefix : aCurrentSrchData.sExactPrefix);
+    aSeparatorED.SetText( bAnd ? aCurrentSrchData.sAndSeparator : bOr ? aCurrentSrchData.sOrSeparator : aCurrentSrchData.sExactSeparator);
+    aPostFixED.SetText(bAnd ? aCurrentSrchData.sAndSuffix : bOr ? aCurrentSrchData.sOrSuffix : aCurrentSrchData.sExactSuffix );
+    sal_Int32 nCase = bAnd ? aCurrentSrchData.nAndCaseMatch : bOr ? aCurrentSrchData.nOrCaseMatch : aCurrentSrchData.nExactCaseMatch;
+    aCaseED.SelectEntryPos( (USHORT)nCase );
+    return 0;
+}
+
+// -----------------------------------------------------------------------
+
+/********************************************************************/
+/********************************************************************/
+/*                                                                  */
+/*  SvxOtherTabPage                                                 */
+/*                                                                  */
+/********************************************************************/
+/********************************************************************/
+
+/*-----------------15.05.97 09:51-------------------
+
+--------------------------------------------------*/
+/*
+SvxPatternField::SvxPatternField( Window* pParent, const ResId& rResId ) :
+
+    PatternField( pParent, rResId ),
+
+    sMsg233 ( ResId( ST_MSG_233 ) ),
+    sMsg255 ( ResId( ST_MSG_255 ) )
+
+{
+    FreeResource();
+    SelectFixedFont();
+} */
+
+/*-----------------15.05.97 09:51-------------------
+
+--------------------------------------------------*/
+
+/*void SvxPatternField::KeyInput( const KeyEvent& rKEvt )
+{
+    PatternField::KeyInput( rKEvt );
+    BOOL bDelete = ( rKEvt.GetKeyCode().GetCode() == KEY_DELETE );
+    String sEntry( GetText() );
+    sEntry[(USHORT)3] = '.';
+    sEntry[(USHORT)7] = '.';
+    sEntry[(USHORT)11] = '.';
+    Selection aSelection( GetSelection() );
+    String sPart( sEntry.GetToken( 0, '.' ) );
+    USHORT i, nPart( sPart.EraseLeadingChars() );
+    BOOL bSet = FALSE;
+
+    if ( sPart.Len() && ( !nPart || nPart > 255 ) )
+    {
+        // der erste Part darf nicht 0 und nicht gr"osser 255 sein
+        String sMsg( sPart );
+        sMsg += ' ';
+        sMsg += sMsg233;
+        InfoBox( this, sMsg ).Execute();
+
+        if ( nPart == 0 )
+            sPart = "  1";
+        else
+            sPart = "255";
+        sEntry.SetToken( 0, '.', sPart );
+        bSet = TRUE;
+    };
+
+    for ( i = 1; i < 4; i++ )
+    {
+        // die anderen Parts d"urfen nicht gr"osser 255 sein
+        sPart = sEntry.GetToken( i, '.' );
+        nPart = sPart.EraseLeadingChars();
+
+        if ( nPart > 255 )
+        {
+            String sMsg( sPart );
+            sMsg += ' ';
+            sMsg += sMsg255;
+            InfoBox( this, sMsg ).Execute();
+
+            if ( nPart == 0 )
+                sPart = "  1";
+            else
+                sPart = "255";
+            sEntry.SetToken( i, '.', sPart );
+            bSet = TRUE;
+        };
+    }
+
+    if ( bSet )
+    {
+        SetText( sEntry );
+        SetSelection( aSelection );
+    }
+}
+*/
+// -----------------------------------------------------------------------
+#if 0
+long SvxPatternField::Notify( NotifyEvent& rNEvt )
+{
+    return PatternField::Notify( rNEvt );
+/*! long nHandled = 0;
+
+    if ( rNEvt.GetType() == EVENT_KEYUP )
+    {
+        const KeyEvent* pKEvt = rNEvt.GetKeyEvent();
+        KeyInput( *pKEvt );
+        nHandled = 1;
+    }
+    return nHandled;*/
+}
+#endif
+
+// class JavaScriptDisableQueryBox_Impl --------------------------------------
+
+class JavaScriptDisableQueryBox_Impl : public ModalDialog
+{
+private:
+    FixedImage      aImage;
+    FixedText       aWarningFT;
+    CheckBox        aDisableCB;
+    OKButton        aYesBtn;
+    CancelButton    aNoBtn;
+
+public:
+    JavaScriptDisableQueryBox_Impl( Window* pParent );
+
+    BOOL        IsWarningDisabled() const { return aDisableCB.IsChecked(); }
+};
+
+JavaScriptDisableQueryBox_Impl::JavaScriptDisableQueryBox_Impl( Window* pParent ) :
+
+    ModalDialog( pParent, SVX_RES( RID_SVXDLG_OPT_JAVASCRIPT_DISABLE ) ),
+
+    aImage      ( this, ResId( IMG_JSCPT_WARNING ) ),
+    aWarningFT  ( this, ResId( FT_JSCPT_WARNING ) ),
+    aDisableCB  ( this, ResId( CB_JSCPT_DISABLE ) ),
+    aYesBtn     ( this, ResId( BTN_JSCPT_YES ) ),
+    aNoBtn      ( this, ResId( BTN_JSCPT_NO ) )
+
+{
+    FreeResource();
+
+    aYesBtn.SetText( Button::GetStandardText( BUTTON_YES ) );
+    aNoBtn.SetText( Button::GetStandardText( BUTTON_NO ) );
+    aImage.SetImage( WarningBox::GetStandardImage() );
+}
+
+//#98647#----------------------------------------------
+void SvxScriptExecListBox::RequestHelp( const HelpEvent& rHEvt )
+{   // try to show tips just like as on toolbars
+    USHORT nPos=LISTBOX_ENTRY_NOTFOUND;
+    USHORT nTop = GetTopEntry();
+    USHORT nCount = GetDisplayLineCount(); // Attention: Not GetLineCount()
+    Point aPt = ScreenToOutputPixel( rHEvt.GetMousePosPixel() );
+    Rectangle aItemRect;
+    if( nCount > 0 ) // if there're some entries, find it.
+         for( nPos = nTop ; nPos <= nTop+nCount-1 ; nPos++ ) {
+            aItemRect = GetBoundingRectangle(nPos);
+            if( aPt.Y() < aItemRect.Top() || aPt.Y() > aItemRect.Bottom() )
+                continue;
+            else
+                break;
+        }
+     else // if not, nothing happens.
+         return;
+     String aHelpText;
+     if( nPos <= nTop+nCount-1 ) // if find the matching entry, get its content.
+         aHelpText = GetEntry(nPos);
+    if( aHelpText.Len() && GetTextWidth(aHelpText)<GetOutputSizePixel().Width() )
+        aHelpText.Erase(); // if the entry is quite short, clear the helping tip content.
+    aItemRect = Rectangle(Point(0,0),GetSizePixel());
+    aPt = Point(OutputToScreenPixel( aItemRect.TopLeft() ));
+    aItemRect.Left()   = aPt.X();
+    aItemRect.Top()    = aPt.Y();
+    aPt = OutputToScreenPixel( aItemRect.BottomRight() );
+    aItemRect.Right()  = aPt.X();
+    aItemRect.Bottom() = aPt.Y();
+    if( rHEvt.GetMode() == HELPMODE_BALLOON )
+        Help::ShowBalloon( this, aItemRect.Center(), aItemRect, aHelpText);
+    else
+        Help::ShowQuickHelp( this, aItemRect, aHelpText );
+}
+
+/********************************************************************/
+/*                                                                  */
+/*  SvxScriptingTabPage                                             */
+/*                                                                  */
+/********************************************************************/
+
+SvxScriptingTabPage::SvxScriptingTabPage( Window* pParent, const SfxItemSet& rSet ) :
+
+    SfxTabPage( pParent, SVX_RES( RID_SVXPAGE_INET_SCRIPTING ), rSet ),
+
+    aGrpScriptingStarBasic  ( this, ResId( GB_STARBASIC ) ),
+    aExecMacroFT            ( this, ResId( FT_EXEC_MACRO ) ),
+    aExecMacroLB            ( this, ResId( LB_EXEC_MACRO ) ),
+    aConfirmCB              ( this, ResId( CB_CONFIRM ) ),
+    aWarningCB              ( this, ResId( CB_WARNING ) ),
+    aPathListFT             ( this, ResId( FT_PATH_LIST ) ),
+    aLbScriptExec           ( this, ResId( LB_SCRIPT_EXEC ) ),
+    aBtnScriptExecDelete    ( this, ResId( PB_SCRIPT_DELETE ) ),
+    aBtnScriptExecDefault   ( this, ResId( PB_SCRIPT_DEFAULT ) ),
+    aNewPathFT              ( this, ResId( FT_NEW_PATH ) ),
+    aEdtScriptExec          ( this, ResId( ED_SCRIPT_EXEC ) ),
+    aBtnScriptExecInsert    ( this, ResId( PB_SCRIPT_INSERT ) ),
+    aHyperlinksFL           ( this, ResId( FL_HYPERLINKS ) ),
+    aHyperlinksFT           ( this, ResId( FT_HYPERLINKS ) ),
+    aHyperlinksLB           ( this, ResId( LB_HYPERLINKS ) ),
+    aJavaFL                 ( this, ResId( FL_JAVA ) ),
+    aJavaEnableCB           ( this, ResId( CB_J_ENABLE ) ),
+    aJavaSecurityCB         ( this, ResId( CB_J_SECURITY ) ),
+    aNetAccessFT            ( this, ResId( FT_NETACCESS ) ),
+    aNetAccessLB            ( this, ResId( LB_NETACCESS ) ),
+    aClassPathFT            ( this, ResId( FT_CLASSPATH ) ),
+    aClassPathED            ( this, ResId( ED_CLASSPATH ) ),
+    aClassPathPB            ( this, ResId( PB_CLASSPATH ) ),
+    aSeparatorFL            ( this, ResId( FL_SEPARATOR ) ),
+    aExecuteGB              ( this, ResId( GB_EXECUTE ) ),
+    aExePlugCB              ( this, ResId( CB_EXECUTE_PLUGINS ) ),
+    aExecAppletsCB          ( this, ResId( CB_EXECUTE_APPLETS ) ),
+
+    pJavaOptions            ( new SvtJavaOptions ),
+
+    bROConfirm              ( CFG_READONLY_DEFAULT),
+    bROWarning              ( CFG_READONLY_DEFAULT),
+    bROScriptExec           ( CFG_READONLY_DEFAULT),
+    bROExecMacro            ( CFG_READONLY_DEFAULT),
+    bROExePlug              ( CFG_READONLY_DEFAULT)
+{
+    FreeResource();
+
+    aEdtScriptExec.SetModifyHdl( LINK(this, SvxScriptingTabPage, EditHdl_Impl) );
+    aLbScriptExec.SetSelectHdl( LINK(this, SvxScriptingTabPage, LBHdl_Impl) );
+
+    Link aLink( LINK(this, SvxScriptingTabPage, BtnHdl_Impl) );
+    aBtnScriptExecInsert.SetClickHdl( aLink );
+    aBtnScriptExecDelete.SetClickHdl( aLink );
+    aBtnScriptExecDefault.SetClickHdl( aLink );
+
+    aExecMacroLB.SetSelectHdl(LINK( this, SvxScriptingTabPage, RunHdl_Impl ));
+    EditHdl_Impl( NULL );
+    ActivatePage( rSet );
+
+#ifdef SOLAR_JAVA
+    aLink = LINK(this, SvxScriptingTabPage, JavaEnableHdl_Impl);
+    aJavaEnableCB.SetClickHdl( aLink );
+    aJavaSecurityCB.SetClickHdl( aLink );
+    aClassPathPB.SetClickHdl( LINK(this, SvxScriptingTabPage, ClassPathHdl_Impl) );
+#endif
+}
+
+/*--------------------------------------------------------------------*/
+SvxScriptingTabPage::~SvxScriptingTabPage()
+{
+    delete pJavaOptions;
+}
+// -----------------------------------------------------------------------
+void SvxScriptingTabPage::EnableJava_Impl( BOOL bEnable, BOOL bOnlySecurity )
+{
+    if ( !bOnlySecurity )
+    {
+        aJavaSecurityCB.Enable( bEnable );
+        aClassPathFT.Enable( bEnable );
+        aClassPathED.Enable( bEnable );
+        aClassPathPB.Enable( bEnable );
+        aExecAppletsCB.Enable( bEnable );
+    }
+
+    bEnable = ( bEnable && aJavaSecurityCB.IsChecked() );
+    aNetAccessFT.Enable( bEnable );
+    aNetAccessLB.Enable( bEnable );
+}
+// -----------------------------------------------------------------------
+IMPL_LINK( SvxScriptingTabPage, JavaEnableHdl_Impl, CheckBox*, pBox )
+{
+    EnableJava_Impl( pBox->IsChecked(), &aJavaSecurityCB == pBox );
+    return 1;
+}
+
+// -----------------------------------------------------------------------
+
+IMPL_LINK( SvxScriptingTabPage, ClassPathHdl_Impl, PushButton*, EMPTYARG )
+{
+    //CHINA001 SvxMultiFileDialog aDlg( this, TRUE );
+    SvxAbstractDialogFactory* pFact = SvxAbstractDialogFactory::Create();
+    if(pFact)
+    {
+        AbstractSvxMultiFileDialog* aDlg = pFact->CreateSvxMultiFileDialog( this, ResId(RID_SVXDLG_MULTIPATH), TRUE );
+        DBG_ASSERT(aDlg, "Dialogdiet fail!");//CHINA001
+        aDlg->SetClassPathMode(); //CHINA001 aDlg.SetClassPathMode();
+        aDlg->SetPath( aClassPathED.GetText() ); //CHINA001 aDlg.SetPath( aClassPathED.GetText() );
+        if ( aDlg->Execute() == RET_OK ) //CHINA001 if ( aDlg.Execute() == RET_OK )
+        {
+            // convert to system path if necessary
+            String sNewPath, sPath = aDlg->GetPath(); //CHINA001 String sNewPath, sPath = aDlg.GetPath();
+            xub_StrLen nCount = sPath.GetTokenCount( CLASSPATH_DELIMITER );
+            for ( USHORT i = 0; i < nCount; ++i )
+            {
+                String sTmp, sToken = sPath.GetToken( i, CLASSPATH_DELIMITER );
+                if ( ::utl::LocalFileHelper::ConvertURLToSystemPath( sToken, sTmp ) )
+                    sToken = sTmp;
+                if ( sNewPath.Len() > 0 )
+                    sNewPath += CLASSPATH_DELIMITER;
+                sNewPath += sToken;
+            }
+
+            aClassPathED.SetText( sNewPath );
+        }
+        delete aDlg; //add by CHINA001
+    }
+    return 1;
+}
+
+
+/*--------------------------------------------------------------------*/
+
+SfxTabPage* SvxScriptingTabPage::Create(Window* pParent, const SfxItemSet& rAttrSet )
+{
+    return new SvxScriptingTabPage(pParent, rAttrSet);
+}
+
+/*--------------------------------------------------------------------*/
+
+void SvxScriptingTabPage::ActivatePage( const SfxItemSet& rSet )
+{
+}
+
+/*--------------------------------------------------------------------*/
+
+int SvxScriptingTabPage::DeactivatePage( SfxItemSet* pSet )
+{
+    if ( pSet )
+        FillItemSet( *pSet );
+    return LEAVE_PAGE;
+}
+
+/*--------------------------------------------------------------------*/
+
+void SvxScriptingTabPage::FillListBox_Impl()
+{
+}
+
+/*--------------------------------------------------------------------*/
+
+IMPL_LINK( SvxScriptingTabPage, EditHdl_Impl, Edit*, EMPTYARG )
+
+/*  [Beschreibung]
+
+    ModifyHandler vom Edit. Der 'Hinzuf"ugen'-Button wird nur enabled,
+    wenn der Text im Edit vorhanden ist und nicht nur aus Blanks besteht.
+*/
+
+{
+    if (bROScriptExec)
+        return 1L;
+
+    String aTxt = aEdtScriptExec.GetText();
+    aTxt.EraseLeadingChars().EraseTrailingChars();
+    aBtnScriptExecInsert.Enable( aTxt.Len() > 0 );
+    return 1L;
+}
+
+/*--------------------------------------------------------------------*/
+
+IMPL_LINK( SvxScriptingTabPage, LBHdl_Impl, ListBox*, EMPTYARG )
+{
+    if (bROScriptExec)
+        return 1L;
+
+    USHORT nPos = aLbScriptExec.GetSelectEntryPos();
+    aBtnScriptExecDelete.Enable( nPos != LISTBOX_ENTRY_NOTFOUND );
+    return 1L;
+}
+
+/*--------------------------------------------------------------------*/
+
+IMPL_LINK( SvxScriptingTabPage, BtnHdl_Impl, PushButton*, pBtn )
+{
+    if (bROScriptExec)
+        return 1L;
+
+    if( pBtn == &aBtnScriptExecInsert )
+    {
+        // Insert new entry if not found in listbox
+        String aNewEntry = aEdtScriptExec.GetText();
+        aNewEntry.EraseLeadingChars().EraseTrailingChars();
+        INetURLObject aINetObject(aNewEntry, INET_PROT_HTTP);
+        if(INET_PROT_FILE == aINetObject.GetProtocol())
+            aNewEntry = aINetObject.GetFull();
+        else
+            aNewEntry = aINetObject.GetMainURL( INetURLObject::DECODE_TO_IURI );
+        // if it's not a URL of any kind the original string is used again
+        if(!aNewEntry.Len())
+            aNewEntry = aEdtScriptExec.GetText().EraseLeadingChars().EraseTrailingChars();
+        aEdtScriptExec.SetText( aNewEntry );
+        FASTBOOL bFound = !aNewEntry.Len();
+
+        if ( !bFound )
+        {
+            for ( USHORT i = 0; i < aLbScriptExec.GetEntryCount(); ++i )
+            {
+                String aEntry = aLbScriptExec.GetEntry(i);
+
+                if ( aEntry.CompareIgnoreCaseToAscii( aNewEntry ) == COMPARE_EQUAL )
+                {
+                    bFound = TRUE;
+                    break;
+                }
+            }
+        }
+
+        if ( !bFound )
+        {
+            aLbScriptExec.InsertEntry( aNewEntry );
+            aLbScriptExec.SelectEntry( aNewEntry );
+        }
+    }
+    else if( pBtn == &aBtnScriptExecDelete )
+    {
+        // delete selected entry
+        USHORT nPos = aLbScriptExec.GetSelectEntryPos();
+
+        if ( nPos != LISTBOX_ENTRY_NOTFOUND )
+        {
+            aLbScriptExec.RemoveEntry( nPos );
+            USHORT nCount = aLbScriptExec.GetEntryCount();
+
+            if ( nCount > 0 )
+            {
+                if ( nPos >= nCount )
+                    nPos = nCount - 1;
+            }
+            aLbScriptExec.SelectEntryPos( nPos );
+        }
+    }
+    else if ( pBtn == &aBtnScriptExecDefault )
+    {
+        // Reset listbox and edit
+
+        aLbScriptExec.Clear();
+        SvtPathOptions aPathOpt;
+
+        String sModule = URIHelper::SmartRelToAbs( aPathOpt.GetModulePath() );
+        INetURLObject aURLObject(sModule);
+        aURLObject.removeSegment();
+        aLbScriptExec.InsertEntry( aURLObject.GetFull() );
+        // #102041# -------------------------------
+        rtl::OUString aString;
+        utl::Bootstrap::locateUserInstallation( aString );
+        UniString aUniString( aString );
+        aUniString.AppendAscii( "/user" );
+        aURLObject = aUniString;
+        aLbScriptExec.InsertEntry( aURLObject.GetFull() );
+        aEdtScriptExec.SetText( String() );
+    }
+    LBHdl_Impl( NULL );
+    EditHdl_Impl( NULL );
+
+    return 1;
+}
+
+/*--------------------------------------------------------------------*/
+
+IMPL_LINK( SvxScriptingTabPage, RunHdl_Impl, ListBox*, pListBox )
+{
+    sal_Bool bConfirm = sal_False;
+    sal_Bool bWarning = sal_True;
+    switch(pListBox->GetSelectEntryPos())
+    {
+        case 1 : //according to list
+            bConfirm = sal_True;
+        break;
+        case 0: //never
+            bWarning = sal_False;
+        break;
+//        case 2 : //always
+//        break;
+    }
+    if (!bROConfirm)
+        aConfirmCB.Enable(bConfirm);
+    if (!bROWarning)
+        aWarningCB.Enable(bWarning);
+    return 1;
+}
+
+/*--------------------------------------------------------------------*/
+
+BOOL SvxScriptingTabPage::FillItemSet(SfxItemSet& rSet)
+{
+    // ggf. neuen Eintrag einf"ugen
+    BtnHdl_Impl( &aBtnScriptExecInsert );
+
+    BOOL bModified = FALSE;
+
+    // Liste fuer Scripting (Execute)
+    if (!bROScriptExec)
+    {
+        List aList;
+        USHORT nCount = aLbScriptExec.GetEntryCount();
+        for( USHORT i = 0; i < nCount; i++ )
+        {
+            String sURL(URIHelper::SmartRelToAbs(aLbScriptExec.GetEntry( i )));
+            aList.Insert( new String( sURL ), LIST_APPEND );
+        }
+
+        // Vergleichen mit alter Liste
+        const SfxItemSet&  rOldSet = GetItemSet();
+        const SfxPoolItem* pItem;
+        if( SFX_ITEM_SET == rOldSet.GetItemState( SID_SECURE_URL, FALSE, &pItem ) )
+        {
+            DBG_ASSERT( pItem->ISA(SfxStringListItem), "SfxStringListItem erwartet" );
+            List* pList = ( (SfxStringListItem*)pItem )->GetList();
+
+            if( pList )
+            {
+                ULONG nOldCount = pList->Count();
+                if( nCount != nOldCount )
+                    bModified = TRUE;
+
+                for ( ULONG i = 0; i < nOldCount && !bModified; i++ )
+                {
+                    if ( *(String*)aList.GetObject(i) != *(String*)pList->GetObject(i) )
+                        bModified = TRUE;
+                }
+            }
+        }
+
+        if ( bModified )
+        {
+            rSet.Put( SfxStringListItem( SID_SECURE_URL, &aList ) );
+        }
+        // Liste (Inhalte) wieder loeschen
+        for( String* pStr = (String*)aList.First(); pStr; pStr = (String*)aList.Next() )
+            delete pStr;
+    }
+    if( !bROConfirm && aConfirmCB.GetSavedValue() != aConfirmCB.IsChecked() )
+    {
+        rSet.Put( SfxBoolItem(SID_MACRO_CONFIRMATION, aConfirmCB.IsChecked()) );
+        bModified = TRUE;
+    }
+    if( !bROWarning && aWarningCB.GetSavedValue() != aWarningCB.IsChecked() )
+    {
+        rSet.Put( SfxBoolItem(SID_MACRO_WARNING, aWarningCB.IsChecked()) );
+        bModified = TRUE;
+    }
+
+    // Scripting
+    if( !bROExecMacro && aExecMacroLB.GetSelectEntryPos() != aExecMacroLB.GetSavedValue())
+    {
+        USHORT nSB = aExecMacroLB.GetSelectEntryPos();
+        rSet.Put( SfxUInt16Item( SID_BASIC_ENABLED, nSB ) );
+        bModified = TRUE;
+    }
+
+    //  Execute
+    if( !bROExePlug && aExePlugCB.GetSavedValue() != aExePlugCB.IsChecked() )
+    {
+        rSet.Put( SfxBoolItem(SID_INET_EXE_PLUGIN, aExePlugCB.IsChecked()) );
+        bModified = TRUE;
+    }
+    // Java
+    sal_Bool bJavaOptionsModified = sal_False;
+    if ( !pJavaOptions->IsReadOnly(SvtJavaOptions::E_ENABLED) && aJavaEnableCB.GetSavedValue() != aJavaEnableCB.IsChecked() )
+    {
+        pJavaOptions->SetEnabled(aJavaEnableCB.IsChecked());
+        bJavaOptionsModified = sal_True;
+    }
+
+    // Applets
+    if ( aExecAppletsCB.IsEnabled() &&
+         aExecAppletsCB.GetSavedValue() != aExecAppletsCB.IsChecked() &&
+         !pJavaOptions->IsReadOnly(SvtJavaOptions::E_EXECUTEAPPLETS) )
+    {
+        pJavaOptions->SetExecuteApplets(aExecAppletsCB.IsChecked());
+        bJavaOptionsModified = sal_True;
+    }
+
+    USHORT nSelPos = aNetAccessLB.GetSelectEntryPos();
+    if( !pJavaOptions->IsReadOnly(SvtJavaOptions::E_NETACCESS) && aNetAccessLB.GetSavedValue() != nSelPos )
+    {
+        pJavaOptions->SetNetAccess(nSelPos);
+        bJavaOptionsModified = sal_True;
+    }
+    if(!pJavaOptions->IsReadOnly(SvtJavaOptions::E_SECURITY) && aJavaSecurityCB.GetSavedValue() != aJavaSecurityCB.IsChecked() )
+    {
+        pJavaOptions->SetSecurity(aJavaSecurityCB.IsChecked() );
+        bJavaOptionsModified = sal_True;
+    }
+    if(!pJavaOptions->IsReadOnly(SvtJavaOptions::E_USERCLASSPATH) && aClassPathED.GetSavedValue() != aClassPathED.GetText() )
+    {
+        String aNewPath = aClassPathED.GetText();
+        aNewPath.EraseLeadingChars().EraseTrailingChars();
+        pJavaOptions->SetUserClassPath(aNewPath);
+        bJavaOptionsModified = sal_True;
+    }
+    if(bJavaOptionsModified)
+        pJavaOptions->Commit();
+
+    // hyperlinks
+    if ( aHyperlinksLB.GetSavedValue() != aHyperlinksLB.GetSelectEntryPos() )
+    {
+        SvtExtendedSecurityOptions::OpenHyperlinkMode eMode =
+            (SvtExtendedSecurityOptions::OpenHyperlinkMode)aHyperlinksLB.GetSelectEntryPos();
+        SvtExtendedSecurityOptions().SetOpenHyperlinkMode( eMode );
+    }
+
+    return bModified;
+}
+
+/*--------------------------------------------------------------------*/
+
+void SvxScriptingTabPage::Reset( const SfxItemSet& rSet )
+{
+    const SfxPoolItem* pItem;
+
+    // Execute
+    aLbScriptExec.Clear();
+    bROScriptExec = TRUE;
+    if ( SFX_ITEM_SET == rSet.GetItemState(SID_SECURE_URL, FALSE, &pItem) )
+    {
+        DBG_ASSERT( pItem->ISA(SfxStringListItem), "StringListItem erwartet" );
+        List* pList = ( (SfxStringListItem*)pItem )->GetList();
+
+        if ( pList )
+        {
+            ULONG nCount = pList->Count();
+
+            for ( ULONG i = 0; i < nCount; i++ )
+            {
+                INetURLObject aURL(*(String*)pList->GetObject(i));
+                aLbScriptExec.InsertEntry(
+                    INET_PROT_FILE == aURL.GetProtocol() ?
+                        aURL.GetFull() : aURL.GetMainURL( INetURLObject::DECODE_TO_IURI ) );
+            }
+            bROScriptExec = FALSE;
+        }
+    }
+    aLbScriptExec.Enable(!bROScriptExec);
+    aEdtScriptExec.Enable(!bROScriptExec);
+    aBtnScriptExecDelete.Enable(!bROScriptExec);
+    aBtnScriptExecDefault.Enable(!bROScriptExec);
+    aBtnScriptExecInsert.Enable(!bROScriptExec);
+    aPathListFT.Enable(!bROScriptExec);
+    aNewPathFT.Enable(!bROScriptExec);
+
+    bROWarning = TRUE;
+    if( SFX_ITEM_SET == rSet.GetItemState(SID_MACRO_WARNING, FALSE, &pItem) )
+    {
+        DBG_ASSERT(pItem->ISA(SfxBoolItem), "SfxBoolItem erwartet");
+        aWarningCB.Check(((const SfxBoolItem*)pItem)->GetValue());
+        bROWarning = FALSE;
+    }
+    aWarningCB.SaveValue();
+    aWarningCB.Enable(!bROWarning);
+
+    bROConfirm = TRUE;
+    if( SFX_ITEM_SET == rSet.GetItemState(SID_MACRO_CONFIRMATION, FALSE, &pItem) )
+    {
+        DBG_ASSERT(pItem->ISA(SfxBoolItem), "SfxBoolItem erwartet");
+        aConfirmCB.Check(((const SfxBoolItem*)pItem)->GetValue());
+        bROConfirm = FALSE;
+    }
+    aConfirmCB.SaveValue();
+    aConfirmCB.Enable(!bROConfirm);
+
+    aExecMacroLB.SelectEntryPos(0);
+    bROExecMacro = TRUE;
+    if ( SFX_ITEM_SET == rSet.GetItemState( SID_BASIC_ENABLED, FALSE, &pItem ) )
+    {
+        DBG_ASSERT( pItem->ISA(SfxUInt16Item), "SfxUInt16Item erwartet" );
+        USHORT nSB = ( (const SfxUInt16Item*)pItem )->GetValue();
+        aExecMacroLB.SelectEntryPos(nSB);
+        bROExecMacro = FALSE;
+    }
+    if (bROExecMacro)
+        aExecMacroLB.Clear();
+    aExecMacroLB.Enable(!bROExecMacro);
+    aExecMacroFT.Enable(!bROExecMacro);
+    aExecMacroLB.SaveValue();
+
+    // Execute
+    bROExePlug = TRUE;
+    if( SFX_ITEM_SET == rSet.GetItemState(SID_INET_EXE_PLUGIN, FALSE, &pItem) )
+    {
+        DBG_ASSERT(pItem->ISA(SfxBoolItem), "SfxBoolItem erwartet");
+        aExePlugCB.Check(((const SfxBoolItem*)pItem)->GetValue());
+        bROExePlug = FALSE;
+    }
+    aExePlugCB.SaveValue();
+    aExePlugCB.Enable(!bROExePlug);
+
+    EditHdl_Impl( NULL );
+    RunHdl_Impl(&aExecMacroLB);
+    LBHdl_Impl( NULL );
+
+    // Java
+    sal_Bool bROJavaEnabled = pJavaOptions->IsReadOnly(SvtJavaOptions::E_ENABLED);
+    sal_Bool bROJavaSecurity = pJavaOptions->IsReadOnly(SvtJavaOptions::E_SECURITY);
+    sal_Bool bROJavaNetAccess = pJavaOptions->IsReadOnly(SvtJavaOptions::E_NETACCESS);
+    sal_Bool bROJavaUserClassPath = pJavaOptions->IsReadOnly(SvtJavaOptions::E_USERCLASSPATH);
+    sal_Bool bROJavaExecuteApplets = pJavaOptions->IsReadOnly(SvtJavaOptions::E_EXECUTEAPPLETS);
+
+    aJavaEnableCB.Check(FALSE);
+    if (!bROJavaEnabled)
+    {
+        aJavaEnableCB.Check(pJavaOptions->IsEnabled());
+        #ifndef SOLAR_JAVA
+        aJavaEnableCB.Check(FALSE);
+        #endif
+        aJavaEnableCB.SaveValue();
+    }
+    aJavaEnableCB.Enable(!bROJavaEnabled);
+    EnableJava_Impl( aJavaEnableCB.IsChecked(), FALSE );
+
+    if (!bROJavaNetAccess)
+    {
+        aNetAccessLB.SelectEntryPos((USHORT)pJavaOptions->GetNetAccess());
+        aNetAccessLB.SaveValue();
+    }
+    aNetAccessLB.Enable(!bROJavaNetAccess);
+
+    aJavaSecurityCB.Check(FALSE);
+    if (!bROJavaSecurity)
+    {
+        aJavaSecurityCB.Check(pJavaOptions->IsSecurity());
+        aJavaSecurityCB.SaveValue();
+    }
+    aJavaSecurityCB.Enable(!bROJavaSecurity);
+    EnableJava_Impl( ( aJavaEnableCB.IsChecked() && aJavaSecurityCB.IsChecked() ), TRUE );
+
+    aClassPathED.SetText(String());
+    if (!bROJavaUserClassPath)
+    {
+        aClassPathED.SetText(pJavaOptions->GetUserClassPath());
+        aClassPathED.SaveValue();
+    }
+    aClassPathED.Enable(!bROJavaUserClassPath);
+
+    // Execute Applets
+    aExecAppletsCB.Check(FALSE);
+    if (!bROJavaExecuteApplets)
+    {
+        aExecAppletsCB.Check( pJavaOptions->IsExecuteApplets() );
+        aExecAppletsCB.SaveValue();
+    }
+    aExecAppletsCB.Enable(!bROJavaExecuteApplets);
+
+    // hyperlinks
+    SvtExtendedSecurityOptions::OpenHyperlinkMode eMode = SvtExtendedSecurityOptions().GetOpenHyperlinkMode();
+    aHyperlinksLB.SelectEntryPos( (USHORT)eMode );
+    aHyperlinksLB.SaveValue();
+
+    // disable groups if all controls of it are disabled
+    // But use real "enabled" states of the controls - not the readonly values of the configuration!
+    // Because some controls are disabled programmaticly if another control will have a special value ...
+
+    if (!aLbScriptExec.IsEnabled() &&
+        !aEdtScriptExec.IsEnabled() &&
+        !aBtnScriptExecDelete.IsEnabled() &&
+        !aBtnScriptExecDefault.IsEnabled() &&
+        !aBtnScriptExecInsert.IsEnabled() &&
+        !aPathListFT.IsEnabled() &&
+        !aNewPathFT.IsEnabled() &&
+        !aExecMacroLB.IsEnabled() &&
+        !aExecMacroFT.IsEnabled() &&
+        !aWarningCB.IsEnabled() &&
+        !aConfirmCB.IsEnabled())
+    {
+        aGrpScriptingStarBasic.Enable(FALSE);
+    }
+    else
+    {
+        aGrpScriptingStarBasic.Enable(TRUE);
+    }
+
+    if (!aExePlugCB.IsEnabled() &&
+        !aExecAppletsCB.IsEnabled())
+    {
+        aExecuteGB.Enable(FALSE);
+    }
+    else
+    {
+        aExecuteGB.Enable(TRUE);
+    }
+
+    if (!aJavaEnableCB.IsEnabled() &&
+        !aNetAccessLB.IsEnabled() &&
+        !aJavaSecurityCB.IsEnabled() &&
+        !aClassPathED.IsEnabled())
+    {
+        aJavaFL.Enable(FALSE);
+    }
+    else
+    {
+        aJavaFL.Enable(TRUE);
+    }
+}