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
|
/*
* $Id$
*
* Copyright © 2004 Keith Packard
*
* Permission to use, copy, modify, distribute, and sell this software and its
* documentation for any purpose is hereby granted without fee, provided that
* the above copyright notice appear in all copies and that both that
* copyright notice and this permission notice appear in supporting
* documentation, and that the name of Keith Packard not be used in
* advertising or publicity pertaining to distribution of the software without
* specific, written prior permission. Keith Packard makes no
* representations about the suitability of this software for any purpose. It
* is provided "as is" without express or implied warranty.
*
* KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
* EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
* DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
* PERFORMANCE OF THIS SOFTWARE.
*/
#include "twin_hello.h"
#include <time.h>
static twin_time_t
_twin_hello_timeout (twin_time_t now, void *closure)
{
twin_label_t *labelb = closure;
time_t secs = time (0);
twin_label_set (labelb, ctime (&secs),
0xff008000,
twin_int_to_fixed (12),
TWIN_TEXT_OBLIQUE);
return 1000;
}
void
twin_hello_start (twin_screen_t *screen, const char *name, int x, int y, int w, int h)
{
twin_toplevel_t *top = twin_toplevel_create (screen,
TWIN_ARGB32,
TwinWindowApplication,
x, y, w, h, name);
twin_label_t *labela = twin_label_create (&top->box,
name,
0xff000080,
twin_int_to_fixed (12),
TWIN_TEXT_ROMAN);
twin_widget_t *widget = twin_widget_create (&top->box,
0xff800000,
1, 2, 0, 0);
twin_label_t *labelb = twin_label_create (&top->box,
name,
0xff008000,
twin_int_to_fixed (12),
TWIN_TEXT_OBLIQUE);
twin_button_t *button = twin_button_create (&top->box,
"Button",
0xff800000,
twin_int_to_fixed (18),
TWIN_TEXT_BOLD);
twin_widget_set (&labela->widget, 0xc0c0c0c0);
(void) widget;
twin_widget_set (&labelb->widget, 0xc0c0c0c0);
twin_widget_set (&button->label.widget, 0xc0808080);
twin_toplevel_show (top);
twin_set_timeout (_twin_hello_timeout, 1000, labelb);
}
|
