annotate dwt/widgets/Composite.d @ 71:295b29fc7d13

Renamed SWT to DWT
author Frank Benoit <benoit@tionex.de>
date Tue, 15 Jan 2008 06:44:34 +0100
parents 6537a52fde85
children 5899e0b43e5d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1 /*******************************************************************************
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
2 * Copyright (c) 2000, 2007 IBM Corporation and others.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
3 * All rights reserved. This program and the accompanying materials
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
4 * are made available under the terms of the Eclipse Public License v1.0
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
5 * which accompanies this distribution, and is available at
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
6 * http://www.eclipse.org/legal/epl-v10.html
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
7 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
8 * Contributors:
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
9 * IBM Corporation - initial API and implementation
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
10 *******************************************************************************/
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
11 module dwt.widgets.Composite;
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
12
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
13 import dwt.widgets.Control;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
14 import dwt.widgets.Scrollable;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
15 import dwt.widgets.Layout;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
16 import dwt.widgets.Decorations;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
17 import dwt.widgets.ScrollBar;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
18 import dwt.widgets.Shell;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
19 import dwt.widgets.Menu;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
20 import dwt.widgets.Event;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
21 import dwt.widgets.Widget;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
22 import dwt.widgets.Display;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
23 import dwt.graphics.GCData;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
24
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
25 import dwt.internal.gtk.OS;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
26 import dwt.graphics.GC;
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
27 import dwt.DWT;
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
28 import dwt.internal.cairo.Cairo;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
29 import dwt.internal.gtk.OS;
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
30 import dwt.graphics.Rectangle;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
31
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
32 import tango.io.Stdout;
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
33
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
34 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
35 * Instances of this class are controls which are capable
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
36 * of containing other controls.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
37 * <dl>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
38 * <dt><b>Styles:</b></dt>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
39 * <dd>NO_BACKGROUND, NO_FOCUS, NO_MERGE_PAINTS, NO_REDRAW_RESIZE, NO_RADIO_GROUP, EMBEDDED, DOUBLE_BUFFERED</dd>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
40 * <dt><b>Events:</b></dt>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
41 * <dd>(none)</dd>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
42 * </dl>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
43 * <p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
44 * Note: The <code>NO_BACKGROUND</code>, <code>NO_FOCUS</code>, <code>NO_MERGE_PAINTS</code>,
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
45 * and <code>NO_REDRAW_RESIZE</code> styles are intended for use with <code>Canvas</code>.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
46 * They can be used with <code>Composite</code> if you are drawing your own, but their
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
47 * behavior is undefined if they are used with subclasses of <code>Composite</code> other
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
48 * than <code>Canvas</code>.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
49 * </p><p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
50 * Note: The <code>CENTER</code> style, although undefined for composites, has the
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
51 * same value as <code>EMBEDDED</code> (which is used to embed widgets from other
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
52 * widget toolkits into DWT). On some operating systems (GTK, Motif), this may cause
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
53 * the children of this composite to be obscured. The <code>EMBEDDED</code> style
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
54 * is for use by other widget toolkits and should normally never be used.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
55 * </p><p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
56 * This class may be subclassed by custom control implementors
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
57 * who are building controls that are constructed from aggregates
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
58 * of other controls.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
59 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
60 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
61 * @see Canvas
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
62 */
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
63 public class Composite : Scrollable {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
64 public int embeddedHandle;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
65 GtkIMContext* imHandle_;
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
66 GtkWidget* socketHandle;
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
67 Layout layout_;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
68 Control[] tabList;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
69 int layoutCount, backgroundMode;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
70
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
71 static const char[] NO_INPUT_METHOD = "dwt.internal.gtk.noInputMethod"; //$NON-NLS-1$
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
72
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
73 this () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
74 /* Do nothing */
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
75 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
76
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
77 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
78 * Constructs a new instance of this class given its parent
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
79 * and a style value describing its behavior and appearance.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
80 * <p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
81 * The style value is either one of the style constants defined in
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
82 * class <code>DWT</code> which is applicable to instances of this
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
83 * class, or must be built by <em>bitwise OR</em>'ing together
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
84 * (that is, using the <code>int</code> "|" operator) two or more
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
85 * of those <code>DWT</code> style constants. The class description
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
86 * lists the style constants that are applicable to the class.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
87 * Style bits are also inherited from superclasses.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
88 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
89 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
90 * @param parent a widget which will be the parent of the new instance (cannot be null)
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
91 * @param style the style of widget to construct
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
92 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
93 * @exception IllegalArgumentException <ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
94 * <li>ERROR_NULL_ARGUMENT - if the parent is null</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
95 * </ul>
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
96 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
97 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the parent</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
98 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
99 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
100 * @see DWT#NO_BACKGROUND
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
101 * @see DWT#NO_FOCUS
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
102 * @see DWT#NO_MERGE_PAINTS
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
103 * @see DWT#NO_REDRAW_RESIZE
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
104 * @see DWT#NO_RADIO_GROUP
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
105 * @see Widget#getStyle
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
106 */
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
107 public this (Composite parent, int style) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
108 super (parent, style);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
109 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
110
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
111 Control [] _getChildren () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
112 auto parentHandle = parentingHandle ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
113 auto list = OS.gtk_container_get_children (cast(GtkContainer*)parentHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
114 if (list is null) return new Control [0];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
115 int count = OS.g_list_length (list);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
116 Control [] children = new Control [count];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
117 int i = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
118 auto temp = list;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
119 while (temp !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
120 auto handle = cast(GtkWidget*)OS.g_list_data (temp);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
121 if (handle !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
122 Widget widget = display.getWidget (handle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
123 if (widget !is null && widget !is this) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
124 if (auto c = cast(Control)widget) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
125 children [i++] = c;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
126 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
127 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
128 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
129 temp = cast(GList*)OS.g_list_next (temp);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
130 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
131 OS.g_list_free (list);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
132 if (i is count) return children;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
133 Control [] newChildren = new Control [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
134 System.arraycopy (children, 0, newChildren, 0, i);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
135 return newChildren;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
136 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
137
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
138 Control [] _getTabList () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
139 if (tabList is null) return tabList;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
140 int count = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
141 for (int i=0; i<tabList.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
142 if (!tabList [i].isDisposed ()) count++;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
143 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
144 if (count is tabList.length) return tabList;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
145 Control [] newList = new Control [count];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
146 int index = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
147 for (int i=0; i<tabList.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
148 if (!tabList [i].isDisposed ()) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
149 newList [index++] = tabList [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
150 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
151 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
152 tabList = newList;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
153 return tabList;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
154 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
155
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
156 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
157 * Clears any data that has been cached by a Layout for all widgets that
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
158 * are in the parent hierarchy of the changed control up to and including the
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
159 * receiver. If an ancestor does not have a layout, it is skipped.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
160 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
161 * @param changed an array of controls that changed state and require a recalculation of size
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
162 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
163 * @exception IllegalArgumentException <ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
164 * <li>ERROR_INVALID_ARGUMENT - if the changed array is null any of its controls are null or have been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
165 * <li>ERROR_INVALID_PARENT - if any control in changed is not in the widget tree of the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
166 * </ul>
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
167 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
168 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
169 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
170 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
171 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
172 * @since 3.1
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
173 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
174 public void changed (Control[] changed) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
175 checkWidget ();
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
176 if (changed is null) error (DWT.ERROR_INVALID_ARGUMENT);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
177 for (int i=0; i<changed.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
178 Control control = changed [i];
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
179 if (control is null) error (DWT.ERROR_INVALID_ARGUMENT);
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
180 if (control.isDisposed ()) error (DWT.ERROR_INVALID_ARGUMENT);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
181 bool ancestor = false;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
182 Composite composite = control.parent;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
183 while (composite !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
184 ancestor = composite is this;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
185 if (ancestor) break;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
186 composite = composite.parent;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
187 }
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
188 if (!ancestor) error (DWT.ERROR_INVALID_PARENT);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
189 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
190 for (int i=0; i<changed.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
191 Control child = changed [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
192 Composite composite = child.parent;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
193 while (child !is this) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
194 if (composite.layout_ is null || !composite.layout_.flushCache (child)) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
195 composite.state |= LAYOUT_CHANGED;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
196 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
197 child = composite;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
198 composite = child.parent;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
199 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
200 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
201 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
202
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
203 override void checkBuffered () {
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
204 if ((style & DWT.DOUBLE_BUFFERED) is 0 && (style & DWT.NO_BACKGROUND) !is 0) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
205 return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
206 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
207 super.checkBuffered();
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
208 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
209
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
210 override protected void checkSubclass () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
211 /* Do nothing - Subclassing is allowed */
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
212 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
213
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
214 override GtkStyle* childStyle () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
215 if (scrolledHandle !is null) return null;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
216 return super.childStyle ();
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
217 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
218
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
219 override public Point computeSize (int wHint, int hHint, bool changed) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
220 checkWidget ();
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
221 if (wHint !is DWT.DEFAULT && wHint < 0) wHint = 0;
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
222 if (hHint !is DWT.DEFAULT && hHint < 0) hHint = 0;
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
223 Point size;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
224 if (layout_ !is null) {
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
225 if (wHint is DWT.DEFAULT || hHint is DWT.DEFAULT) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
226 changed |= (state & LAYOUT_CHANGED) !is 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
227 size = layout_.computeSize (this, wHint, hHint, changed);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
228 state &= ~LAYOUT_CHANGED;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
229 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
230 size = new Point (wHint, hHint);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
231 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
232 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
233 size = minimumSize (wHint, hHint, changed);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
234 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
235 if (size.x is 0) size.x = DEFAULT_WIDTH;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
236 if (size.y is 0) size.y = DEFAULT_HEIGHT;
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
237 if (wHint !is DWT.DEFAULT) size.x = wHint;
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
238 if (hHint !is DWT.DEFAULT) size.y = hHint;
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
239 Rectangle trim = computeTrim (0, 0, size.x, size.y);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
240 return new Point (trim.width, trim.height);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
241 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
242
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
243 override Control [] computeTabList () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
244 Control result [] = super.computeTabList ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
245 if (result.length is 0) return result;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
246 Control [] list = tabList !is null ? _getTabList () : _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
247 for (int i=0; i<list.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
248 Control child = list [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
249 Control [] childList = child.computeTabList ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
250 if (childList.length !is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
251 Control [] newResult = new Control [result.length + childList.length];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
252 System.arraycopy (result, 0, newResult, 0, result.length);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
253 System.arraycopy (childList, 0, newResult, result.length, childList.length);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
254 result = newResult;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
255 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
256 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
257 return result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
258 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
259
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
260 override void createHandle (int index) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
261 state |= HANDLE | CANVAS;
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
262 bool scrolled = (style & (DWT.H_SCROLL | DWT.V_SCROLL)) !is 0;
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
263 if (!scrolled) state |= THEME_BACKGROUND;
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
264 createHandle (index, true, scrolled || (style & DWT.BORDER) !is 0);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
265 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
266
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
267 void createHandle (int index, bool fixed, bool scrolled) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
268 if (scrolled) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
269 if (fixed) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
270 fixedHandle = cast(GtkWidget*) OS.g_object_new (display.gtk_fixed_get_type (), null);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
271 if (fixedHandle is null) error (DWT.ERROR_NO_HANDLES);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
272 OS.gtk_fixed_set_has_window (cast(GtkFixed*)fixedHandle, true);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
273 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
274 auto vadj = cast(GtkAdjustment*)OS.gtk_adjustment_new (0, 0, 100, 1, 10, 10);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
275 if (vadj is null) error (DWT.ERROR_NO_HANDLES);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
276 auto hadj = cast(GtkAdjustment*)OS.gtk_adjustment_new (0, 0, 100, 1, 10, 10);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
277 if (hadj is null) error (DWT.ERROR_NO_HANDLES);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
278 scrolledHandle = cast(GtkWidget*) OS.gtk_scrolled_window_new (hadj, vadj);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
279 if (scrolledHandle is null) DWT.error (DWT.ERROR_NO_HANDLES);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
280 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
281 handle = cast(GtkWidget*)OS.g_object_new (display.gtk_fixed_get_type (), null);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
282 if (handle is null) DWT.error (DWT.ERROR_NO_HANDLES);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
283 OS.gtk_fixed_set_has_window (cast(GtkFixed*)handle, true);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
284 OS.GTK_WIDGET_SET_FLAGS(handle, OS.GTK_CAN_FOCUS);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
285 if ((style & DWT.EMBEDDED) is 0) {
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
286 if ((state & CANVAS) !is 0 && (style & DWT.NO_FOCUS) is 0) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
287 /* Prevent an input method context from being created for the Browser widget */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
288 if (display.getData (NO_INPUT_METHOD) is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
289 imHandle_ = OS.gtk_im_multicontext_new ();
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
290 if (imHandle_ is null) error (DWT.ERROR_NO_HANDLES);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
291 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
292 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
293 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
294 if (scrolled) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
295 if (fixed) OS.gtk_container_add (cast(GtkContainer*)fixedHandle, scrolledHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
296 /*
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
297 * Force the scrolledWindow to have a single child that is
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
298 * not scrolled automatically. Calling gtk_container_add()
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
299 * seems to add the child correctly but cause a warning.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
300 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
301 bool warnings = display.getWarnings ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
302 display.setWarnings (false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
303 OS.gtk_container_add (cast(GtkContainer*)scrolledHandle, handle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
304 display.setWarnings (warnings);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
305
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
306 int hsp = (style & DWT.H_SCROLL) !is 0 ? OS.GTK_POLICY_ALWAYS : OS.GTK_POLICY_NEVER;
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
307 int vsp = (style & DWT.V_SCROLL) !is 0 ? OS.GTK_POLICY_ALWAYS : OS.GTK_POLICY_NEVER;
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
308 OS.gtk_scrolled_window_set_policy (cast(GtkScrolledWindow*)scrolledHandle, hsp, vsp);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
309 if (hasBorder ()) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
310 OS.gtk_scrolled_window_set_shadow_type (cast(GtkScrolledWindow*)scrolledHandle, OS.GTK_SHADOW_ETCHED_IN);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
311 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
312 }
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
313 if ((style & DWT.EMBEDDED) !is 0) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
314 socketHandle = OS.gtk_socket_new ();
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
315 if (socketHandle is null) DWT.error (DWT.ERROR_NO_HANDLES);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
316 OS.gtk_container_add (cast(GtkContainer*)handle, cast(GtkWidget*)socketHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
317 }
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
318 if ((style & DWT.NO_REDRAW_RESIZE) !is 0) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
319 OS.gtk_widget_set_redraw_on_allocate (handle, false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
320 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
321 /*
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
322 * Bug in GTK. When a widget is double buffered and the back
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
323 * pixmap is null, the double buffer pixmap is filled with the
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
324 * background of the widget rather than the current contents of
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
325 * the screen. If nothing is drawn during an expose event,
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
326 * the pixels are altered. The fix is to clear double buffering
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
327 * when NO_BACKGROUND is set and DOUBLE_BUFFERED
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
328 * is not explicitly set.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
329 */
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
330 if ((style & DWT.DOUBLE_BUFFERED) is 0 && (style & DWT.NO_BACKGROUND) !is 0) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
331 OS.gtk_widget_set_double_buffered (handle, false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
332 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
333 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
334
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
335 override void deregister () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
336 super.deregister ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
337 if (socketHandle !is null) display.removeWidget (cast(GtkWidget*)socketHandle);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
338 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
339
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
340 void drawBackground (GC gc, int x, int y, int width, int height) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
341 Control control = findBackgroundControl ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
342 if (control !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
343 GCData data = gc.getGCData ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
344 auto cairo = data.cairo;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
345 if (cairo !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
346 Cairo.cairo_save (cairo);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
347 if (control.backgroundImage !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
348 Point pt = display.map (this, control, 0, 0);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
349 Cairo.cairo_translate (cairo, -pt.x, -pt.y);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
350 x += pt.x;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
351 y += pt.y;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
352 auto xDisplay = OS.GDK_DISPLAY ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
353 auto xVisual = OS.gdk_x11_visual_get_xvisual (OS.gdk_visual_get_system());
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
354 auto drawable = control.backgroundImage.pixmap;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
355 auto xDrawable = OS.GDK_PIXMAP_XID (drawable);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
356 int w, h;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
357 OS.gdk_drawable_get_size (cast(GdkDrawable*)drawable, &w, &h);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
358 auto surface = Cairo.cairo_xlib_surface_create (xDisplay, xDrawable, xVisual, w, h);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
359 if (surface is null) error (DWT.ERROR_NO_HANDLES);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
360 auto pattern = Cairo.cairo_pattern_create_for_surface (surface);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
361 if (pattern is null) error (DWT.ERROR_NO_HANDLES);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
362 Cairo.cairo_pattern_set_extend (pattern, Cairo.CAIRO_EXTEND_REPEAT);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
363 Cairo.cairo_set_source (cairo, pattern);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
364 Cairo.cairo_surface_destroy (surface);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
365 Cairo.cairo_pattern_destroy (pattern);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
366 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
367 GdkColor* color = control.getBackgroundColor ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
368 Cairo.cairo_set_source_rgba (cairo, (color.red & 0xFFFF) / cast(float)0xFFFF, (color.green & 0xFFFF) / cast(float)0xFFFF, (color.blue & 0xFFFF) / cast(float)0xFFFF, data.alpha / cast(float)0xFF);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
369 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
370 Cairo.cairo_rectangle (cairo, x, y, width, height);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
371 Cairo.cairo_fill (cairo);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
372 Cairo.cairo_restore (cairo);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
373 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
374 auto gdkGC = gc.handle;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
375 GdkGCValues* values = new GdkGCValues ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
376 OS.gdk_gc_get_values (gdkGC, values);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
377 if (control.backgroundImage !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
378 Point pt = display.map (this, control, 0, 0);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
379 OS.gdk_gc_set_fill (gdkGC, OS.GDK_TILED);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
380 OS.gdk_gc_set_ts_origin (gdkGC, -pt.x, -pt.y);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
381 OS.gdk_gc_set_tile (gdkGC, control.backgroundImage.pixmap);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
382 OS.gdk_draw_rectangle (data.drawable, gdkGC, 1, x, y, width, height);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
383 OS.gdk_gc_set_fill (gdkGC, values.fill);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
384 OS.gdk_gc_set_ts_origin (gdkGC, values.ts_x_origin, values.ts_y_origin);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
385 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
386 GdkColor* color = control.getBackgroundColor ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
387 OS.gdk_gc_set_foreground (gdkGC, color);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
388 OS.gdk_draw_rectangle (data.drawable, gdkGC, 1, x, y, width, height);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
389 color.pixel = values.foreground.pixel;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
390 OS.gdk_gc_set_foreground (gdkGC, color);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
391 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
392 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
393 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
394 gc.fillRectangle (x, y, width, height);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
395 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
396 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
397
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
398 override void enableWidget (bool enabled) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
399 if ((state & CANVAS) !is 0) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
400 super.enableWidget (enabled);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
401 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
402
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
403 Composite findDeferredControl () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
404 return layoutCount > 0 ? this : parent.findDeferredControl ();
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
405 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
406
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
407 override Menu [] findMenus (Control control) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
408 if (control is this) return new Menu [0];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
409 Menu result [] = super.findMenus (control);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
410 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
411 for (int i=0; i<children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
412 Control child = children [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
413 Menu [] menuList = child.findMenus (control);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
414 if (menuList.length !is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
415 Menu [] newResult = new Menu [result.length + menuList.length];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
416 System.arraycopy (result, 0, newResult, 0, result.length);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
417 System.arraycopy (menuList, 0, newResult, result.length, menuList.length);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
418 result = newResult;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
419 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
420 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
421 return result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
422 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
423
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
424 override void fixChildren (Shell newShell, Shell oldShell, Decorations newDecorations, Decorations oldDecorations, Menu [] menus) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
425 super.fixChildren (newShell, oldShell, newDecorations, oldDecorations, menus);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
426 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
427 for (int i=0; i<children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
428 children [i].fixChildren (newShell, oldShell, newDecorations, oldDecorations, menus);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
429 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
430 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
431
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
432 alias Scrollable.fixStyle fixStyle;
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
433 override void fixStyle () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
434 super.fixStyle ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
435 if (scrolledHandle is null) fixStyle (handle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
436 Control[] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
437 for (int i = 0; i < children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
438 children [i].fixStyle ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
439 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
440 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
441
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
442 void fixTabList (Control control) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
443 if (tabList is null) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
444 int count = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
445 for (int i=0; i<tabList.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
446 if (tabList [i] is control) count++;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
447 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
448 if (count is 0) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
449 Control [] newList = null;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
450 int length = tabList.length - count;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
451 if (length !is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
452 newList = new Control [length];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
453 int index = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
454 for (int i=0; i<tabList.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
455 if (tabList [i] !is control) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
456 newList [index++] = tabList [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
457 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
458 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
459 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
460 tabList = newList;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
461 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
462
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
463 void fixZOrder () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
464 if ((state & CANVAS) !is 0) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
465 auto parentHandle = parentingHandle ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
466 auto parentWindow = OS.GTK_WIDGET_WINDOW (cast(GtkWidget*)parentHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
467 if (parentWindow is null) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
468 GObject* userData;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
469 auto windowList = OS.gdk_window_get_children (parentWindow);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
470 if (windowList !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
471 auto windows = windowList;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
472 while (windows !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
473 auto window = cast(GdkDrawable*)OS.g_list_data (windows);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
474 if (window !is redrawWindow) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
475 OS.gdk_window_get_user_data (window, cast(void**)&userData);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
476 if (userData is null || OS.G_OBJECT_TYPE (cast(GTypeInstance*)userData) !is display.gtk_fixed_get_type ()) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
477 OS.gdk_window_lower (window);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
478 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
479 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
480 windows = cast(GList*)OS.g_list_next (windows);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
481 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
482 OS.g_list_free (windowList);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
483 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
484 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
485
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
486 override GtkWidget* focusHandle () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
487 if (socketHandle !is null) return socketHandle;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
488 return super.focusHandle ();
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
489 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
490
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
491 override bool forceFocus (GtkWidget* focusHandle) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
492 if (socketHandle !is null) OS.GTK_WIDGET_SET_FLAGS (focusHandle, OS.GTK_CAN_FOCUS);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
493 bool result = super.forceFocus (focusHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
494 if (socketHandle !is null) OS.GTK_WIDGET_UNSET_FLAGS (focusHandle, OS.GTK_CAN_FOCUS);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
495 return result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
496 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
497
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
498 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
499 * Returns the receiver's background drawing mode. This
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
500 * will be one of the following constants defined in class
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
501 * <code>DWT</code>:
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
502 * <code>INHERIT_NONE</code>, <code>INHERIT_DEFAULT</code>,
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
503 * <code>INHERTIT_FORCE</code>.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
504 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
505 * @return the background mode
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
506 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
507 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
508 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
509 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
510 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
511 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
512 * @see DWT
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
513 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
514 * @since 3.2
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
515 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
516 public int getBackgroundMode () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
517 checkWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
518 return backgroundMode;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
519 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
520
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
521 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
522 * Returns a (possibly empty) array containing the receiver's children.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
523 * Children are returned in the order that they are drawn. The topmost
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
524 * control appears at the beginning of the array. Subsequent controls
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
525 * draw beneath this control and appear later in the array.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
526 * <p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
527 * Note: This is not the actual structure used by the receiver
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
528 * to maintain its list of children, so modifying the array will
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
529 * not affect the receiver.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
530 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
531 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
532 * @return an array of children
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
533 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
534 * @see Control#moveAbove
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
535 * @see Control#moveBelow
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
536 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
537 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
538 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
539 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
540 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
541 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
542 public Control [] getChildren () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
543 checkWidget();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
544 return _getChildren ();
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
545 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
546
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
547 int getChildrenCount () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
548 /*
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
549 * NOTE: The current implementation will count
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
550 * non-registered children.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
551 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
552 auto list = OS.gtk_container_get_children (cast(GtkContainer*)handle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
553 if (list is null) return 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
554 int count = OS.g_list_length (list);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
555 OS.g_list_free (list);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
556 return count;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
557 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
558
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
559 override public Rectangle getClientArea () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
560 checkWidget();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
561 if ((state & CANVAS) !is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
562 if ((state & ZERO_WIDTH) !is 0 && (state & ZERO_HEIGHT) !is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
563 return new Rectangle (0, 0, 0, 0);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
564 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
565 forceResize ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
566 auto clientHandle = clientHandle ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
567 int width = (state & ZERO_WIDTH) !is 0 ? 0 : OS.GTK_WIDGET_WIDTH (clientHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
568 int height = (state & ZERO_HEIGHT) !is 0 ? 0 : OS.GTK_WIDGET_HEIGHT (clientHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
569 return new Rectangle (0, 0, width, height);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
570 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
571 return super.getClientArea();
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
572 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
573
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
574 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
575 * Returns layout which is associated with the receiver, or
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
576 * null if one has not been set.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
577 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
578 * @return the receiver's layout or null
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
579 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
580 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
581 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
582 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
583 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
584 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
585 public Layout getLayout () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
586 checkWidget();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
587 return layout_;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
588 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
589
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
590 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
591 * Returns <code>true</code> if the receiver has deferred
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
592 * the performing of layout, and <code>false</code> otherwise.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
593 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
594 * @return the receiver's deferred layout state
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
595 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
596 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
597 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
598 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
599 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
600 *
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
601 * @see #setLayoutDeferred(bool)
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
602 * @see #isLayoutDeferred()
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
603 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
604 * @since 3.1
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
605 */
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
606 public bool getLayoutDeferred () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
607 checkWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
608 return layoutCount > 0 ;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
609 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
610
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
611 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
612 * Gets the (possibly empty) tabbing order for the control.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
613 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
614 * @return tabList the ordered list of controls representing the tab order
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
615 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
616 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
617 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
618 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
619 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
620 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
621 * @see #setTabList
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
622 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
623 public Control [] getTabList () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
624 checkWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
625 Control [] tabList = _getTabList ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
626 if (tabList is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
627 int count = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
628 Control [] list =_getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
629 for (int i=0; i<list.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
630 if (list [i].isTabGroup ()) count++;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
631 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
632 tabList = new Control [count];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
633 int index = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
634 for (int i=0; i<list.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
635 if (list [i].isTabGroup ()) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
636 tabList [index++] = list [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
637 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
638 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
639 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
640 return tabList;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
641 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
642
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
643 override int /*long*/ gtk_button_press_event (GtkWidget* widget, GdkEventButton* event) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
644 auto result = super.gtk_button_press_event (widget, event);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
645 if (result !is 0) return result;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
646 if ((state & CANVAS) !is 0) {
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
647 if ((style & DWT.NO_FOCUS) is 0 && hooksKeys ()) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
648 if (event.button is 1) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
649 if (getChildrenCount () is 0) setFocus ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
650 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
651 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
652 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
653 return result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
654 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
655
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
656 override int /*long*/ gtk_expose_event (GtkWidget* widget, GdkEventExpose* eventPtr) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
657 if ((state & OBSCURED) !is 0) return 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
658 if ((state & CANVAS) is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
659 return super.gtk_expose_event (widget, eventPtr);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
660 }
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
661 if ((style & DWT.NO_MERGE_PAINTS) is 0) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
662 return super.gtk_expose_event (widget, eventPtr);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
663 }
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
664 if (!hooks (DWT.Paint) && !filters (DWT.Paint)) return 0;
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
665 GdkEventExpose* gdkEvent = eventPtr;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
666 GdkRectangle* rectangles;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
667 int n_rectangles;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
668 OS.gdk_region_get_rectangles (gdkEvent.region, &rectangles, &n_rectangles);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
669 for (int i=0; i<n_rectangles; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
670 Event event = new Event ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
671 event.x = rectangles[i].x;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
672 event.y = rectangles[i].y;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
673 event.width = rectangles[i].width;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
674 event.height = rectangles[i].height;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
675 auto damageRgn = OS.gdk_region_new ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
676 OS.gdk_region_union_with_rect (damageRgn, rectangles + i );
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
677 GCData data = new GCData ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
678 data.damageRgn = damageRgn;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
679 GC gc = event.gc = GC.gtk_new (this, data);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
680 OS.gdk_gc_set_clip_region (gc.handle, damageRgn);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
681 sendEvent (DWT.Paint, event);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
682 gc.dispose ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
683 OS.gdk_region_destroy (damageRgn);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
684 event.gc = null;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
685 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
686 OS.g_free (rectangles);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
687 return 0;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
688 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
689
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
690 override int /*long*/ gtk_key_press_event (GtkWidget* widget, GdkEventKey* event) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
691 auto result = super.gtk_key_press_event (widget, event);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
692 if (result !is 0) return result;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
693 /*
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
694 * Feature in GTK. The default behavior when the return key
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
695 * is pressed is to select the default button. This is not the
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
696 * expected behavior for Composite and its subclasses. The
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
697 * fix is to avoid calling the default handler.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
698 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
699 if ((state & CANVAS) !is 0 && socketHandle is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
700 GdkEventKey* keyEvent = event;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
701 int key = keyEvent.keyval;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
702 switch (key) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
703 case OS.GDK_Return:
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
704 case OS.GDK_KP_Enter: return 1;
55
93981635e709 Checked and inserted missing default switch cases.
Frank Benoit <benoit@tionex.de>
parents: 40
diff changeset
705 default:
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
706 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
707 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
708 return result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
709 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
710
38
6e625fa1612d Shell, some code left
Frank Benoit <benoit@tionex.de>
parents: 37
diff changeset
711 override int /*long*/ gtk_focus (GtkWidget* widget, int directionType) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
712 if (widget is socketHandle) return 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
713 return super.gtk_focus (widget, directionType);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
714 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
715
37
c86fc3d50cfa Decorations
Frank Benoit <benoit@tionex.de>
parents: 34
diff changeset
716 override int /*long*/ gtk_focus_in_event (GtkWidget* widget, GdkEventFocus* event) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
717 int /*long*/ result = super.gtk_focus_in_event (widget, event);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
718 return (state & CANVAS) !is 0 ? 1 : result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
719 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
720
37
c86fc3d50cfa Decorations
Frank Benoit <benoit@tionex.de>
parents: 34
diff changeset
721 override int /*long*/ gtk_focus_out_event (GtkWidget* widget, GdkEventFocus* event) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
722 auto result = super.gtk_focus_out_event (widget, event);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
723 return (state & CANVAS) !is 0 ? 1 : result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
724 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
725
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
726 override int /*long*/ gtk_map (GtkWidget* widget) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
727 fixZOrder ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
728 return 0;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
729 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
730
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
731 override int /*long*/ gtk_realize (GtkWidget* widget) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
732 auto result = super.gtk_realize (widget);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
733 if ((style & DWT.NO_BACKGROUND) !is 0) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
734 auto window = OS.GTK_WIDGET_WINDOW (paintHandle ());
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
735 if (window !is null) OS.gdk_window_set_back_pixmap (window, null, false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
736 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
737 if (socketHandle !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
738 embeddedHandle = OS.gtk_socket_get_id (cast(GtkSocket*)socketHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
739 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
740 return result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
741 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
742
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
743 override int /*long*/ gtk_scroll_child (GtkWidget* widget, int /*long*/ scrollType, int /*long*/ horizontal) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
744 /* Stop GTK scroll child signal for canvas */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
745 OS.g_signal_stop_emission_by_name (widget, OS.scroll_child.ptr);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
746 return 1;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
747 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
748
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
749 override int /*long*/ gtk_style_set (GtkWidget* widget, int /*long*/ previousStyle) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
750 auto result = super.gtk_style_set (widget, previousStyle);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
751 if ((style & DWT.NO_BACKGROUND) !is 0) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
752 auto window = OS.GTK_WIDGET_WINDOW (paintHandle ());
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
753 if (window !is null) OS.gdk_window_set_back_pixmap (window, null, false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
754 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
755 return result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
756 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
757
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
758 bool hasBorder () {
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
759 return (style & DWT.BORDER) !is 0;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
760 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
761
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
762 override void hookEvents () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
763 super.hookEvents ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
764 if ((state & CANVAS) !is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
765 OS.gtk_widget_add_events (handle, OS.GDK_POINTER_MOTION_HINT_MASK);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
766 if (scrolledHandle !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
767 OS.g_signal_connect_closure (scrolledHandle, OS.scroll_child.ptr, display.closures [SCROLL_CHILD], false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
768 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
769 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
770 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
771
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
772 bool hooksKeys () {
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
773 return hooks (DWT.KeyDown) || hooks (DWT.KeyUp);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
774 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
775
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
776 override GtkIMContext* imHandle () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
777 return imHandle_;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
778 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
779
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
780 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
781 * Returns <code>true</code> if the receiver or any ancestor
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
782 * up to and including the receiver's nearest ancestor shell
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
783 * has deferred the performing of layouts. Otherwise, <code>false</code>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
784 * is returned.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
785 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
786 * @return the receiver's deferred layout state
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
787 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
788 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
789 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
790 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
791 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
792 *
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
793 * @see #setLayoutDeferred(bool)
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
794 * @see #getLayoutDeferred()
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
795 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
796 * @since 3.1
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
797 */
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
798 public bool isLayoutDeferred () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
799 checkWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
800 return findDeferredControl () !is null;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
801 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
802
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
803 override bool isTabGroup() {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
804 if ((state & CANVAS) !is 0) return true;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
805 return super.isTabGroup();
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
806 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
807
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
808 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
809 * If the receiver has a layout, asks the layout to <em>lay out</em>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
810 * (that is, set the size and location of) the receiver's children.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
811 * If the receiver does not have a layout, do nothing.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
812 * <p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
813 * This is equivalent to calling <code>layout(true)</code>.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
814 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
815 * <p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
816 * Note: Layout is different from painting. If a child is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
817 * moved or resized such that an area in the parent is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
818 * exposed, then the parent will paint. If no child is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
819 * affected, the parent will not paint.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
820 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
821 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
822 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
823 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
824 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
825 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
826 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
827 public void layout () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
828 checkWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
829 layout (true);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
830 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
831
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
832 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
833 * If the receiver has a layout, asks the layout to <em>lay out</em>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
834 * (that is, set the size and location of) the receiver's children.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
835 * If the argument is <code>true</code> the layout must not rely
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
836 * on any information it has cached about the immediate children. If it
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
837 * is <code>false</code> the layout may (potentially) optimize the
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
838 * work it is doing by assuming that none of the receiver's
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
839 * children has changed state since the last layout.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
840 * If the receiver does not have a layout, do nothing.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
841 * <p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
842 * If a child is resized as a result of a call to layout, the
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
843 * resize event will invoke the layout of the child. The layout
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
844 * will cascade down through all child widgets in the receiver's widget
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
845 * tree until a child is encountered that does not resize. Note that
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
846 * a layout due to a resize will not flush any cached information
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
847 * (same as <code>layout(false)</code>).
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
848 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
849 * <p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
850 * Note: Layout is different from painting. If a child is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
851 * moved or resized such that an area in the parent is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
852 * exposed, then the parent will paint. If no child is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
853 * affected, the parent will not paint.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
854 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
855 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
856 * @param changed <code>true</code> if the layout must flush its caches, and <code>false</code> otherwise
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
857 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
858 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
859 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
860 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
861 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
862 */
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
863 public void layout (bool changed) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
864 checkWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
865 if (layout_ is null) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
866 layout (changed, false);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
867 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
868
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
869 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
870 * If the receiver has a layout, asks the layout to <em>lay out</em>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
871 * (that is, set the size and location of) the receiver's children.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
872 * If the changed argument is <code>true</code> the layout must not rely
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
873 * on any information it has cached about its children. If it
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
874 * is <code>false</code> the layout may (potentially) optimize the
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
875 * work it is doing by assuming that none of the receiver's
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
876 * children has changed state since the last layout.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
877 * If the all argument is <code>true</code> the layout will cascade down
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
878 * through all child widgets in the receiver's widget tree, regardless of
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
879 * whether the child has changed size. The changed argument is applied to
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
880 * all layouts. If the all argument is <code>false</code>, the layout will
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
881 * <em>not</em> cascade down through all child widgets in the receiver's widget
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
882 * tree. However, if a child is resized as a result of a call to layout, the
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
883 * resize event will invoke the layout of the child. Note that
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
884 * a layout due to a resize will not flush any cached information
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
885 * (same as <code>layout(false)</code>).
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
886 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
887 * <p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
888 * Note: Layout is different from painting. If a child is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
889 * moved or resized such that an area in the parent is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
890 * exposed, then the parent will paint. If no child is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
891 * affected, the parent will not paint.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
892 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
893 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
894 * @param changed <code>true</code> if the layout must flush its caches, and <code>false</code> otherwise
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
895 * @param all <code>true</code> if all children in the receiver's widget tree should be laid out, and <code>false</code> otherwise
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
896 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
897 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
898 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
899 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
900 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
901 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
902 * @since 3.1
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
903 */
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
904 public void layout (bool changed, bool all) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
905 checkWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
906 if (layout_ is null && !all) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
907 markLayout (changed, all);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
908 updateLayout (all);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
909 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
910
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
911 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
912 * Forces a lay out (that is, sets the size and location) of all widgets that
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
913 * are in the parent hierarchy of the changed control up to and including the
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
914 * receiver. The layouts in the hierarchy must not rely on any information
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
915 * cached about the changed control or any of its ancestors. The layout may
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
916 * (potentially) optimize the work it is doing by assuming that none of the
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
917 * peers of the changed control have changed state since the last layout.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
918 * If an ancestor does not have a layout, skip it.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
919 * <p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
920 * Note: Layout is different from painting. If a child is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
921 * moved or resized such that an area in the parent is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
922 * exposed, then the parent will paint. If no child is
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
923 * affected, the parent will not paint.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
924 * </p>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
925 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
926 * @param changed a control that has had a state change which requires a recalculation of its size
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
927 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
928 * @exception IllegalArgumentException <ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
929 * <li>ERROR_INVALID_ARGUMENT - if the changed array is null any of its controls are null or have been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
930 * <li>ERROR_INVALID_PARENT - if any control in changed is not in the widget tree of the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
931 * </ul>
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
932 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
933 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
934 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
935 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
936 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
937 * @since 3.1
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
938 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
939 public void layout (Control [] changed) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
940 checkWidget ();
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
941 if (changed is null) error (DWT.ERROR_INVALID_ARGUMENT);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
942 for (int i=0; i<changed.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
943 Control control = changed [i];
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
944 if (control is null) error (DWT.ERROR_INVALID_ARGUMENT);
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
945 if (control.isDisposed ()) error (DWT.ERROR_INVALID_ARGUMENT);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
946 bool ancestor = false;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
947 Composite composite = control.parent;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
948 while (composite !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
949 ancestor = composite is this;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
950 if (ancestor) break;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
951 composite = composite.parent;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
952 }
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
953 if (!ancestor) error (DWT.ERROR_INVALID_PARENT);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
954 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
955 int updateCount = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
956 Composite [] update = new Composite [16];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
957 for (int i=0; i<changed.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
958 Control child = changed [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
959 Composite composite = child.parent;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
960 while (child !is this) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
961 if (composite.layout_ !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
962 composite.state |= LAYOUT_NEEDED;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
963 if (!composite.layout_.flushCache (child)) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
964 composite.state |= LAYOUT_CHANGED;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
965 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
966 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
967 if (updateCount is update.length) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
968 Composite [] newUpdate = new Composite [update.length + 16];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
969 System.arraycopy (update, 0, newUpdate, 0, update.length);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
970 update = newUpdate;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
971 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
972 child = update [updateCount++] = composite;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
973 composite = child.parent;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
974 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
975 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
976 for (int i=updateCount-1; i>=0; i--) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
977 update [i].updateLayout (false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
978 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
979 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
980
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
981 override void markLayout (bool changed, bool all) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
982 if (layout_ !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
983 state |= LAYOUT_NEEDED;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
984 if (changed) state |= LAYOUT_CHANGED;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
985 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
986 if (all) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
987 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
988 for (int i=0; i<children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
989 children [i].markLayout (changed, all);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
990 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
991 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
992 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
993
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
994 alias Scrollable.moveAbove moveAbove;
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
995 void moveAbove (GtkWidget* child, GtkWidget* sibling) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
996 if (child is sibling) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
997 auto parentHandle = parentingHandle ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
998 auto fixed = cast(GtkFixed*)parentHandle;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
999 GList* children = fixed.children;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1000 if (children is null) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1001 void* data;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1002 GtkWidget* widget;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1003 void* childData;
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1004 GList* childLink, siblingLink;
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
1005 GList* temp = children;
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1006 while (temp !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1007 data = temp.data;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1008 widget = *cast(GtkWidget**) data;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1009 if (child is widget) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1010 childLink = temp;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1011 childData = data;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1012 } else if (sibling is widget) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1013 siblingLink = temp;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1014 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1015 if (childData !is null && (sibling is null || siblingLink !is null)) break;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1016 temp = cast(GList*)OS.g_list_next (temp);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1017 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1018 children = OS.g_list_remove_link (children, childLink);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1019 if (siblingLink is null || siblingLink.prev is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1020 OS.g_list_free_1 (childLink);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1021 children = OS.g_list_prepend (children, childData);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1022 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1023 temp = siblingLink.prev;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1024 childLink.prev = temp;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1025 temp.next = childLink;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1026 childLink.next = siblingLink;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1027 siblingLink.prev = childLink;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1028 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1029 fixed.children = children;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1030 parentHandle = cast(GtkWidget*)fixed;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1031 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1032
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1033 alias Scrollable.moveBelow moveBelow;
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
1034 void moveBelow (GtkWidget* child, GtkWidget* sibling) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1035 if (child is sibling) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1036 auto parentHandle = parentingHandle ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1037 if (sibling is null && cast(GtkWidget*)parentHandle is cast(GtkWidget*)fixedHandle) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1038 moveAbove (child, scrolledHandle !is null ? cast(GtkWidget*)scrolledHandle : handle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1039 return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1040 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1041 auto fixed = cast(GtkFixed*)parentHandle;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1042 GList* children = fixed.children;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1043 if (children is null) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1044 void* data;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1045 GtkWidget* widget;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1046 void* childData;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1047 GList* childLink;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1048 GList* siblingLink;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1049 GList* temp = children;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1050 while (temp !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1051 data = temp.data;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1052 widget = *cast(GtkWidget**) temp.data;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1053 if (child is widget) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1054 childLink = temp;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1055 childData = data;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1056 } else if (sibling is widget) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1057 siblingLink = temp;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1058 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1059 if (childData !is null && (sibling is null || siblingLink !is null)) break;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1060 temp = OS.g_list_next(temp);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1061 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1062 children = OS.g_list_remove_link (children, childLink);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1063 if (siblingLink is null || OS.g_list_next(siblingLink) is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1064 OS.g_list_free_1 (childLink);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1065 children = OS.g_list_append (children, childData);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1066 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1067 temp = OS.g_list_next( siblingLink );
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1068 OS.g_list_set_next (childLink, temp);
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1069 OS.g_list_set_previous (temp, childLink);
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1070 OS.g_list_set_previous (childLink, siblingLink);
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1071 OS.g_list_set_next (siblingLink, childLink);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1072 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1073 fixed.children = children;
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
1074 parentHandle = cast(GtkWidget*)fixed;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1075 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1076
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
1077 Point minimumSize (int wHint, int hHint, bool changed) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1078 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1079 int width = 0, height = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1080 for (int i=0; i<children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1081 Rectangle rect = children [i].getBounds ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1082 width = Math.max (width, rect.x + rect.width);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1083 height = Math.max (height, rect.y + rect.height);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1084 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1085 return new Point (width, height);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1086 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1087
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
1088 GtkWidget* parentingHandle () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1089 if ((state & CANVAS) !is 0) return handle;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1090 return fixedHandle !is null ? fixedHandle : handle;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1091 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1092
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1093 override void redrawChildren () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1094 super.redrawChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1095 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1096 for (int i = 0; i < children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1097 Control child = children [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1098 if ((child.state & PARENT_BACKGROUND) !is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1099 child.redrawWidget (0, 0, 0, 0, true, false, true);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1100 child.redrawChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1101 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1102 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1103 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1104
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1105 override void register () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1106 super.register ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1107 if (socketHandle !is null) display.addWidget (socketHandle, this);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1108 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1109
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1110 override void releaseChildren (bool destroy) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1111 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1112 for (int i=0; i<children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1113 Control child = children [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1114 if (child !is null && !child.isDisposed ()) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1115 child.release (false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1116 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1117 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1118 super.releaseChildren (destroy);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1119 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1120
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1121 override void releaseHandle () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1122 super.releaseHandle ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1123 socketHandle = null;
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
1124 embeddedHandle = 0;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1125 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1126
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1127 override void releaseWidget () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1128 super.releaseWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1129 if (imHandle_ !is null) OS.g_object_unref (imHandle_);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1130 imHandle_ = null;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1131 layout_ = null;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1132 tabList = null;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1133 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1134
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1135 void removeControl (Control control) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1136 fixTabList (control);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1137 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1138
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1139 override void resizeHandle (int width, int height) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1140 super.resizeHandle (width, height);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1141 if (socketHandle !is null) OS.gtk_widget_set_size_request (socketHandle, width, height);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1142 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1143
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1144 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1145 * Sets the background drawing mode to the argument which should
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1146 * be one of the following constants defined in class <code>DWT</code>:
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1147 * <code>INHERIT_NONE</code>, <code>INHERIT_DEFAULT</code>,
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1148 * <code>INHERIT_FORCE</code>.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1149 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1150 * @param mode the new background mode
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1151 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1152 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1153 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1154 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1155 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1156 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1157 * @see DWT
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1158 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1159 * @since 3.2
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1160 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1161 public void setBackgroundMode (int mode) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1162 checkWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1163 backgroundMode = mode;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1164 Control[] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1165 for (int i = 0; i < children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1166 children [i].updateBackgroundMode ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1167 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1168 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1169
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1170 alias Scrollable.setBounds setBounds;
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1171 override int setBounds (int x, int y, int width, int height, bool move, bool resize) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1172 int result = super.setBounds (x, y, width, height, move, resize);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1173 if ((result & RESIZED) !is 0 && layout_ !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1174 markLayout (false, false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1175 updateLayout (false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1176 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1177 return result;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1178 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1179
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1180 override public bool setFocus () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1181 checkWidget();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1182 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1183 for (int i=0; i<children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1184 Control child = children [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1185 if (child.getVisible () && child.setFocus ()) return true;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1186 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1187 return super.setFocus ();
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1188 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1189
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1190 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1191 * Sets the layout which is associated with the receiver to be
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1192 * the argument which may be null.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1193 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1194 * @param layout the receiver's new layout or null
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1195 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1196 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1197 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1198 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1199 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1200 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1201 public void setLayout (Layout layout) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1202 checkWidget();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1203 this.layout_ = layout;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1204 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1205
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1206 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1207 * If the argument is <code>true</code>, causes subsequent layout
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1208 * operations in the receiver or any of its children to be ignored.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1209 * No layout of any kind can occur in the receiver or any of its
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1210 * children until the flag is set to false.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1211 * Layout operations that occurred while the flag was
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1212 * <code>true</code> are remembered and when the flag is set to
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1213 * <code>false</code>, the layout operations are performed in an
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1214 * optimized manner. Nested calls to this method are stacked.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1215 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1216 * @param defer the new defer state
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1217 *
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1218 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1219 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1220 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1221 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1222 *
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
1223 * @see #layout(bool)
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1224 * @see #layout(Control[])
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1225 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1226 * @since 3.1
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1227 */
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
1228 public void setLayoutDeferred (bool defer) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1229 if (!defer) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1230 if (--layoutCount is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1231 if ((state & LAYOUT_CHILD) !is 0 || (state & LAYOUT_NEEDED) !is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1232 updateLayout (true);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1233 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1234 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1235 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1236 layoutCount++;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1237 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1238 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1239
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1240 override bool setScrollBarVisible (ScrollBar bar, bool visible) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1241 bool changed = super.setScrollBarVisible (bar, visible);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1242 if (changed && layout_ !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1243 markLayout (false, false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1244 updateLayout (false);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1245 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1246 return changed;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1247 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1248
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1249 override bool setTabGroupFocus (bool next) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1250 if (isTabItem ()) return setTabItemFocus (next);
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1251 bool takeFocus = (style & DWT.NO_FOCUS) is 0;
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1252 if ((state & CANVAS) !is 0) takeFocus = hooksKeys ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1253 if (socketHandle !is null) takeFocus = true;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1254 if (takeFocus && setTabItemFocus (next)) return true;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1255 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1256 for (int i=0; i<children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1257 Control child = children [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1258 if (child.isTabItem () && child.setTabItemFocus (next)) return true;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1259 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1260 return false;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1261 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1262
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1263 override bool setTabItemFocus (bool next) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1264 if (!super.setTabItemFocus (next)) return false;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1265 if (socketHandle !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1266 int direction = next ? OS.GTK_DIR_TAB_FORWARD : OS.GTK_DIR_TAB_BACKWARD;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1267 OS.GTK_WIDGET_UNSET_FLAGS (socketHandle, OS.GTK_HAS_FOCUS);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1268 OS.gtk_widget_child_focus (socketHandle, direction);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1269 OS.GTK_WIDGET_SET_FLAGS (socketHandle, OS.GTK_HAS_FOCUS);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1270 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1271 return true;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1272 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1273
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1274 /**
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1275 * Sets the tabbing order for the specified controls to
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1276 * match the order that they occur in the argument list.
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1277 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1278 * @param tabList the ordered list of controls representing the tab order or null
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1279 *
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1280 * @exception IllegalArgumentException <ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1281 * <li>ERROR_INVALID_ARGUMENT - if a widget in the tabList is null or has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1282 * <li>ERROR_INVALID_PARENT - if widget in the tabList is not in the same widget tree</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1283 * </ul>
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1284 * @exception DWTException <ul>
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1285 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1286 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1287 * </ul>
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1288 */
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1289 public void setTabList (Control [] tabList) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1290 checkWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1291 if (tabList !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1292 for (int i=0; i<tabList.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1293 Control control = tabList [i];
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1294 if (control is null) error (DWT.ERROR_INVALID_ARGUMENT);
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1295 if (control.isDisposed ()) error (DWT.ERROR_INVALID_ARGUMENT);
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1296 if (control.parent !is this) error (DWT.ERROR_INVALID_PARENT);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1297 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1298 Control [] newList = new Control [tabList.length];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1299 System.arraycopy (tabList, 0, newList, 0, tabList.length);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1300 tabList = newList;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1301 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1302 this.tabList = tabList;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1303 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1304
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1305 override void showWidget () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1306 super.showWidget ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1307 if (socketHandle !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1308 OS.gtk_widget_show (socketHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1309 embeddedHandle = OS.gtk_socket_get_id (cast(GtkSocket*)socketHandle);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1310 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1311 if (scrolledHandle is null) fixStyle (handle);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1312 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1313
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1314 override bool translateMnemonic (Event event, Control control) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1315 if (super.translateMnemonic (event, control)) return true;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1316 if (control !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1317 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1318 for (int i=0; i<children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1319 Control child = children [i];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1320 if (child.translateMnemonic (event, control)) return true;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1321 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1322 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1323 return false;
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1324 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1325
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1326 override int traversalCode(int key, GdkEventKey* event) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1327 if ((state & CANVAS) !is 0) {
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 60
diff changeset
1328 if ((style & DWT.NO_FOCUS) !is 0) return 0;
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1329 if (hooksKeys ()) return 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1330 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1331 return super.traversalCode (key, event);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1332 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1333
58
a5c274fa5af9 extended helloworld crashing
Frank Benoit <benoit@tionex.de>
parents: 55
diff changeset
1334 override bool translateTraversal (GdkEventKey* keyEvent) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1335 if (socketHandle !is null) return false;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1336 return super.translateTraversal (keyEvent);
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1337 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1338
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1339 void updateBackgroundMode () {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1340 super.updateBackgroundMode ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1341 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1342 for (int i = 0; i < children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1343 children [i].updateBackgroundMode ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1344 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1345 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1346
34
3a3e3aa76b66 Composite
Frank Benoit <benoit@tionex.de>
parents: 33
diff changeset
1347 void updateLayout (bool all) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1348 Composite parent = findDeferredControl ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1349 if (parent !is null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1350 parent.state |= LAYOUT_CHILD;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1351 return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1352 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1353 if ((state & LAYOUT_NEEDED) !is 0) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1354 bool changed = (state & LAYOUT_CHANGED) !is 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1355 state &= ~(LAYOUT_NEEDED | LAYOUT_CHANGED);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1356 layout_.layout (this, changed);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1357 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1358 if (all) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1359 state &= ~LAYOUT_CHILD;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1360 Control [] children = _getChildren ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1361 for (int i=0; i<children.length; i++) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1362 children [i].updateLayout (all);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1363 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 58
diff changeset
1364 }
30
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1365 }
5e5d1c9cffdb ATK, Control
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1366 }