xref: /AOO41X/main/svtools/source/control/hyperlabel.cxx (revision 79aad27f7f29270c03e208e3d687e8e3850af11d)
1 /**************************************************************
2  *
3  * Licensed to the Apache Software Foundation (ASF) under one
4  * or more contributor license agreements.  See the NOTICE file
5  * distributed with this work for additional information
6  * regarding copyright ownership.  The ASF licenses this file
7  * to you under the Apache License, Version 2.0 (the
8  * "License"); you may not use this file except in compliance
9  * with the License.  You may obtain a copy of the License at
10  *
11  *   http://www.apache.org/licenses/LICENSE-2.0
12  *
13  * Unless required by applicable law or agreed to in writing,
14  * software distributed under the License is distributed on an
15  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16  * KIND, either express or implied.  See the License for the
17  * specific language governing permissions and limitations
18  * under the License.
19  *
20  *************************************************************/
21 
22 
23 
24 // MARKER(update_precomp.py): autogen include statement, do not remove
25 #include "precompiled_svtools.hxx"
26 #ifndef SVTOOLS_ROADMAP_HXX
27 #include <svtools/hyperlabel.hxx>
28 #endif
29 #include <vcl/bitmap.hxx>
30 #include <tools/color.hxx>
31 
32 #ifndef _VCL_TABPAGE_HXX
33 #include <vcl/tabpage.hxx>
34 #endif
35 
36 
37 //.........................................................................
38 namespace svt
39 {
40 //.........................................................................
41 
42     //=====================================================================
43     //= FontChanger
44     //=====================================================================
45     class FontChanger
46     {
47     protected:
48         OutputDevice*   m_pDev;
49 
50     public:
FontChanger(OutputDevice * _pDev,const Font & _rNewFont)51         FontChanger( OutputDevice* _pDev, const Font& _rNewFont )
52             :m_pDev( _pDev )
53         {
54             m_pDev->Push( PUSH_FONT );
55             m_pDev->SetFont( _rNewFont );
56         }
57 
~FontChanger()58         ~FontChanger()
59         {
60             m_pDev->Pop( );
61         }
62     };
63 
64     class HyperLabelImpl
65     {
66     public:
67         sal_Int16           ID;
68         sal_Int32           Index;
69         sal_Bool            bInteractive;
70         Size                m_aMinSize;
71         sal_Bool            m_bHyperMode;
72 
73         HyperLabelImpl();
74     };
75 
76     //---------------------------------------------------------------------
HyperLabelImpl()77     HyperLabelImpl::HyperLabelImpl()
78     {
79     }
80 
HyperLabel(Window * _pParent,const ResId & _rId)81     HyperLabel::HyperLabel( Window* _pParent, const ResId& _rId )
82         :FixedText( _pParent, _rId )
83         ,m_pImpl( new HyperLabelImpl )
84     {
85         implInit();
86     }
87 
HyperLabel(Window * _pParent,WinBits _nWinStyle)88     HyperLabel::HyperLabel( Window* _pParent, WinBits _nWinStyle )
89         :FixedText( _pParent, _nWinStyle )
90         ,m_pImpl( new HyperLabelImpl )
91     {
92         implInit();
93     }
94 
95 
GetLogicWidth()96     sal_Int32 HyperLabel::GetLogicWidth()
97     {
98         Size rLogicLocSize = PixelToLogic( m_pImpl->m_aMinSize, MAP_APPFONT );
99         return rLogicLocSize.Width();
100     }
101 
102 
CalcMinimumSize(long nMaxWidth) const103     Size HyperLabel::CalcMinimumSize( long nMaxWidth ) const
104     {
105         m_pImpl->m_aMinSize = FixedText::CalcMinimumSize( nMaxWidth );
106         // the MinimumSize is used to size the FocusRectangle
107         // and for the MouseMove method
108         m_pImpl->m_aMinSize.Height() += 2;
109         m_pImpl->m_aMinSize.Width() += 1;
110         return m_pImpl->m_aMinSize;
111     }
112 
implInit()113     void HyperLabel::implInit()
114     {
115         ToggleBackgroundColor( COL_TRANSPARENT );
116 
117         WinBits nWinStyle = GetStyle();
118         nWinStyle |= WB_EXTRAOFFSET;
119         SetStyle( nWinStyle );
120 
121         Show();
122     }
123 
ToggleBackgroundColor(const Color & _rGBColor)124     void HyperLabel::ToggleBackgroundColor( const Color& _rGBColor )
125     {
126         const StyleSettings& rStyleSettings = GetSettings().GetStyleSettings();
127         SetControlBackground( _rGBColor );
128         if (_rGBColor == COL_TRANSPARENT)
129             SetTextColor( rStyleSettings.GetFieldTextColor( ) );
130         else
131             SetTextColor( rStyleSettings.GetHighlightTextColor( ) );
132     }
133 
134 
MouseMove(const MouseEvent & rMEvt)135     void HyperLabel::MouseMove( const MouseEvent& rMEvt )
136     {
137         Font aFont = GetControlFont( );
138         const Color aColor = GetTextColor();
139 
140         if (rMEvt.IsLeaveWindow())
141         {
142             DeactivateHyperMode(aFont, aColor);
143         }
144         else
145         {
146             Point aPoint = GetPointerPosPixel();
147             if (aPoint.X() < m_pImpl->m_aMinSize.Width())
148             {
149                 if ( IsEnabled() && (m_pImpl->bInteractive) )
150                 {
151                     ActivateHyperMode( aFont, aColor);
152                     return;
153                 }
154             }
155             DeactivateHyperMode(aFont, aColor);
156         }
157     }
158 
ActivateHyperMode(Font aFont,const Color aColor)159     void HyperLabel::ActivateHyperMode(Font aFont, const Color aColor)
160     {
161         aFont.SetUnderline(UNDERLINE_SINGLE);
162         m_pImpl->m_bHyperMode = sal_True;
163         SetPointer( POINTER_REFHAND );
164         SetControlFont( aFont);
165         SetTextColor( aColor);
166 
167     }
168 
DeactivateHyperMode(Font aFont,const Color aColor)169     void HyperLabel::DeactivateHyperMode(Font aFont, const Color aColor)
170     {
171         m_pImpl->m_bHyperMode = sal_False;
172         aFont.SetUnderline(UNDERLINE_NONE);
173         SetPointer( POINTER_ARROW );
174         SetControlFont( aFont);
175         SetTextColor( aColor);
176     }
177 
MouseButtonDown(const MouseEvent &)178     void HyperLabel::MouseButtonDown( const MouseEvent& )
179     {
180         if ( m_pImpl->m_bHyperMode && m_pImpl->bInteractive )
181         {
182             maClickHdl.Call( this );
183         }
184     }
185 
GetFocus()186     void HyperLabel::GetFocus()
187     {
188         if ( IsEnabled() && m_pImpl->bInteractive )
189         {
190             Point aPoint(0,0);
191             Rectangle rRect(aPoint, Size( m_pImpl->m_aMinSize.Width(), GetSizePixel().Height() ) );
192             ShowFocus( rRect );
193         }
194     }
195 
LoseFocus()196     void HyperLabel::LoseFocus()
197     {
198         HideFocus();
199     }
200 
~HyperLabel()201     HyperLabel::~HyperLabel( )
202     {
203         delete m_pImpl;
204     }
205 
SetInteractive(sal_Bool _bInteractive)206     void HyperLabel::SetInteractive( sal_Bool _bInteractive )
207     {
208         m_pImpl->bInteractive = ( _bInteractive && IsEnabled() );
209     }
210 
GetID() const211     sal_Int16 HyperLabel::GetID() const
212     {
213         return m_pImpl->ID;
214     }
215 
GetIndex() const216     sal_Int32 HyperLabel::GetIndex() const
217     {
218         return m_pImpl->Index;
219     }
220 
SetID(sal_Int16 _ID)221     void HyperLabel::SetID( sal_Int16 _ID )
222     {
223         m_pImpl->ID = _ID;
224     }
225 
SetIndex(sal_Int32 _Index)226     void HyperLabel::SetIndex( sal_Int32 _Index )
227     {
228         m_pImpl->Index = _Index;
229     }
230 
GetLabel()231     ::rtl::OUString HyperLabel::GetLabel( )
232     {
233         return GetText();
234     }
235 
SetLabel(const::rtl::OUString & _rText)236     void HyperLabel::SetLabel( const ::rtl::OUString& _rText )
237     {
238         SetText(_rText);
239     }
240 
241 
242     //------------------------------------------------------------------------------
DataChanged(const DataChangedEvent & rDCEvt)243     void HyperLabel::DataChanged( const DataChangedEvent& rDCEvt )
244     {
245         const StyleSettings& rStyleSettings = GetSettings().GetStyleSettings();
246         FixedText::DataChanged( rDCEvt );
247         if ((( rDCEvt.GetType() == DATACHANGED_SETTINGS )   ||
248             ( rDCEvt.GetType() == DATACHANGED_DISPLAY   ))  &&
249             ( rDCEvt.GetFlags() & SETTINGS_STYLE        ))
250         {
251             const Color& rGBColor = GetControlBackground();
252             if (rGBColor == COL_TRANSPARENT)
253                 SetTextColor( rStyleSettings.GetFieldTextColor( ) );
254             else
255             {
256                 SetControlBackground(rStyleSettings.GetHighlightColor());
257                 SetTextColor( rStyleSettings.GetHighlightTextColor( ) );
258             }
259             Invalidate();
260         }
261     }
262 
263 //.........................................................................
264 }   // namespace svt
265 //.........................................................................
266 
267