]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/gtk1/tooltip.cpp
Applied bug fix [ 684949 ] Dialup Sample With Borland C++ 5.5.1 Free Compiler
[wxWidgets.git] / src / gtk1 / tooltip.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: tooltip.cpp
3// Purpose: wxToolTip implementation
4// Author: Robert Roebling
5// Id: $Id$
6// Copyright: (c) 1998 Robert Roebling
7// Licence: wxWindows licence
8/////////////////////////////////////////////////////////////////////////////
9
10#ifdef __GNUG__
11 #pragma implementation "tooltip.h"
12#endif
13
14#include "wx/setup.h"
15
16#if wxUSE_TOOLTIPS
17
18#include "wx/window.h"
19#include "wx/tooltip.h"
20
21#include "wx/gtk/private.h"
22
23extern GdkFont *GtkGetDefaultGuiFont();
24
25//-----------------------------------------------------------------------------
26// global data
27//-----------------------------------------------------------------------------
28
29static GtkTooltips *ss_tooltips = (GtkTooltips*) NULL;
30static GdkColor ss_bg;
31static GdkColor ss_fg;
32
33//-----------------------------------------------------------------------------
34// wxToolTip
35//-----------------------------------------------------------------------------
36
37IMPLEMENT_ABSTRACT_CLASS(wxToolTip, wxObject)
38
39wxToolTip::wxToolTip( const wxString &tip )
40{
41 m_text = tip;
42 m_window = (wxWindow*) NULL;
43}
44
45void wxToolTip::SetTip( const wxString &tip )
46{
47 m_text = tip;
48 Apply( m_window );
49}
50
51void wxToolTip::Apply( wxWindow *win )
52{
53 if (!win) return;
54
55 if (!ss_tooltips)
56 {
57 ss_tooltips = gtk_tooltips_new();
58
59 ss_fg.red = 0;
60 ss_fg.green = 0;
61 ss_fg.blue = 0;
62 gdk_color_alloc( gtk_widget_get_default_colormap(), &ss_fg );
63
64 ss_bg.red = 65535;
65 ss_bg.green = 65535;
66 ss_bg.blue = 50000;
67 gdk_color_alloc( gtk_widget_get_default_colormap(), &ss_bg );
68
69 gtk_tooltips_force_window( ss_tooltips );
70
71 GtkStyle *g_style =
72 gtk_style_copy(
73 gtk_widget_get_style( ss_tooltips->tip_window ) );
74
75 g_style->fg[GTK_STATE_NORMAL] = ss_fg;
76 g_style->bg[GTK_STATE_NORMAL] = ss_bg;
77
78 gtk_widget_set_style( ss_tooltips->tip_window, g_style );
79 }
80
81 m_window = win;
82
83 if (m_text.IsEmpty())
84 m_window->ApplyToolTip( ss_tooltips, (wxChar*) NULL );
85 else
86 m_window->ApplyToolTip( ss_tooltips, m_text );
87}
88
89void wxToolTip::Enable( bool flag )
90{
91 if (!ss_tooltips) return;
92
93 if (flag)
94 gtk_tooltips_enable( ss_tooltips );
95 else
96 gtk_tooltips_disable( ss_tooltips );
97}
98
99void wxToolTip::SetDelay( long msecs )
100{
101 if (!ss_tooltips)
102 return;
103
104 gtk_tooltips_set_delay( ss_tooltips, (int)msecs );
105}
106
107#endif
108