Mon, 17 Nov 2025 08:27:03 +0100
fix tabbar resizing (Motif)
|
4
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
1 | /* |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
2 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER. |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
3 | * |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
4 | * Copyright 2024 Olaf Wintermann. All rights reserved. |
|
4
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
5 | * |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
6 | * Redistribution and use in source and binary forms, with or without |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
7 | * modification, are permitted provided that the following conditions are met: |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
8 | * |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
9 | * 1. Redistributions of source code must retain the above copyright |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
10 | * notice, this list of conditions and the following disclaimer. |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
11 | * |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
12 | * 2. Redistributions in binary form must reproduce the above copyright |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
13 | * notice, this list of conditions and the following disclaimer in the |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
14 | * documentation and/or other materials provided with the distribution. |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
15 | * |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
16 | * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
17 | * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
18 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
19 | * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
20 | * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
21 | * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
22 | * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
23 | * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
24 | * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
25 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
26 | * POSSIBILITY OF SUCH DAMAGE. |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
27 | */ |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
28 | |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
29 | #include <stdio.h> |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
30 | #include <stdlib.h> |
|
62
70d2aee84432
added grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
61
diff
changeset
|
31 | #include <inttypes.h> |
|
4
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
32 | |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
33 | #include "container.h" |
|
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
34 | #include "../common/context.h" |
|
34
0ec8a5f17782
added listview and sidebar (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
4
diff
changeset
|
35 | #include "../common/object.h" |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
36 | #include "../common/container.h" |
|
4
39b9b86ec452
added simple container
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
diff
changeset
|
37 | |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
38 | #include <cx/array_list.h> |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
39 | |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
40 | #include "Grid.h" |
|
60
7cd1b8890302
added vbox container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
59
diff
changeset
|
41 | |
|
443
3379c8a5b6bb
implement ui_customwidget_create for Motif
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
426
diff
changeset
|
42 | |
|
480
7dfd5e546b99
move ui_customwidget to separate file
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
475
diff
changeset
|
43 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
44 | Widget ui_container_prepare(UiContainerPrivate *container, UiLayout *layout, Arg *args, int *n) { |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
45 | if(layout->margin != 0) { |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
46 | layout->margin_left = layout->margin; |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
47 | layout->margin_right = layout->margin; |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
48 | layout->margin_top = layout->margin; |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
49 | layout->margin_bottom = layout->margin; |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
50 | } |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
51 | return container->prepare(container, layout, args, n); |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
52 | } |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
53 | |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
54 | void ui_container_add(UiContainerPrivate *container, Widget widget) { |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
55 | container->add(container, widget); |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
56 | } |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
57 | |
|
443
3379c8a5b6bb
implement ui_customwidget_create for Motif
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
426
diff
changeset
|
58 | |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
59 | /* ---------------------------- Box Container ---------------------------- */ |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
60 | |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
61 | static UIWIDGET box_create(UiObject *obj, UiContainerArgs *args, UiBoxOrientation orientation) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
62 | UiContainerPrivate *ctn = ui_obj_container(obj); |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
63 | UiLayout layout = UI_ARGS2LAYOUT(args); |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
64 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
65 | Arg xargs[16]; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
66 | int n = 0; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
67 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
68 | if(orientation == UI_BOX_VERTICAL) { |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
69 | //XtSetArg(xargs[n], gridRowSpacing, args->spacing); n++; |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
70 | } else { |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
71 | //XtSetArg(xargs[n], gridColumnSpacing, args->spacing); n++; |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
72 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
73 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
74 | Widget parent = ui_container_prepare(ctn, &layout, xargs, &n); |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
75 | Widget grid = XtCreateManagedWidget(args->name ? args->name : "boxcontainer", gridClass, parent, xargs, n); |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
76 | ctn->add(ctn, grid); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
77 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
78 | UiContainerX *container = ui_box_container(obj, grid, orientation); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
79 | uic_object_push_container(obj, container); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
80 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
81 | return grid; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
82 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
83 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
84 | // public |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
85 | UIWIDGET ui_vbox_create(UiObject *obj, UiContainerArgs *args) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
86 | return box_create(obj, args, UI_BOX_VERTICAL); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
87 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
88 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
89 | // public |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
90 | UIWIDGET ui_hbox_create(UiObject *obj, UiContainerArgs *args) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
91 | return box_create(obj, args, UI_BOX_HORIZONTAL); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
92 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
93 | |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
94 | UiContainerX* ui_box_container(UiObject *obj, Widget grid, UiBoxOrientation orientation) { |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
95 | UiBoxContainer *ctn = ui_malloc(obj->ctx, sizeof(UiBoxContainer)); |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
96 | memset(ctn, 0, sizeof(UiBoxContainer)); |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
97 | ctn->container.prepare = orientation == UI_BOX_VERTICAL ? ui_vbox_prepare : ui_hbox_prepare; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
98 | ctn->container.add = ui_box_container_add; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
99 | ctn->container.widget = grid; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
100 | ctn->n = 0; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
101 | return (UiContainerX*)ctn; |
|
62
70d2aee84432
added grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
61
diff
changeset
|
102 | } |
|
70d2aee84432
added grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
61
diff
changeset
|
103 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
104 | static Widget ui_box_container_prepare(UiBoxContainer *box, UiLayout *layout, Arg *args, int *n) { |
|
64
6ef2c7f73a30
added simple tabview (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
63
diff
changeset
|
105 | int a = *n; |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
106 | box->n++; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
107 | return box->container.widget; |
|
61
7ee124a58fe3
improved box (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
60
diff
changeset
|
108 | } |
|
34
0ec8a5f17782
added listview and sidebar (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
4
diff
changeset
|
109 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
110 | Widget ui_vbox_prepare(UiContainerPrivate *ctn, UiLayout *layout, Arg *args, int *n) { |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
111 | UiBoxContainer *box = (UiBoxContainer*)ctn; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
112 | int a = *n; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
113 | XtSetArg(args[a], gridRow, box->n); a++; |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
114 | if(layout->fill) { |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
115 | XtSetArg(args[a], gridVExpand, TRUE); a++; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
116 | XtSetArg(args[a], gridVFill, TRUE); a++; |
|
64
6ef2c7f73a30
added simple tabview (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
63
diff
changeset
|
117 | } |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
118 | XtSetArg(args[a], gridHExpand, TRUE); a++; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
119 | XtSetArg(args[a], gridHFill, TRUE); a++; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
120 | *n = a; |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
121 | return ui_box_container_prepare(box, layout, args, n); |
|
91
c13e344fa55f
drawingarea based tab widget (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
76
diff
changeset
|
122 | } |
|
c13e344fa55f
drawingarea based tab widget (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
76
diff
changeset
|
123 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
124 | Widget ui_hbox_prepare(UiContainerPrivate *ctn, UiLayout *layout, Arg *args, int *n) { |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
125 | UiBoxContainer *box = (UiBoxContainer*)ctn; |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
126 | int a = *n; |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
127 | XtSetArg(args[a], gridColumn, box->n); a++; |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
128 | if(layout->fill) { |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
129 | XtSetArg(args[a], gridHExpand, TRUE); a++; |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
130 | XtSetArg(args[a], gridHFill, TRUE); a++; |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
131 | } |
|
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
132 | XtSetArg(args[a], gridVExpand, TRUE); a++; |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
133 | XtSetArg(args[a], gridVFill, TRUE); a++; |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
134 | *n = a; |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
135 | return ui_box_container_prepare(box, layout, args, n); |
|
52
25e5390cce41
added document tabview (GTK, Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
36
diff
changeset
|
136 | } |
|
25e5390cce41
added document tabview (GTK, Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
36
diff
changeset
|
137 | |
|
406
0ebf9d7b23e8
add first code of the new Motif implementation, implement buttons
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
253
diff
changeset
|
138 | void ui_box_container_add(UiContainerPrivate *ctn, Widget widget) { |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
139 | |
|
52
25e5390cce41
added document tabview (GTK, Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
36
diff
changeset
|
140 | } |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
141 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
142 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
143 | /* ---------------------------- Grid Container ---------------------------- */ |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
144 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
145 | // public |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
146 | UIWIDGET ui_grid_create(UiObject *obj, UiContainerArgs *args) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
147 | Arg xargs[16]; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
148 | int n = 0; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
149 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
150 | UiContainerPrivate *ctn = ui_obj_container(obj); |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
151 | UiLayout layout = UI_ARGS2LAYOUT(args); |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
152 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
153 | Widget parent = ui_container_prepare(ctn, &layout, xargs, &n); |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
154 | XtSetArg(xargs[n], gridMargin, args->margin); n++; |
|
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
155 | XtSetArg(xargs[n], gridColumnSpacing, args->columnspacing); n++; |
|
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
156 | XtSetArg(xargs[n], gridRowSpacing, args->rowspacing); n++; |
|
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
157 | Widget grid = XtCreateManagedWidget(args->name ? args->name : "gridcontainer", gridClass, parent, xargs, n); |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
158 | ui_container_add(ctn, grid); |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
159 | |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
160 | UiContainerX *container = ui_grid_container(obj, grid, args->def_hexpand, args->def_vexpand, args->def_hfill, args->def_vfill); |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
161 | uic_object_push_container(obj, container); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
162 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
163 | return grid; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
164 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
165 | |
|
482
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
166 | UiContainerX* ui_grid_container( |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
167 | UiObject *obj, |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
168 | Widget grid, |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
169 | UiBool def_hexpand, |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
170 | UiBool def_vexpand, |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
171 | UiBool def_hfill, |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
172 | UiBool def_vfill) |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
173 | { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
174 | UiGridContainer *ctn = ui_malloc(obj->ctx, sizeof(UiGridContainer)); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
175 | memset(ctn, 0, sizeof(UiBoxContainer)); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
176 | ctn->container.prepare = ui_grid_container_prepare; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
177 | ctn->container.add = ui_grid_container_add; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
178 | ctn->container.widget = grid; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
179 | ctn->x = 0; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
180 | ctn->y = 0; |
|
482
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
181 | ctn->def_hexpand = def_hexpand; |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
182 | ctn->def_vexpand = def_vexpand; |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
183 | ctn->def_hfill = def_hfill; |
|
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
184 | ctn->def_vfill = def_vfill; |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
185 | return (UiContainerX*)ctn; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
186 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
187 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
188 | Widget ui_grid_container_prepare(UiContainerPrivate *ctn, UiLayout *layout, Arg *args, int *n) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
189 | UiGridContainer *grid = (UiGridContainer*)ctn; |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
190 | if(ctn->container.newline) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
191 | grid->y++; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
192 | grid->x = 0; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
193 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
194 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
195 | int a = *n; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
196 | XtSetArg(args[a], gridColumn, grid->x); a++; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
197 | XtSetArg(args[a], gridRow, grid->y); a++; |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
198 | if(layout->colspan > 0) { |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
199 | XtSetArg(args[a], gridColspan, layout->colspan); a++; |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
200 | } |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
201 | if(layout->rowspan > 0) { |
|
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
202 | XtSetArg(args[a], gridRowspan, layout->rowspan); a++; |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
203 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
204 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
205 | uic_layout_setup_expand_fill(layout, grid->def_hexpand, grid->def_vexpand, grid->def_hfill, grid->def_vfill); |
|
482
5bc95a6228b0
implement grid default expand/fill (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
480
diff
changeset
|
206 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
207 | if(layout->hfill) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
208 | XtSetArg(args[a], gridHFill, TRUE); a++; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
209 | } |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
210 | if(layout->vfill) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
211 | XtSetArg(args[a], gridVFill, TRUE); a++; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
212 | } |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
213 | if(layout->hexpand) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
214 | XtSetArg(args[a], gridHExpand, TRUE); a++; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
215 | } |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
216 | if(layout->vexpand) { |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
217 | XtSetArg(args[a], gridVExpand, TRUE); a++; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
218 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
219 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
220 | *n = a; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
221 | return ctn->widget; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
222 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
223 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
224 | void ui_grid_container_add(UiContainerPrivate *ctn, Widget widget) { |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
225 | UiGridContainer *grid = (UiGridContainer*)ctn; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
226 | grid->x++; |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
227 | grid->container.container.newline = FALSE; |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
228 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
229 | |
|
886
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
230 | /* -------------------------- Frame Container -------------------------- */ |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
231 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
232 | UIWIDGET ui_frame_create(UiObject *obj, UiFrameArgs *args) { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
233 | Arg xargs[16]; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
234 | int n = 0; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
235 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
236 | UiContainerPrivate *ctn = ui_obj_container(obj); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
237 | UiLayout layout = UI_ARGS2LAYOUT(args); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
238 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
239 | Widget parent = ui_container_prepare(ctn, &layout, xargs, &n); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
240 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
241 | char *name = args->name ? (char*)args->name : "frame"; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
242 | Widget frame = XmCreateFrame(parent, name, xargs, 6); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
243 | XtManageChild(frame); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
244 | ui_container_add(ctn, frame); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
245 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
246 | if(args->label) { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
247 | XmString s = XmStringCreateLocalized((char*)args->label); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
248 | n = 0; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
249 | XtSetArg(xargs[n], XmNlabelString, s); n++; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
250 | XtSetArg(xargs[n], XmNchildType, XmFRAME_TITLE_CHILD); n++; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
251 | Widget label = XmCreateLabel(frame, "frame_label", xargs, n); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
252 | XtManageChild(label); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
253 | XmStringFree(s); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
254 | } |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
255 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
256 | UiContainerX *container = ui_frame_container(obj, frame); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
257 | uic_object_push_container(obj, container); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
258 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
259 | UiContainerArgs sub_args = { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
260 | .spacing = args->spacing, |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
261 | .columnspacing = args->columnspacing, |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
262 | .rowspacing = args->rowspacing |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
263 | }; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
264 | switch(args->subcontainer) { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
265 | default: break; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
266 | case UI_CONTAINER_VBOX: { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
267 | ui_vbox_create(obj, &sub_args); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
268 | uic_object_remove_second_last_container(obj); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
269 | break; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
270 | } |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
271 | case UI_CONTAINER_HBOX: { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
272 | ui_hbox_create(obj, &sub_args); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
273 | uic_object_remove_second_last_container(obj); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
274 | break; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
275 | } |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
276 | case UI_CONTAINER_GRID: { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
277 | ui_grid_create(obj, &sub_args); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
278 | uic_object_remove_second_last_container(obj); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
279 | break; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
280 | } |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
281 | } |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
282 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
283 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
284 | return frame; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
285 | } |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
286 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
287 | UiContainerX* ui_frame_container(UiObject *obj, Widget frame) { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
288 | UiContainerPrivate *ctn = ui_malloc(obj->ctx, sizeof(UiContainerPrivate)); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
289 | memset(ctn, 0, sizeof(UiContainerPrivate)); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
290 | ctn->prepare = ui_frame_container_prepare; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
291 | ctn->add = ui_frame_container_add; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
292 | ctn->widget = frame; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
293 | return (UiContainerX*)ctn; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
294 | } |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
295 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
296 | Widget ui_frame_container_prepare(UiContainerPrivate *ctn, UiLayout *layout, Arg *args, int *n) { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
297 | int a = *n; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
298 | XtSetArg(args[a], XmNchildType, XmFRAME_WORKAREA_CHILD); |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
299 | *n = a+1; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
300 | return ctn->widget; |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
301 | } |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
302 | |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
303 | void ui_frame_container_add(UiContainerPrivate *ctn, Widget widget) { |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
304 | // NOOP |
|
6f5e02fcb7b9
implement frame container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
808
diff
changeset
|
305 | } |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
306 | |
|
888
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
307 | /* -------------------------- SplitPane -------------------------- */ |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
308 | |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
309 | UIWIDGET ui_splitpane_create(UiObject *obj, UiSplitPaneArgs *args, int orientation) { |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
310 | return NULL; // TODO |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
311 | } |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
312 | |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
313 | UIWIDGET ui_hsplitpane_create(UiObject *obj, UiSplitPaneArgs *args) { |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
314 | return ui_splitpane_create(obj, args, XmHORIZONTAL); |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
315 | } |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
316 | |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
317 | UIWIDGET ui_vsplitpane_create(UiObject *obj, UiSplitPaneArgs *args) { |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
318 | return ui_splitpane_create(obj, args, XmVERTICAL); |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
319 | } |
|
1bb3a6641857
add drawingarea (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
886
diff
changeset
|
320 | |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
321 | /* -------------------------- TabView Container -------------------------- */ |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
322 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
323 | static void ui_tabbar_resize(Widget widget, XtPointer udata, XtPointer cdata) { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
324 | UiMotifTabView *tabview = udata; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
325 | |
|
475
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
326 | if(tabview->tabview == UI_TABVIEW_INVISIBLE) { |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
327 | return; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
328 | } |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
329 | |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
330 | int width = 0; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
331 | int height = 0; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
332 | XtVaGetValues(widget, XmNwidth, &width, XmNheight, &height, NULL); |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
333 | int numbuttons = cxListSize(tabview->tabs); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
334 | if(numbuttons == 0) { |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
335 | return; |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
336 | } |
|
900
6e1485d5451a
fix tabbar resizing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
888
diff
changeset
|
337 | width--; |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
338 | int button_width = width / numbuttons; |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
339 | int x = 0; |
|
900
6e1485d5451a
fix tabbar resizing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
888
diff
changeset
|
340 | |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
341 | CxIterator i = cxListIterator(tabview->tabs); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
342 | cx_foreach(UiTab *, tab, i) { |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
343 | if(i.index + 1 == numbuttons) { |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
344 | button_width = width - x; |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
345 | } |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
346 | XtVaSetValues( |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
347 | tab->tab_button, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
348 | XmNx, x, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
349 | XmNy, 0, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
350 | XmNwidth, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
351 | button_width, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
352 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
353 | NULL); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
354 | x += button_width; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
355 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
356 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
357 | if(height <= tabview->height) { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
358 | XtVaSetValues(widget, XmNheight, tabview->height + 4, NULL); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
359 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
360 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
361 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
362 | static void ui_tabbar_expose(Widget widget, XtPointer udata, XtPointer cdata) { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
363 | UiMotifTabView *tabview = udata; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
364 | XmDrawingAreaCallbackStruct *cbs = (XmDrawingAreaCallbackStruct *)cdata; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
365 | XEvent *event = cbs->event; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
366 | Display *dpy = XtDisplay(widget); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
367 | |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
368 | if(!tabview->gc_initialized) { |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
369 | XGCValues gcvals; |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
370 | gcvals.foreground = tabview->fg1; |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
371 | tabview->gc = XCreateGC(XtDisplay(tabview->tabbar), XtWindow(tabview->tabbar), (GCForeground), &gcvals); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
372 | } |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
373 | |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
374 | if(tabview->current_tab) { |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
375 | Widget tab = tabview->current_tab->tab_button; |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
376 | XFillRectangle(dpy, XtWindow(widget), tabview->gc, tab->core.x, tab->core.height, tab->core.width, 4); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
377 | } |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
378 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
379 | |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
380 | UIWIDGET ui_tabview_create(UiObject *obj, UiTabViewArgs *args) { |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
381 | Arg xargs[16]; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
382 | int n = 0; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
383 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
384 | UiContainerPrivate *ctn = ui_obj_container(obj); |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
385 | UiLayout layout = UI_ARGS2LAYOUT(args); |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
386 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
387 | // create widgets |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
388 | // form |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
389 | // - tabbar (Drawing Area) |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
390 | // - content (Frame) |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
391 | UiMotifTabView *tabview = malloc(sizeof(UiMotifTabView)); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
392 | memset(tabview, 0, sizeof(UiMotifTabView)); |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
393 | char *name = args->name ? (char*)args->name : "tabview"; |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
394 | XtSetArg(xargs[n], XmNuserData, tabview); n++; |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
395 | Widget parent = ui_container_prepare(ctn, &layout, xargs, &n); |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
396 | Widget form = XmCreateForm(parent, name, xargs, n); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
397 | XtManageChild(form); |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
398 | ui_container_add(ctn, parent); |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
399 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
400 | n = 0; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
401 | XtSetArg(xargs[n], XmNleftAttachment, XmATTACH_FORM); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
402 | XtSetArg(xargs[n], XmNrightAttachment, XmATTACH_FORM); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
403 | XtSetArg(xargs[n], XmNtopAttachment, XmATTACH_FORM); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
404 | XtSetArg(xargs[n], XmNorientation, XmHORIZONTAL); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
405 | XtSetArg(xargs[n], XmNpacking, XmPACK_TIGHT); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
406 | XtSetArg(xargs[n], XmNspacing, 1); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
407 | XtSetArg(xargs[n], XmNmarginWidth, 0); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
408 | XtSetArg(xargs[n], XmNmarginHeight, 0); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
409 | Widget tabbar = XmCreateDrawingArea(form, "ui_test", xargs, n); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
410 | XtManageChild(tabbar); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
411 | XtAddCallback(tabbar, XmNresizeCallback , ui_tabbar_resize, tabview); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
412 | XtAddCallback(tabbar, XmNexposeCallback, ui_tabbar_expose, tabview); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
413 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
414 | n = 0; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
415 | XtSetArg(xargs[n], XmNleftAttachment, XmATTACH_FORM); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
416 | XtSetArg(xargs[n], XmNrightAttachment, XmATTACH_FORM); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
417 | XtSetArg(xargs[n], XmNbottomAttachment, XmATTACH_FORM); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
418 | XtSetArg(xargs[n], XmNtopAttachment, XmATTACH_WIDGET); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
419 | XtSetArg(xargs[n], XmNtopWidget, tabbar); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
420 | Widget content = XmCreateFrame(form, "tabviewcontent", xargs, n); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
421 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
422 | // setup tabview object, that holds all relevant objects |
|
461
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
423 | tabview->obj = obj; |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
424 | tabview->form = form; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
425 | tabview->tabbar = tabbar; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
426 | tabview->content = content; |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
427 | tabview->tabview = args->tabview; |
|
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
428 | tabview->subcontainer = args->subcontainer; |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
429 | tabview->select = ui_motif_tabview_select; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
430 | tabview->add = ui_motif_tabview_add_tab; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
431 | tabview->remove = ui_motif_tabview_remove; |
|
475
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
432 | tabview->tabs = cxArrayListCreate(obj->ctx->allocator, cx_cmp_ptr, sizeof(UiTab), 8); |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
433 | tabview->current_index = -1; |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
434 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
435 | UiTabViewContainer *ct = ui_malloc(obj->ctx, sizeof(UiTabViewContainer)); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
436 | ct->container.widget = form; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
437 | ct->container.type = UI_CONTAINER_TABVIEW; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
438 | ct->container.prepare = ui_tabview_container_prepare; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
439 | ct->container.add = ui_tabview_container_add; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
440 | ct->tabview = tabview; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
441 | |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
442 | UiVar* var = uic_widget_var(obj->ctx, obj->ctx, args->value, args->varname, UI_VAR_INTEGER); |
|
475
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
443 | if(var) { |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
444 | UiInteger *i = var->value; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
445 | i->obj = tabview; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
446 | i->get = ui_tabview_get; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
447 | i->set = ui_tabview_set; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
448 | } |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
449 | |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
450 | uic_object_push_container(obj, (UiContainerX*)ct); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
451 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
452 | return form; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
453 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
454 | |
|
475
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
455 | int64_t ui_tabview_get(UiInteger *i) { |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
456 | UiMotifTabView *tabview = i->obj; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
457 | i->value = tabview->current_index; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
458 | return i->value; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
459 | } |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
460 | |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
461 | void ui_tabview_set(UiInteger *i, int64_t value) { |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
462 | UiMotifTabView *tabview = i->obj; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
463 | if(value < cxListSize(tabview->tabs)) { |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
464 | ui_motif_tabview_select(tabview, value); |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
465 | i->value = value; |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
466 | } |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
467 | } |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
468 | |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
469 | void ui_tab_create(UiObject *obj, const char* title) { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
470 | UiContainerPrivate *ctn = ui_obj_container(obj); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
471 | if(ctn->type != UI_CONTAINER_TABVIEW) { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
472 | fprintf(stderr, "UI Error: container is not a tabview\n"); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
473 | return; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
474 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
475 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
476 | UiMotifTabView *tabview = NULL; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
477 | XtVaGetValues(ctn->widget, XmNuserData, &tabview, NULL); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
478 | if(!tabview) { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
479 | fprintf(stderr, "UI Error: no tabview\n"); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
480 | return; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
481 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
482 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
483 | |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
484 | Widget child = ui_vbox_create(obj, &(UiContainerArgs) { 0 }); |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
485 | if(tabview->current) { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
486 | XtUnmanageChild(child); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
487 | } else { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
488 | tabview->current = child; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
489 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
490 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
491 | tabview->add(tabview, -1, title, child); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
492 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
493 | |
|
461
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
494 | void ui_tabview_select(UIWIDGET tabview, int tab) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
495 | UiMotifTabView *tabviewdata = NULL; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
496 | XtVaGetValues(tabview, XmNuserData, &tabviewdata, NULL); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
497 | if(tabviewdata) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
498 | ui_motif_tabview_select(tabviewdata, tab); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
499 | } else { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
500 | fprintf(stderr, "ui_tabview_select: widget is not a tabview\n"); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
501 | } |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
502 | } |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
503 | |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
504 | void ui_tabview_remove(UIWIDGET tabview, int tab) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
505 | UiMotifTabView *tabviewdata = NULL; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
506 | XtVaGetValues(tabview, XmNuserData, &tabviewdata, NULL); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
507 | if(tabviewdata) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
508 | ui_motif_tabview_remove(tabviewdata, tab); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
509 | } else { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
510 | fprintf(stderr, "ui_tabview_select: widget is not a tabview\n"); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
511 | } |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
512 | } |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
513 | |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
514 | UiObject* ui_tabview_add(UIWIDGET tabview, const char *name, int tab_index) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
515 | UiMotifTabView *tabviewdata = NULL; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
516 | XtVaGetValues(tabview, XmNuserData, &tabviewdata, NULL); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
517 | if(tabviewdata) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
518 | Arg args[16]; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
519 | int n = 0; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
520 | |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
521 | XtSetArg(args[n], XmNleftAttachment, XmATTACH_FORM); n++; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
522 | XtSetArg(args[n], XmNrightAttachment, XmATTACH_FORM); n++; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
523 | XtSetArg(args[n], XmNbottomAttachment, XmATTACH_FORM); n++; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
524 | XtSetArg(args[n], XmNtopAttachment, XmATTACH_WIDGET); n++; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
525 | XtSetArg(args[n], XmNtopWidget, tabviewdata->tabbar); n++; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
526 | |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
527 | Widget grid = XtCreateManagedWidget("vbox", gridClass, tabviewdata->content, args, n); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
528 | |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
529 | UiObject *newobj = ui_calloc(tabviewdata->obj->ctx, 1, sizeof(UiObject)); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
530 | newobj->ctx = tabviewdata->obj->ctx; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
531 | newobj->widget = grid; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
532 | UiContainerX *container = ui_box_container(newobj, grid, UI_BOX_VERTICAL); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
533 | newobj->container_begin = container; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
534 | newobj->container_end = container; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
535 | return newobj; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
536 | } else { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
537 | fprintf(stderr, "ui_tabview_select: widget is not a tabview\n"); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
538 | return NULL; |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
539 | } |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
540 | } |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
541 | |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
542 | void ui_motif_tabview_select(UiMotifTabView *tabview, int tab) { |
|
461
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
543 | UiTab *t = cxListAt(tabview->tabs, tab); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
544 | if(t) { |
|
475
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
545 | tabview->current_index = tab; |
|
461
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
546 | ui_motif_tabview_change_tab(tabview, t); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
547 | } |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
548 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
549 | |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
550 | static void ui_tab_button_callback(Widget widget, UiTab *tab, XtPointer d) { |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
551 | UiMotifTabView *tabview = NULL; |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
552 | XtVaGetValues(widget, XmNuserData, &tabview, NULL); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
553 | ui_motif_tabview_change_tab(tabview, tab); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
554 | } |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
555 | |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
556 | void ui_motif_tabview_add_tab(UiMotifTabView *tabview, int index, const char *name, Widget child) { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
557 | UiTab tab; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
558 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
559 | Arg args[16]; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
560 | int n = 0; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
561 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
562 | XmString label = XmStringCreateLocalized((char*)name); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
563 | XtSetArg(args[n], XmNlabelString, label); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
564 | XtSetArg(args[n], XmNshadowThickness, 0); n++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
565 | XtSetArg(args[n], XmNhighlightThickness, 0); n++; |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
566 | XtSetArg(args[n], XmNuserData, tabview); n++; |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
567 | |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
568 | Widget button = XmCreatePushButton(tabview->tabbar, "tab_button", args, n); |
|
475
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
569 | if(tabview->tabview != UI_TABVIEW_INVISIBLE) { |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
570 | XtManageChild(button); |
|
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
571 | } |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
572 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
573 | if(tabview->height == 0) { |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
574 | Dimension h; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
575 | XtVaGetValues( |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
576 | button, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
577 | XmNarmColor, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
578 | &tabview->bg1, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
579 | XmNbackground, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
580 | &tabview->bg2, |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
581 | XmNhighlightColor, |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
582 | &tabview->fg1, |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
583 | XmNheight, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
584 | &h, |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
585 | NULL); |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
586 | tabview->height = h + 2; // border |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
587 | |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
588 | XtVaSetValues(tabview->tabbar, XmNbackground, tabview->bg1, NULL); |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
589 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
590 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
591 | tab.tab_button = button; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
592 | tab.child = child; |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
593 | size_t newtab_index = cxListSize(tabview->tabs); |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
594 | cxListAdd(tabview->tabs, &tab); |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
595 | UiTab *newtab = cxListAt(tabview->tabs, newtab_index); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
596 | |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
597 | XtAddCallback( |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
598 | button, |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
599 | XmNactivateCallback, |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
600 | (XtCallbackProc)ui_tab_button_callback, |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
601 | newtab); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
602 | |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
603 | if(newtab_index == 0) { |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
604 | ui_motif_tabview_change_tab(tabview, newtab); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
605 | } else { |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
606 | XtVaSetValues(button, XmNbackground, tabview->bg1, NULL); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
607 | } |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
608 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
609 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
610 | void ui_motif_tabview_remove(UiMotifTabView *tabview, int index) { |
|
461
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
611 | UiTab *tab = cxListAt(tabview->tabs, index); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
612 | if(tab) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
613 | if(tab == tabview->current_tab) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
614 | if(index > 0) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
615 | ui_motif_tabview_select(tabview, index-1); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
616 | } else { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
617 | if(index < cxListSize(tabview->tabs)) { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
618 | ui_motif_tabview_select(tabview, index+1); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
619 | } else { |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
620 | tabview->current_tab = NULL; |
|
475
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
621 | tabview->current_index = -1; |
|
461
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
622 | } |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
623 | } |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
624 | } |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
625 | XtDestroyWidget(tab->tab_button); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
626 | XtDestroyWidget(tab->child); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
627 | cxListRemove(tabview->tabs, index); |
|
b480e133b576
implement missing tabview functions (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
460
diff
changeset
|
628 | } |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
629 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
630 | |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
631 | void ui_motif_tabview_change_tab(UiMotifTabView *tabview, UiTab *tab) { |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
632 | if(tabview->current_tab) { |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
633 | XtVaSetValues(tabview->current_tab->tab_button, XmNshadowThickness, 0, XmNbackground, tabview->bg1, NULL); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
634 | XtUnmanageChild(tabview->current_tab->child); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
635 | } |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
636 | XtVaSetValues(tab->tab_button, XmNshadowThickness, 1, XmNbackground, tabview->bg2, NULL); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
637 | tabview->current_tab = tab; |
|
475
8e06a446d552
implement tabview UiInteger binding (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
461
diff
changeset
|
638 | tabview->current_index = (int)cxListFind(tabview->tabs, tab);; |
|
460
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
639 | XtManageChild(tab->child); |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
640 | } |
|
1274d84f44de
finish minimal tabview implementation (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
452
diff
changeset
|
641 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
642 | Widget ui_tabview_container_prepare(UiContainerPrivate *ctn, UiLayout *layout, Arg *args, int *n) { |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
643 | UiTabViewContainer *ct = (UiTabViewContainer*)ctn; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
644 | UiMotifTabView *tabview = ct->tabview; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
645 | int a = *n; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
646 | XtSetArg(args[a], XmNleftAttachment, XmATTACH_FORM); a++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
647 | XtSetArg(args[a], XmNrightAttachment, XmATTACH_FORM); a++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
648 | XtSetArg(args[a], XmNbottomAttachment, XmATTACH_FORM); a++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
649 | XtSetArg(args[a], XmNtopAttachment, XmATTACH_WIDGET); a++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
650 | XtSetArg(args[a], XmNtopWidget, tabview->tabbar); a++; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
651 | *n = a; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
652 | return tabview->form; |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
653 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
654 | |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
655 | void ui_tabview_container_add(UiContainerPrivate *ctn, Widget widget) { |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
656 | |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
657 | } |
|
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
658 | |
|
484
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
659 | /* -------------------- ScrolledWindow -------------------- */ |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
660 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
661 | Widget ui_scrolledwindow_prepare(UiContainerPrivate *ctn, UiLayout *layout, Arg *args, int *n) { |
|
484
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
662 | return ctn->widget; |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
663 | } |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
664 | |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
665 | void ui_scrolledwindow_add(UiContainerPrivate *ctn, Widget widget) { |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
666 | |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
667 | } |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
668 | |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
669 | static UiContainerX* ui_scrolledwindow_container(UiObject *obj, Widget scrolledwindow) { |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
670 | UiContainerPrivate *ctn = ui_malloc(obj->ctx, sizeof(UiContainerPrivate)); |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
671 | memset(ctn, 0, sizeof(UiContainerPrivate)); |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
672 | ctn->prepare = ui_scrolledwindow_prepare; |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
673 | ctn->add = ui_scrolledwindow_add; |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
674 | ctn->widget = scrolledwindow; |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
675 | return (UiContainerX*)ctn; |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
676 | } |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
677 | |
|
595
e62047c59658
refactore widget args passing (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
484
diff
changeset
|
678 | UIWIDGET ui_scrolledwindow_create(UiObject* obj, UiFrameArgs *args) { |
|
484
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
679 | UiContainerPrivate *ctn = ui_obj_container(obj); |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
680 | UiLayout layout = UI_ARGS2LAYOUT(args); |
|
484
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
681 | |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
682 | Arg xargs[16]; |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
683 | int n = 0; |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
684 | |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
685 | XtSetArg(xargs[n], XmNscrollingPolicy, XmAUTOMATIC); n++; |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
686 | |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
687 | Widget parent = ui_container_prepare(ctn, &layout, xargs, &n); |
|
484
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
688 | Widget scrolledwindow = XmCreateScrolledWindow(parent, "scrolledwindow", xargs, n); |
|
808
2b0ecad00872
refactor motif containers
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
595
diff
changeset
|
689 | ui_container_add(ctn, scrolledwindow); |
|
484
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
690 | |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
691 | UiContainerX *container = ui_scrolledwindow_container(obj, scrolledwindow); |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
692 | uic_object_push_container(obj, container); |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
693 | |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
694 | return scrolledwindow; |
|
07055fcc5e2c
add ui_scrolledwindow_create (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
482
diff
changeset
|
695 | } |
|
452
a0620cf552a6
add first code for motif tabview (incomplete)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
443
diff
changeset
|
696 | |
|
407
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
697 | /* -------------------- Container Helper Functions -------------------- */ |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
698 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
699 | void ui_container_begin_close(UiObject *obj) { |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
700 | UiContainerPrivate *ct = ui_obj_container(obj); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
701 | ct->container.close = 1; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
702 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
703 | |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
704 | int ui_container_finish(UiObject *obj) { |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
705 | UiContainerPrivate *ct = ui_obj_container(obj); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
706 | if(ct->container.close) { |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
707 | ui_end_new(obj); |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
708 | return 0; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
709 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
710 | return 1; |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
711 | } |
|
8ea123dd89db
semi functional grid container (Motif)
Olaf Wintermann <olaf.wintermann@gmail.com>
parents:
406
diff
changeset
|
712 |