svtools/source/control/hyperlabel.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 <svtools/hyperlabel.hxx>
  21 #include <tools/color.hxx>
  22 #include <vcl/bitmap.hxx>
  23 #include <vcl/settings.hxx>
  24 #include <vcl/tabpage.hxx>
  25
  26
  27
  28 namespace svt
  29 {
  30     class HyperLabelImpl
  31     {
  32     public:
  33         sal_Int16           ID;
  34         sal_Int32           Index;
  35         bool                bInteractive;
  36         Size                m_aMinSize;
  37         bool                m_bHyperMode;
  38
  39         HyperLabelImpl();
  40     };
  41
  42
  43     HyperLabelImpl::HyperLabelImpl()
  44         : ID(0)
  45         , Index(0)
  46         , bInteractive(false)
  47         , m_bHyperMode(false)
  48     {
  49     }
  50
  51     HyperLabel::HyperLabel( vcl::Window* _pParent, WinBits _nWinStyle )
  52         :FixedText( _pParent, _nWinStyle )
  53         ,m_pImpl( new HyperLabelImpl )
  54     {
  55         implInit();
  56     }
  57
  58     Size HyperLabel::CalcMinimumSize( long nMaxWidth ) const
  59     {
  60         m_pImpl->m_aMinSize = FixedText::CalcMinimumSize( nMaxWidth );
  61         // the MinimumSize is used to size the FocusRectangle
  62         // and for the MouseMove method
  63         m_pImpl->m_aMinSize.Height() += 2;
  64         m_pImpl->m_aMinSize.Width() += 1;
  65         return m_pImpl->m_aMinSize;
  66     }
  67
  68     void HyperLabel::implInit()
  69     {
  70         ToggleBackgroundColor( COL_TRANSPARENT );
  71
  72         WinBits nWinStyle = GetStyle();
  73         nWinStyle |= WB_EXTRAOFFSET;
  74         SetStyle( nWinStyle );
  75
  76         Show();
  77     }
  78
  79     void HyperLabel::ToggleBackgroundColor( const Color& _rGBColor )
  80     {
  81         const StyleSettings& rStyleSettings = GetSettings().GetStyleSettings();
  82         SetControlBackground( _rGBColor );
  83         if (_rGBColor == COL_TRANSPARENT)
  84             SetTextColor( rStyleSettings.GetFieldTextColor( ) );
  85         else
  86             SetTextColor( rStyleSettings.GetHighlightTextColor( ) );
  87     }
  88
  89
  90     void HyperLabel::MouseMove( const MouseEvent& rMEvt )
  91     {
  92         vcl::Font aFont = GetControlFont( );
  93         const Color aColor = GetTextColor();
  94
  95         if (rMEvt.IsLeaveWindow())
  96         {
  97             DeactivateHyperMode(aFont, aColor);
  98         }
  99         else
 100         {
 101             Point aPoint = GetPointerPosPixel();
 102             if (aPoint.X() < m_pImpl->m_aMinSize.Width())
 103             {
 104                 if ( IsEnabled() && (m_pImpl->bInteractive) )
 105                 {
 106                     ActivateHyperMode( aFont, aColor);
 107                     return;
 108                 }
 109             }
 110             DeactivateHyperMode(aFont, aColor);
 111         }
 112     }
 113
 114     void HyperLabel::ActivateHyperMode(vcl::Font aFont, const Color aColor)
 115     {
 116         aFont.SetUnderline(UNDERLINE_SINGLE);
 117         m_pImpl->m_bHyperMode = true;
 118         SetPointer( PointerStyle::RefHand );
 119         SetControlFont( aFont);
 120         SetTextColor( aColor);
 121
 122     }
 123
 124     void HyperLabel::DeactivateHyperMode(vcl::Font aFont, const Color aColor)
 125     {
 126         m_pImpl->m_bHyperMode = false;
 127         aFont.SetUnderline(UNDERLINE_NONE);
 128         SetPointer( PointerStyle::Arrow );
 129         SetControlFont( aFont);
 130         SetTextColor( aColor);
 131     }
 132
 133     void HyperLabel::MouseButtonDown( const MouseEvent& )
 134     {
 135         if ( m_pImpl->m_bHyperMode && m_pImpl->bInteractive )
 136         {
 137             maClickHdl.Call( this );
 138         }
 139     }
 140
 141     void HyperLabel::GetFocus()
 142     {
 143         if ( IsEnabled() && m_pImpl->bInteractive )
 144         {
 145             Point aPoint(0,0);
 146             Rectangle rRect(aPoint, Size( m_pImpl->m_aMinSize.Width(), GetSizePixel().Height() ) );
 147             ShowFocus( rRect );
 148         }
 149     }
 150
 151     void HyperLabel::LoseFocus()
 152     {
 153         HideFocus();
 154     }
 155
 156     HyperLabel::~HyperLabel( )
 157     {
 158         disposeOnce();
 159     }
 160
 161     void HyperLabel::dispose()
 162     {
 163         delete m_pImpl;
 164         FixedText::dispose();
 165     }
 166
 167     void HyperLabel::SetInteractive( bool _bInteractive )
 168     {
 169         m_pImpl->bInteractive = ( _bInteractive && IsEnabled() );
 170     }
 171
 172     sal_Int16 HyperLabel::GetID() const
 173     {
 174         return m_pImpl->ID;
 175     }
 176
 177     sal_Int32 HyperLabel::GetIndex() const
 178     {
 179         return m_pImpl->Index;
 180     }
 181
 182     void HyperLabel::SetID( sal_Int16 _ID )
 183     {
 184         m_pImpl->ID = _ID;
 185     }
 186
 187     void HyperLabel::SetIndex( sal_Int32 _Index )
 188     {
 189         m_pImpl->Index = _Index;
 190     }
 191
 192     void HyperLabel::SetLabel( const OUString& _rText )
 193     {
 194         SetText(_rText);
 195     }
 196
 197
 198
 199     void HyperLabel::DataChanged( const DataChangedEvent& rDCEvt )
 200     {
 201         const StyleSettings& rStyleSettings = GetSettings().GetStyleSettings();
 202         FixedText::DataChanged( rDCEvt );
 203         if ((( rDCEvt.GetType() == DataChangedEventType::SETTINGS )   ||
 204             ( rDCEvt.GetType() == DataChangedEventType::DISPLAY   ))  &&
 205             ( rDCEvt.GetFlags() & AllSettingsFlags::STYLE        ))
 206         {
 207             const Color& rGBColor = GetControlBackground();
 208             if (rGBColor == COL_TRANSPARENT)
 209                 SetTextColor( rStyleSettings.GetFieldTextColor( ) );
 210             else
 211             {
 212                 SetControlBackground(rStyleSettings.GetHighlightColor());
 213                 SetTextColor( rStyleSettings.GetHighlightTextColor( ) );
 214             }
 215             Invalidate();
 216         }
 217     }
 218
 219
 220 }   // namespace svt
 221
 222
 223 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */