svtools/source/config/apearcfg.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: apearcfg.cxx,v $
  10  * $Revision: 1.8 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_svtools.hxx"
  33
  34 #ifdef  SVL_DLLIMPLEMENTATION
  35 #undef  SVL_DLLIMPLEMENTATION
  36 #endif
  37 #define SVT_DLLIMPLEMENTATION
  38
  39 #include "apearcfg.hxx"
  40 #include "com/sun/star/uno/Any.hxx"
  41
  42 #include "tools/debug.hxx"
  43 #include "vcl/settings.hxx"
  44 #include "vcl/svapp.hxx"
  45 #include <rtl/logfile.hxx>
  46
  47 #define DEFAULT_LOOKNFEEL   0
  48 #define DEFAULT_DRAGMODE    2
  49 #define DEFAULT_SNAPMODE    0
  50 #define DEFAULT_SCALEFACTOR 100
  51 #define DEFAULT_AAMINHEIGHT     8
  52
  53 using namespace ::rtl;
  54 using namespace ::com::sun::star::uno;
  55
  56 sal_Bool SvtTabAppearanceCfg::bInitialized = sal_False;
  57
  58 /*--------------------------------------------------------------------
  59      Beschreibung:
  60  --------------------------------------------------------------------*/
  61 SvtTabAppearanceCfg::SvtTabAppearanceCfg()
  62     :ConfigItem(OUString::createFromAscii("Office.Common/View"))
  63     ,nLookNFeel                 ( DEFAULT_LOOKNFEEL )
  64     ,nDragMode                  ( DEFAULT_DRAGMODE )
  65     ,nScaleFactor       ( DEFAULT_SCALEFACTOR )
  66     ,nSnapMode                  ( DEFAULT_SNAPMODE )
  67     ,nMiddleMouse       ( MOUSE_MIDDLE_AUTOSCROLL )
  68 #if defined( UNX ) || defined ( FS_PRIV_DEBUG )
  69     ,nAAMinPixelHeight  ( DEFAULT_AAMINHEIGHT )
  70 #endif
  71     ,bMenuMouseFollow(FALSE)
  72     ,bSingleLineTabCtrl(FALSE)
  73     ,bColoredTabCtrl(FALSE)
  74 #if defined( UNX ) || defined ( FS_PRIV_DEBUG )
  75     ,bFontAntialiasing  ( TRUE )
  76 #endif
  77 {
  78     RTL_LOGFILE_CONTEXT(aLog, "svtools SvtTabAppearanceCfg::SvtTabAppearanceCfg()");
  79
  80     const Sequence<OUString>& rNames = GetPropertyNames();
  81     Sequence<Any> aValues = GetProperties(rNames);
  82     const Any* pValues = aValues.getConstArray();
  83     DBG_ASSERT(aValues.getLength() == rNames.getLength(), "GetProperties failed");
  84
  85     if(aValues.getLength() == rNames.getLength())
  86     {
  87         for(int nProp = 0; nProp < rNames.getLength(); ++nProp, ++pValues)
  88         {
  89             if(pValues->hasValue())
  90             {
  91                 switch(nProp)
  92                 {
  93                     case  0: *pValues >>= nScaleFactor; break; //"FontScaling",
  94                     case  1: *pValues >>= nLookNFeel; break;  //"LookAndFeel",
  95                     case  2: *pValues >>= nDragMode; break;   //"Window/Drag",
  96                     case  3: bMenuMouseFollow = *(sal_Bool*)pValues->getValue(); break; //"Menu/FollowMouse",
  97                     case  4: bSingleLineTabCtrl      = *(sal_Bool*)pValues->getValue(); break; //"Dialog/SingleLineTab",
  98                     case  5: bColoredTabCtrl = *(sal_Bool*)pValues->getValue(); break; //"Dialog/ColoredTab",
  99                     case  6: *pValues >>= nSnapMode; break; //"Dialog/MousePositioning",
 100                     case  7: *pValues >>= nMiddleMouse; break; //"Dialog/MiddleMouseButton",
 101 #if defined( UNX ) || defined ( FS_PRIV_DEBUG )
 102                     case  8: bFontAntialiasing = *(sal_Bool*)pValues->getValue(); break;    // "FontAntialising/Enabled",
 103                     case  9: *pValues >>= nAAMinPixelHeight; break;                         // "FontAntialising/MinPixelHeight",
 104 #endif
 105                 }
 106             }
 107         }
 108     }
 109 }
 110 /* -----------------------------22.05.01 11:53--------------------------------
 111
 112  ---------------------------------------------------------------------------*/
 113 SvtTabAppearanceCfg::~SvtTabAppearanceCfg( )
 114 {
 115 }
 116 /* -----------------------------22.05.01 11:54--------------------------------
 117
 118  ---------------------------------------------------------------------------*/
 119 const Sequence<OUString>& SvtTabAppearanceCfg::GetPropertyNames()
 120 {
 121     static Sequence<OUString> aNames;
 122     if(!aNames.getLength())
 123     {
 124         static const sal_Char* aPropNames[] =
 125         {
 126              "FontScaling"                       //  0
 127             ,"LookAndFeel"                       //  1
 128             ,"Window/Drag"                       //  2
 129             ,"Menu/FollowMouse"                  //  3
 130             ,"Dialog/SingleLineTab"              //  4
 131             ,"Dialog/ColoredTab"                 //  5
 132             ,"Dialog/MousePositioning"           //  6
 133             ,"Dialog/MiddleMouseButton"          //  7
 134 #if defined( UNX ) || defined ( FS_PRIV_DEBUG )
 135             ,"FontAntiAliasing/Enabled"         //  8
 136             ,"FontAntiAliasing/MinPixelHeight"  //  9
 137 #endif
 138         };
 139         const int nCount = sizeof( aPropNames ) / sizeof( aPropNames[0] );
 140         aNames.realloc(nCount);
 141
 142         const sal_Char** pAsciiNames = aPropNames;
 143         OUString* pNames = aNames.getArray();
 144         for(int i = 0; i < nCount; ++i, ++pNames, ++pAsciiNames)
 145             *pNames = OUString::createFromAscii( *pAsciiNames );
 146     }
 147     return aNames;
 148 }
 149 /* -----------------------------22.05.01 11:54--------------------------------
 150
 151  ---------------------------------------------------------------------------*/
 152 void  SvtTabAppearanceCfg::Commit()
 153 {
 154     const Sequence<OUString>& rNames = GetPropertyNames();
 155     Sequence<Any> aValues(rNames.getLength());
 156     Any* pValues = aValues.getArray();
 157
 158     const Type& rType = ::getBooleanCppuType();
 159     for(int nProp = 0; nProp < rNames.getLength(); nProp++)
 160     {
 161         switch(nProp)
 162         {
 163             case  0: pValues[nProp] <<= nScaleFactor; break;            // "FontScaling",
 164             case  1: pValues[nProp] <<= nLookNFeel; break;              //"LookAndFeel",
 165             case  2: pValues[nProp] <<= nDragMode; break;               //"Window/Drag",
 166             case  3: pValues[nProp].setValue(&bMenuMouseFollow, rType); break; //"Menu/FollowMouse",
 167             case  4: pValues[nProp].setValue(&bSingleLineTabCtrl, rType); break; //"Dialog/SingleLineTab",
 168             case  5: pValues[nProp].setValue(&bColoredTabCtrl, rType); break; //"Dialog/ColoredTab",
 169             case  6: pValues[nProp] <<= nSnapMode; break;               //"Dialog/MousePositioning",
 170             case  7: pValues[nProp] <<= nMiddleMouse; break;               //"Dialog/MiddleMouseButton",
 171 #if defined( UNX ) || defined ( FS_PRIV_DEBUG )
 172             case  8: pValues[nProp].setValue(&bFontAntialiasing, rType); break; // "FontAntialising/Enabled",
 173             case  9: pValues[nProp] <<= nAAMinPixelHeight; break;               // "FontAntialising/MinPixelHeight",
 174 #endif
 175         }
 176     }
 177     PutProperties(rNames, aValues);
 178 }
 179 /*--------------------------------------------------------------------
 180      Beschreibung:
 181  --------------------------------------------------------------------*/
 182
 183 void SvtTabAppearanceCfg::SetLookNFeel ( USHORT nSet )
 184 {
 185     nLookNFeel = nSet;
 186     SetModified();
 187 }
 188
 189 /*--------------------------------------------------------------------
 190      Beschreibung:
 191  --------------------------------------------------------------------*/
 192
 193 void SvtTabAppearanceCfg::SetDragMode  ( USHORT nSet )
 194 {
 195     nDragMode = nSet;
 196     SetModified();
 197 }
 198
 199 /*--------------------------------------------------------------------
 200      Beschreibung:
 201  --------------------------------------------------------------------*/
 202
 203 void SvtTabAppearanceCfg::SetScaleFactor ( USHORT nSet )
 204 {
 205     nScaleFactor = nSet;
 206     SetModified();
 207 }
 208
 209 /*--------------------------------------------------------------------
 210      Beschreibung:
 211  --------------------------------------------------------------------*/
 212
 213 void SvtTabAppearanceCfg::SetSnapMode ( USHORT nSet )
 214 {
 215     nSnapMode = nSet;
 216     SetModified();
 217 }
 218 /*--------------------------------------------------------------------
 219      Beschreibung:
 220  --------------------------------------------------------------------*/
 221 void SvtTabAppearanceCfg::SetMiddleMouseButton ( USHORT nSet )
 222 {
 223     nMiddleMouse = nSet;
 224     SetModified();
 225 }
 226 /*--------------------------------------------------------------------
 227      Beschreibung:
 228  --------------------------------------------------------------------*/
 229
 230 void SvtTabAppearanceCfg::SetApplicationDefaults ( Application* pApp )
 231 {
 232     AllSettings   hAppSettings = pApp->GetSettings();
 233     StyleSettings hAppStyle    = hAppSettings.GetStyleSettings();
 234
 235     // Look & Feel
 236
 237     // SetStandard...Styles() resets the UseSystemUIFonts flag,
 238     // but we don't want to change it now, so save the flag before ...
 239     BOOL bUseSystemUIFonts = hAppStyle.GetUseSystemUIFonts();
 240
 241     switch ( nLookNFeel )
 242     {
 243         case LookMotif:
 244             hAppStyle.SetStandardUnixStyles();  break;
 245
 246         case LookOSTwo:
 247             hAppStyle.SetStandardOS2Styles();   break;
 248
 249         case LookMacintosh:
 250             hAppStyle.SetStandardMacStyles();   break;
 251
 252         case LookWindows:
 253             hAppStyle.SetStandardWinStyles();   break;
 254
 255         case LookStardivision:
 256         default:
 257             hAppStyle.SetStandardStyles();              break;
 258     }
 259
 260     // and set it here
 261     hAppStyle.SetUseSystemUIFonts( bUseSystemUIFonts );
 262
 263     // Screen and ScreenFont Scaling
 264
 265     hAppStyle.SetScreenZoom( nScaleFactor );
 266     hAppStyle.SetScreenFontZoom( nScaleFactor );
 267
 268 #if defined( UNX ) || defined ( FS_PRIV_DEBUG )
 269     // font anti aliasing
 270     hAppStyle.SetAntialiasingMinPixelHeight( nAAMinPixelHeight );
 271     hAppStyle.SetDisplayOptions( bFontAntialiasing ? 0 : DISPLAY_OPTION_AA_DISABLE );
 272 #endif
 273
 274     // Mouse Snap
 275
 276     MouseSettings hMouseSettings = hAppSettings.GetMouseSettings();
 277     ULONG         nMouseOptions  = hMouseSettings.GetOptions();
 278
 279     nMouseOptions &=  ! (MOUSE_OPTION_AUTOCENTERPOS | MOUSE_OPTION_AUTODEFBTNPOS);
 280
 281     switch ( nSnapMode )
 282     {
 283     case SnapToButton:
 284         nMouseOptions |= MOUSE_OPTION_AUTODEFBTNPOS;
 285         break;
 286     case SnapToMiddle:
 287         nMouseOptions |= MOUSE_OPTION_AUTOCENTERPOS;
 288         break;
 289     case NoSnap:
 290     default:
 291         break;
 292     }
 293     hMouseSettings.SetOptions(nMouseOptions);
 294     hMouseSettings.SetMiddleButtonAction(nMiddleMouse);
 295
 296     // Merge and Publish Settings
 297
 298     ULONG nFollow = hMouseSettings.GetFollow();
 299     if(bMenuMouseFollow)
 300         nFollow |= MOUSE_FOLLOW_MENU;
 301     else
 302         nFollow &= ~MOUSE_FOLLOW_MENU;
 303     hMouseSettings.SetFollow( nFollow );
 304     sal_uInt16 nTabStyle = 0;
 305     if(bSingleLineTabCtrl)
 306         nTabStyle |= STYLE_TABCONTROL_SINGLELINE;
 307
 308     if(bColoredTabCtrl)
 309         nTabStyle |= STYLE_TABCONTROL_COLOR;
 310     hAppStyle.SetTabControlStyle(nTabStyle);
 311
 312
 313     hAppSettings.SetMouseSettings( hMouseSettings );
 314
 315     hAppSettings.SetStyleSettings( hAppStyle );
 316     pApp->MergeSystemSettings    ( hAppSettings );      // Allow system-settings to apply
 317     pApp->SystemSettingsChanging ( hAppSettings, NULL );// Allow overruling of system-settings
 318                                                         //is concerned with window drag
 319
 320     pApp->SetSettings ( hAppSettings );
 321 }
 322
 323
 324