1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
|
/** \file message.c
* Message line
*/
/* XTrkCad - Model Railroad CAD
* Copyright (C) 2005 Dave Bullis
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program 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 General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
#include <stdlib.h>
#define GTK_DISABLE_SINGLE_INCLUDES
#define GDK_DISABLE_DEPRECATED
#define GTK_DISABLE_DEPRECATED
#define GSEAL_ENABLE
#include <gtk/gtk.h>
#include <gdk/gdk.h>
#include "gtkint.h"
/*
*****************************************************************************
*
* Message Boxes
*
*****************************************************************************
*/
struct wMessage_t {
WOBJ_COMMON
GtkWidget * labelWidget;
const char * message;
wPos_t labelWidth;
};
/**
* Set the message text
*
* \param b IN widget
* \param arg IN new text
* \return
*/
void wMessageSetValue(
wMessage_p b,
const char * arg)
{
if (b->widget == 0) {
abort();
}
gtk_label_set_text(GTK_LABEL(b->labelWidget), wlibConvertInput(arg));
}
/**
* Set the width of the widget
*
* \param b IN widget
* \param width IN new width
* \return
*/
void wMessageSetWidth(
wMessage_p b,
wPos_t width)
{
b->labelWidth = width;
gtk_widget_set_size_request(b->widget, width, -1);
}
/**
* Get height of message text
* \todo Constant height doesn't make sense, change to use the window's properties and retrieve the real font size
*
* \param flags IN text properties (large or small size)
* \return text height
*/
wPos_t wMessageGetHeight(
long flags)
{
return 14;
}
/**
* Create a window for a simple text.
*
* \param IN parent Handle of parent window
* \param IN x position in x direction
* \param IN y position in y direction
* \param IN labelStr ???
* \param IN width horizontal size of window
* \param IN message message to display ( null terminated )
* \param IN flags display options
* \return handle for created window
*/
wMessage_p wMessageCreateEx(
wWin_p parent,
wPos_t x,
wPos_t y,
const char * labelStr,
wPos_t width,
const char *message,
long flags)
{
wMessage_p b;
GtkRequisition requisition;
GtkStyle *style;
PangoFontDescription *fontDesc;
int fontSize;
b = (wMessage_p)wlibAlloc(parent, B_MESSAGE, x, y, NULL, sizeof *b, NULL);
wlibComputePos((wControl_p)b);
b->message = message;
b->labelWidth = width;
b->labelWidget = gtk_label_new(message?wlibConvertInput(message):"");
/* do we need to set a special font? */
if (wMessageSetFont(flags)) {
/* get the current font descriptor */
style = gtk_widget_get_style(GTK_WIDGET(b->labelWidget));
fontDesc = style->font_desc;
/* get the current font size */
fontSize = PANGO_PIXELS(pango_font_description_get_size(fontDesc));
/* calculate the new font size */
if (flags & BM_LARGE) {
pango_font_description_set_size(fontDesc, fontSize * 1.4 * PANGO_SCALE);
} else {
pango_font_description_set_size(fontDesc, fontSize * 0.7 * PANGO_SCALE);
}
/* set the new font size */
gtk_widget_modify_font((GtkWidget *)b->labelWidget, fontDesc);
}
b->widget = gtk_fixed_new();
gtk_widget_size_request(GTK_WIDGET(b->labelWidget), &requisition);
gtk_container_add(GTK_CONTAINER(b->widget), b->labelWidget);
gtk_widget_set_size_request(b->widget, width?width:requisition.width,
requisition.height);
wlibControlGetSize((wControl_p)b);
gtk_fixed_put(GTK_FIXED(parent->widget), b->widget, b->realX, b->realY);
gtk_widget_show(b->widget);
gtk_widget_show(b->labelWidget);
wlibAddButton((wControl_p)b);
/* Reset font size to normal */
if (wMessageSetFont(flags)) {
pango_font_description_set_size(fontDesc, fontSize * PANGO_SCALE);
}
return b;
}
|
