Mercurial > projects > dwt-linux
annotate dwt/widgets/Display.d @ 67:15b21862b0ac
List
author | Frank Benoit <benoit@tionex.de> |
---|---|
date | Mon, 14 Jan 2008 02:04:54 +0100 |
parents | bb2217c09e61 |
children | 7cf1deebc8d4 |
rev | line source |
---|---|
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1 /******************************************************************************* |
18 | 2 * Copyright (c) 2000, 2007 IBM Corporation and others. |
3 * All rights reserved. This program and the accompanying materials | |
4 * are made available under the terms of the Eclipse Public License v1.0 | |
5 * which accompanies this distribution, and is available at | |
6 * http://www.eclipse.org/legal/epl-v10.html | |
7 * | |
8 * Contributors: | |
9 * IBM Corporation - initial API and implementation | |
10 *******************************************************************************/ | |
11 module dwt.widgets.Display; | |
12 | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
13 import dwt.SWT; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
14 import dwt.graphics.Color; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
15 import dwt.graphics.Cursor; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
16 import dwt.graphics.Device; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
17 import dwt.graphics.DeviceData; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
18 import dwt.graphics.Font; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
19 import dwt.graphics.GCData; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
20 import dwt.graphics.Image; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
21 import dwt.graphics.ImageData; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
22 import dwt.graphics.PaletteData; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
23 import dwt.graphics.Point; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
24 import dwt.graphics.Rectangle; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
25 import dwt.graphics.Resource; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
26 import dwt.internal.Compatibility; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
27 import dwt.internal.Converter; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
28 import dwt.internal.Lock; |
27 | 29 import dwt.internal.LONG; |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
30 import dwt.internal.gtk.OS; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
31 import dwt.widgets.Caret; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
32 import dwt.widgets.Control; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
33 import dwt.widgets.Event; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
34 import dwt.widgets.EventTable; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
35 import dwt.widgets.Listener; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
36 import dwt.widgets.Menu; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
37 import dwt.widgets.Monitor; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
38 import dwt.widgets.Shell; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
39 import dwt.widgets.Synchronizer; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
40 import dwt.widgets.Tray; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
41 import dwt.widgets.Widget; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
42 |
26 | 43 import tango.stdc.string; |
44 import tango.stdc.stringz; | |
45 import dwt.dwthelper.utils; | |
46 import dwt.dwthelper.Runnable; | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
47 |
46 | 48 import tango.core.Thread; |
54 | 49 import tango.io.Stdout; |
18 | 50 |
51 /** | |
52 * Instances of this class are responsible for managing the | |
53 * connection between SWT and the underlying operating | |
54 * system. Their most important function is to implement | |
55 * the SWT event loop in terms of the platform event model. | |
56 * They also provide various methods for accessing information | |
57 * about the operating system, and have overall control over | |
58 * the operating system resources which SWT allocates. | |
59 * <p> | |
60 * Applications which are built with SWT will <em>almost always</em> | |
61 * require only a single display. In particular, some platforms | |
62 * which SWT supports will not allow more than one <em>active</em> | |
63 * display. In other words, some platforms do not support | |
64 * creating a new display if one already exists that has not been | |
65 * sent the <code>dispose()</code> message. | |
66 * <p> | |
67 * In SWT, the thread which creates a <code>Display</code> | |
68 * instance is distinguished as the <em>user-interface thread</em> | |
69 * for that display. | |
70 * </p> | |
71 * The user-interface thread for a particular display has the | |
72 * following special attributes: | |
73 * <ul> | |
74 * <li> | |
75 * The event loop for that display must be run from the thread. | |
76 * </li> | |
77 * <li> | |
78 * Some SWT API methods (notably, most of the public methods in | |
79 * <code>Widget</code> and its subclasses), may only be called | |
80 * from the thread. (To support multi-threaded user-interface | |
81 * applications, class <code>Display</code> provides inter-thread | |
82 * communication methods which allow threads other than the | |
83 * user-interface thread to request that it perform operations | |
84 * on their behalf.) | |
85 * </li> | |
86 * <li> | |
87 * The thread is not allowed to construct other | |
88 * <code>Display</code>s until that display has been disposed. | |
89 * (Note that, this is in addition to the restriction mentioned | |
90 * above concerning platform support for multiple displays. Thus, | |
91 * the only way to have multiple simultaneously active displays, | |
92 * even on platforms which support it, is to have multiple threads.) | |
93 * </li> | |
94 * </ul> | |
95 * Enforcing these attributes allows SWT to be implemented directly | |
96 * on the underlying operating system's event model. This has | |
97 * numerous benefits including smaller footprint, better use of | |
98 * resources, safer memory management, clearer program logic, | |
99 * better performance, and fewer overall operating system threads | |
100 * required. The down side however, is that care must be taken | |
101 * (only) when constructing multi-threaded applications to use the | |
102 * inter-thread communication mechanisms which this class provides | |
103 * when required. | |
104 * </p><p> | |
105 * All SWT API methods which may only be called from the user-interface | |
106 * thread are distinguished in their documentation by indicating that | |
107 * they throw the "<code>ERROR_THREAD_INVALID_ACCESS</code>" | |
108 * SWT exception. | |
109 * </p> | |
110 * <dl> | |
111 * <dt><b>Styles:</b></dt> | |
112 * <dd>(none)</dd> | |
113 * <dt><b>Events:</b></dt> | |
114 * <dd>Close, Dispose, Settings</dd> | |
115 * </dl> | |
116 * <p> | |
117 * IMPORTANT: This class is <em>not</em> intended to be subclassed. | |
118 * </p> | |
119 * @see #syncExec | |
120 * @see #asyncExec | |
121 * @see #wake | |
122 * @see #readAndDispatch | |
123 * @see #sleep | |
124 * @see Device#dispose | |
125 */ | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
126 public class Display : Device { |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
127 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
128 /* Events Dispatching and Callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
129 int gdkEventCount; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
130 GdkEvent* [] gdkEvents; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
131 Widget [] gdkEventWidgets; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
132 int [] dispatchEvents; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
133 Event [] eventQueue; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
134 GPollFD[] fds; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
135 int allocated_nfds; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
136 bool wake_state; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
137 int max_priority, timeout; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
138 void*/*Callback*/ eventCallback, filterCallback; |
27 | 139 |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
140 CallbackData*[int] windowProcCallbackDatas; // to prevent GC from collect |
27 | 141 |
142 CallbackData filterProcCallbackData; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
143 EventTable eventTable, filterTable; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
144 static char[] APP_NAME = "SWT"; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
145 static const char[] DISPATCH_EVENT_KEY = "dwt.internal.gtk.dispatchEvent"; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
146 static const char[] ADD_WIDGET_KEY = "dwt.internal.addWidget"; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
147 GClosure*[] closures; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
148 int [] signalIds; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
149 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
150 /* Widget Table */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
151 int [] indexTable; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
152 int freeSlot; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
153 GtkWidget* lastHandle; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
154 Widget lastWidget; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
155 Widget [] widgetTable; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
156 const static int GROW_SIZE = 1024; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
157 static int SWT_OBJECT_INDEX; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
158 static int SWT_OBJECT_INDEX1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
159 static int SWT_OBJECT_INDEX2; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
160 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
161 /* Focus */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
162 int focusEvent; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
163 Control focusControl; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
164 Shell activeShell; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
165 bool activePending; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
166 bool ignoreActivate, ignoreFocus; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
167 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
168 /* Input method resources */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
169 Control imControl; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
170 GtkWindow* preeditWindow; |
27 | 171 GtkLabel* preeditLabel; |
18 | 172 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
173 /* Sync/Async Widget Communication */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
174 Synchronizer synchronizer; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
175 Thread thread; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
176 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
177 /* Display Shutdown */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
178 Runnable [] disposeList; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
179 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
180 /* System Tray */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
181 Tray tray; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
182 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
183 /* Timers */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
184 int [] timerIds; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
185 Runnable [] timerList; |
27 | 186 CallbackData timerProcCallbackData; |
18 | 187 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
188 /* Caret */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
189 Caret currentCaret; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
190 int caretId; |
27 | 191 CallbackData caretProcCallbackData; |
18 | 192 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
193 /* Mnemonics */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
194 Control mnemonicControl; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
195 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
196 /* Mouse hover */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
197 int mouseHoverId; |
30 | 198 GtkWidget* mouseHoverHandle; |
199 CallbackData mouseHoverProcCallbackData; | |
200 | |
201 /* Menu position callback */ | |
18 | 202 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
203 /* Tooltip size allocate callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
204 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
205 /* Shell map callback */ |
27 | 206 CallbackData shellMapProcCallbackData; |
207 GClosure* shellMapProcClosure; | |
18 | 208 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
209 /* Idle proc callback */ |
27 | 210 CallbackData idleProcCallbackData; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
211 int idleHandle; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
212 static const char[] ADD_IDLE_PROC_KEY = "dwt.internal.gtk2.addIdleProc"; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
213 static const char[] REMOVE_IDLE_PROC_KEY = "dwt.internal.gtk2.removeIdleProc"; |
54 | 214 |
215 Object idleLock; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
216 bool idleNeeded; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
217 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
218 /* GtkTreeView callbacks */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
219 int[] treeSelection; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
220 int treeSelectionLength; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
221 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
222 /* Set direction callback */ |
27 | 223 CallbackData setDirectionCallbackData; |
18 | 224 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
225 /* Get all children callback */ |
30 | 226 CallbackData allChildrenProcCallbackData; |
26 | 227 GList* allChildren; |
18 | 228 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
229 /* Settings callbacks */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
230 GtkWidget* shellHandle; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
231 bool settingsChanged, runSettingsFld; |
27 | 232 CallbackData styleSetProcCallbackData; |
18 | 233 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
234 /* Entry focus behaviour */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
235 bool entrySelectOnFocus; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
236 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
237 /* Enter/Exit events */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
238 Control currentControl; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
239 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
240 /* Flush exposes */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
241 int /*long*/ checkIfEventProc; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
242 void*/*Callback*/ checkIfEventCallback; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
243 GdkWindow* flushWindow; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
244 bool flushAll; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
245 GdkRectangle* flushRect; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
246 XExposeEvent* exposeEvent; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
247 XVisibilityEvent* visibilityEvent; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
248 //int /*long*/ [] flushData = new int /*long*/ [1]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
249 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
250 /* System Resources */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
251 Font systemFont; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
252 Image errorImage, infoImage, questionImage, warningImage; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
253 Cursor [] cursors; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
254 Resource [] resources; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
255 static const int RESOURCE_SIZE = 1 + 4 + SWT.CURSOR_HAND + 1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
256 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
257 /* Colors */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
258 GdkColor* COLOR_WIDGET_DARK_SHADOW, COLOR_WIDGET_NORMAL_SHADOW, COLOR_WIDGET_LIGHT_SHADOW; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
259 GdkColor* COLOR_WIDGET_HIGHLIGHT_SHADOW, COLOR_WIDGET_BACKGROUND, COLOR_WIDGET_FOREGROUND, COLOR_WIDGET_BORDER; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
260 GdkColor* COLOR_LIST_FOREGROUND, COLOR_LIST_BACKGROUND, COLOR_LIST_SELECTION, COLOR_LIST_SELECTION_TEXT; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
261 GdkColor* COLOR_INFO_BACKGROUND, COLOR_INFO_FOREGROUND; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
262 GdkColor* COLOR_TITLE_FOREGROUND, COLOR_TITLE_BACKGROUND, COLOR_TITLE_BACKGROUND_GRADIENT; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
263 GdkColor* COLOR_TITLE_INACTIVE_FOREGROUND, COLOR_TITLE_INACTIVE_BACKGROUND, COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
264 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
265 /* Popup Menus */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
266 Menu [] popups; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
267 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
268 /* Click count*/ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
269 int clickCount = 1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
270 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
271 /* Timestamp of the Last Received Events */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
272 int lastEventTime, lastUserEventTime; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
273 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
274 /* Fixed Subclass */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
275 static int /*long*/ fixed_type; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
276 static int /*long*/ fixed_info_ptr; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
277 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
278 /* Renderer Subclass */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
279 static int /*long*/ text_renderer_type, pixbuf_renderer_type, toggle_renderer_type; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
280 static int /*long*/ text_renderer_info_ptr, pixbuf_renderer_info_ptr, toggle_renderer_info_ptr; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
281 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
282 /* Key Mappings */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
283 static const int [] [] KeyTable = [ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
284 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
285 /* Keyboard and Mouse Masks */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
286 [OS.GDK_Alt_L, SWT.ALT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
287 [OS.GDK_Alt_R, SWT.ALT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
288 [OS.GDK_Meta_L, SWT.ALT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
289 [OS.GDK_Meta_R, SWT.ALT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
290 [OS.GDK_Shift_L, SWT.SHIFT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
291 [OS.GDK_Shift_R, SWT.SHIFT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
292 [OS.GDK_Control_L, SWT.CONTROL], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
293 [OS.GDK_Control_R, SWT.CONTROL], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
294 // [OS.GDK_????, SWT.COMMAND], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
295 // [OS.GDK_????, SWT.COMMAND], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
296 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
297 /* Non-Numeric Keypad Keys */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
298 [OS.GDK_Up, SWT.ARROW_UP], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
299 [OS.GDK_KP_Up, SWT.ARROW_UP], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
300 [OS.GDK_Down, SWT.ARROW_DOWN], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
301 [OS.GDK_KP_Down, SWT.ARROW_DOWN], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
302 [OS.GDK_Left, SWT.ARROW_LEFT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
303 [OS.GDK_KP_Left, SWT.ARROW_LEFT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
304 [OS.GDK_Right, SWT.ARROW_RIGHT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
305 [OS.GDK_KP_Right, SWT.ARROW_RIGHT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
306 [OS.GDK_Page_Up, SWT.PAGE_UP], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
307 [OS.GDK_KP_Page_Up, SWT.PAGE_UP], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
308 [OS.GDK_Page_Down, SWT.PAGE_DOWN], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
309 [OS.GDK_KP_Page_Down, SWT.PAGE_DOWN], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
310 [OS.GDK_Home, SWT.HOME], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
311 [OS.GDK_KP_Home, SWT.HOME], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
312 [OS.GDK_End, SWT.END], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
313 [OS.GDK_KP_End, SWT.END], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
314 [OS.GDK_Insert, SWT.INSERT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
315 [OS.GDK_KP_Insert, SWT.INSERT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
316 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
317 /* Virtual and Ascii Keys */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
318 [OS.GDK_BackSpace, SWT.BS], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
319 [OS.GDK_Return, SWT.CR], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
320 [OS.GDK_Delete, SWT.DEL], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
321 [OS.GDK_KP_Delete, SWT.DEL], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
322 [OS.GDK_Escape, SWT.ESC], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
323 [OS.GDK_Linefeed, SWT.LF], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
324 [OS.GDK_Tab, SWT.TAB], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
325 [OS.GDK_ISO_Left_Tab, SWT.TAB], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
326 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
327 /* Functions Keys */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
328 [OS.GDK_F1, SWT.F1], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
329 [OS.GDK_F2, SWT.F2], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
330 [OS.GDK_F3, SWT.F3], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
331 [OS.GDK_F4, SWT.F4], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
332 [OS.GDK_F5, SWT.F5], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
333 [OS.GDK_F6, SWT.F6], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
334 [OS.GDK_F7, SWT.F7], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
335 [OS.GDK_F8, SWT.F8], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
336 [OS.GDK_F9, SWT.F9], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
337 [OS.GDK_F10, SWT.F10], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
338 [OS.GDK_F11, SWT.F11], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
339 [OS.GDK_F12, SWT.F12], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
340 [OS.GDK_F13, SWT.F13], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
341 [OS.GDK_F14, SWT.F14], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
342 [OS.GDK_F15, SWT.F15], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
343 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
344 /* Numeric Keypad Keys */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
345 [OS.GDK_KP_Multiply, SWT.KEYPAD_MULTIPLY], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
346 [OS.GDK_KP_Add, SWT.KEYPAD_ADD], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
347 [OS.GDK_KP_Enter, SWT.KEYPAD_CR], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
348 [OS.GDK_KP_Subtract, SWT.KEYPAD_SUBTRACT], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
349 [OS.GDK_KP_Decimal, SWT.KEYPAD_DECIMAL], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
350 [OS.GDK_KP_Divide, SWT.KEYPAD_DIVIDE], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
351 [OS.GDK_KP_0, SWT.KEYPAD_0], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
352 [OS.GDK_KP_1, SWT.KEYPAD_1], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
353 [OS.GDK_KP_2, SWT.KEYPAD_2], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
354 [OS.GDK_KP_3, SWT.KEYPAD_3], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
355 [OS.GDK_KP_4, SWT.KEYPAD_4], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
356 [OS.GDK_KP_5, SWT.KEYPAD_5], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
357 [OS.GDK_KP_6, SWT.KEYPAD_6], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
358 [OS.GDK_KP_7, SWT.KEYPAD_7], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
359 [OS.GDK_KP_8, SWT.KEYPAD_8], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
360 [OS.GDK_KP_9, SWT.KEYPAD_9], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
361 [OS.GDK_KP_Equal, SWT.KEYPAD_EQUAL], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
362 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
363 /* Other keys */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
364 [OS.GDK_Caps_Lock, SWT.CAPS_LOCK], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
365 [OS.GDK_Num_Lock, SWT.NUM_LOCK], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
366 [OS.GDK_Scroll_Lock, SWT.SCROLL_LOCK], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
367 [OS.GDK_Pause, SWT.PAUSE], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
368 [OS.GDK_Break, SWT.BREAK], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
369 [OS.GDK_Print, SWT.PRINT_SCREEN], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
370 [OS.GDK_Help, SWT.HELP], |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
371 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
372 ]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
373 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
374 /* Multiple Displays. */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
375 static Display Default; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
376 static Display [] Displays; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
377 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
378 /* Package name */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
379 static const char[] PACKAGE_PREFIX = "dwt.widgets."; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
380 /* This code is intentionally commented. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
381 * ".class" can not be used on CLDC. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
382 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
383 // static { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
384 // char[] name = Display.class.getName (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
385 // int index = name.lastIndexOf ('.'); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
386 // PACKAGE_NAME = name.substring (0, index + 1); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
387 // } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
388 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
389 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
390 * In order to support CLDC, .class cannot be used because |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
391 * it does not compile on some Java compilers when they are |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
392 * targeted for CLDC. Use Class.forName() instead. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
393 */ |
54 | 394 synchronized static void static_this() { |
395 Displays = new Display [4]; | |
396 initDeviceFinder(); | |
397 SWT_OBJECT_INDEX = OS.g_quark_from_string ("SWT_OBJECT_INDEX"); | |
398 SWT_OBJECT_INDEX1 = OS.g_quark_from_string ("SWT_OBJECT_INDEX1"); | |
399 SWT_OBJECT_INDEX2 = OS.g_quark_from_string ("SWT_OBJECT_INDEX2"); | |
400 } | |
18 | 401 |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
402 /* GTK Version */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
403 static const int MAJOR = 2; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
404 static const int MINOR = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
405 static const int MICRO = 6; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
406 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
407 /* Display Data */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
408 Object data; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
409 char[] [] keys; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
410 Object [] values; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
411 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
412 /* Initial Guesses for Shell Trimmings. */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
413 int borderTrimWidth = 4, borderTrimHeight = 4; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
414 int resizeTrimWidth = 6, resizeTrimHeight = 6; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
415 int titleBorderTrimWidth = 5, titleBorderTrimHeight = 28; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
416 int titleResizeTrimWidth = 6, titleResizeTrimHeight = 29; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
417 int titleTrimWidth = 0, titleTrimHeight = 23; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
418 bool ignoreTrim; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
419 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
420 /* Window Manager */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
421 char[] windowManager; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
422 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
423 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
424 * TEMPORARY CODE. Install the runnable that |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
425 * gets the current display. This code will |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
426 * be removed in the future. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
427 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
428 private static void initDeviceFinder(){ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
429 DeviceFinder = new class() Runnable { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
430 public void run () { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
431 Device device = getCurrent (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
432 if (device is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
433 device = getDefault (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
434 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
435 setDevice (device); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
436 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
437 }; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
438 } |
18 | 439 |
440 /* | |
441 * TEMPORARY CODE. | |
442 */ | |
443 static void setDevice (Device device) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
444 CurrentDevice = device; |
18 | 445 } |
446 | |
447 /** | |
448 * Constructs a new instance of this class. | |
449 * <p> | |
450 * Note: The resulting display is marked as the <em>current</em> | |
451 * display. If this is the first display which has been | |
452 * constructed since the application started, it is also | |
453 * marked as the <em>default</em> display. | |
454 * </p> | |
455 * | |
456 * @exception SWTException <ul> | |
457 * <li>ERROR_THREAD_INVALID_ACCESS - if called from a thread that already created an existing display</li> | |
458 * <li>ERROR_INVALID_SUBCLASS - if this class is not an allowed subclass</li> | |
459 * </ul> | |
460 * | |
461 * @see #getCurrent | |
462 * @see #getDefault | |
463 * @see Widget#checkSubclass | |
464 * @see Shell | |
465 */ | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
466 public this () { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
467 this (null); |
18 | 468 } |
469 | |
470 /** | |
471 * Constructs a new instance of this class using the parameter. | |
472 * | |
473 * @param data the device data | |
474 */ | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
475 public this (DeviceData data) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
476 super (data); |
26 | 477 synchronizer = new Synchronizer (this); |
478 idleLock = new Object(); | |
479 flushRect = new GdkRectangle (); | |
480 exposeEvent = new XExposeEvent (); | |
481 visibilityEvent = new XVisibilityEvent (); | |
482 cursors = new Cursor [SWT.CURSOR_HAND + 1]; | |
18 | 483 } |
484 | |
485 /** | |
486 * Adds the listener to the collection of listeners who will | |
487 * be notified when an event of the given type occurs anywhere | |
488 * in a widget. The event type is one of the event constants | |
489 * defined in class <code>SWT</code>. When the event does occur, | |
490 * the listener is notified by sending it the <code>handleEvent()</code> | |
491 * message. | |
492 * <p> | |
493 * Setting the type of an event to <code>SWT.None</code> from | |
494 * within the <code>handleEvent()</code> method can be used to | |
495 * change the event type and stop subsequent Java listeners | |
496 * from running. Because event filters run before other listeners, | |
497 * event filters can both block other listeners and set arbitrary | |
498 * fields within an event. For this reason, event filters are both | |
499 * powerful and dangerous. They should generally be avoided for | |
500 * performance, debugging and code maintenance reasons. | |
501 * </p> | |
502 * | |
503 * @param eventType the type of event to listen for | |
504 * @param listener the listener which should be notified when the event occurs | |
505 * | |
506 * @exception IllegalArgumentException <ul> | |
507 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li> | |
508 * </ul> | |
509 * @exception SWTException <ul> | |
510 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
511 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
512 * </ul> | |
513 * | |
514 * @see Listener | |
515 * @see SWT | |
516 * @see #removeFilter | |
517 * @see #removeListener | |
518 * | |
519 * @since 3.0 | |
520 */ | |
521 public void addFilter (int eventType, Listener listener) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
522 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
523 if (listener is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
524 if (filterTable is null) filterTable = new EventTable (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
525 filterTable.hook (eventType, listener); |
18 | 526 } |
527 | |
26 | 528 void addGdkEvent (GdkEvent* event) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
529 if (gdkEvents is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
530 int length = GROW_SIZE; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
531 gdkEvents.length = length; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
532 gdkEventWidgets.length = length; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
533 gdkEventCount = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
534 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
535 if (gdkEventCount is gdkEvents.length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
536 int length = gdkEventCount + GROW_SIZE; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
537 GdkEvent* [] newEvents = new GdkEvent* [length]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
538 SimpleType!(GdkEvent*).arraycopy (gdkEvents, 0, newEvents, 0, gdkEventCount); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
539 gdkEvents = newEvents; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
540 Widget [] newWidgets = new Widget [length]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
541 System.arraycopy (gdkEventWidgets, 0, newWidgets, 0, gdkEventCount); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
542 gdkEventWidgets = newWidgets; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
543 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
544 Widget widget = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
545 GtkWidget* handle = OS.gtk_get_event_widget (event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
546 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:
54
diff
changeset
|
547 do { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
548 widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
549 } while (widget is null && (handle = OS.gtk_widget_get_parent (handle)) !is null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
550 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
551 gdkEvents [gdkEventCount] = event; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
552 gdkEventWidgets [gdkEventCount] = widget; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
553 gdkEventCount++; |
18 | 554 } |
555 | |
556 void addIdleProc() { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
557 synchronized (idleLock){ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
558 this.idleNeeded = true; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
559 if (idleHandle is 0) { |
27 | 560 idleProcCallbackData.display = this; |
561 idleProcCallbackData.data = null; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
562 idleHandle = OS.g_idle_add ( &idleProcFunc, &idleProcCallbackData ); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
563 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
564 } |
18 | 565 } |
566 | |
567 /** | |
568 * Adds the listener to the collection of listeners who will | |
569 * be notified when an event of the given type occurs. The event | |
570 * type is one of the event constants defined in class <code>SWT</code>. | |
571 * When the event does occur in the display, the listener is notified by | |
572 * sending it the <code>handleEvent()</code> message. | |
573 * | |
574 * @param eventType the type of event to listen for | |
575 * @param listener the listener which should be notified when the event occurs | |
576 * | |
577 * @exception IllegalArgumentException <ul> | |
578 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li> | |
579 * </ul> | |
580 * @exception SWTException <ul> | |
581 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
582 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
583 * </ul> | |
584 * | |
585 * @see Listener | |
586 * @see SWT | |
587 * @see #removeListener | |
588 * | |
589 * @since 2.0 | |
590 */ | |
591 public void addListener (int eventType, Listener listener) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
592 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
593 if (listener is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
594 if (eventTable is null) eventTable = new EventTable (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
595 eventTable.hook (eventType, listener); |
18 | 596 } |
597 | |
30 | 598 private static extern(C) int /*long*/ allChildrenProcFunc (GtkWidget* handle, void* user_data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
599 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
30 | 600 CallbackData* cbdata = cast(CallbackData*)user_data; |
601 return cbdata.display.allChildrenProc( cast(GtkWidget*)handle, cast(int)cbdata.data ); | |
602 } | |
603 int /*long*/ allChildrenProc (GtkWidget* widget, int /*long*/ recurse) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
604 allChildren = OS.g_list_append (allChildren, widget); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
605 if (recurse !is 0 && OS.GTK_IS_CONTAINER (cast(GTypeInstance*)widget)) { |
30 | 606 allChildrenProcCallbackData.display = this; |
607 allChildrenProcCallbackData.data = cast(void*)recurse; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
608 OS.gtk_container_forall (cast(GtkContainer*)widget, cast(GtkCallback)&allChildrenProcFunc, &allChildrenProcCallbackData); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
609 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
610 return 0; |
30 | 611 } |
612 | |
613 void addMouseHoverTimeout (GtkWidget* handle) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
614 if (mouseHoverId !is 0) OS.gtk_timeout_remove (mouseHoverId); |
30 | 615 mouseHoverProcCallbackData.display = this; |
616 mouseHoverProcCallbackData.data = cast(void*)handle; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
617 mouseHoverId = OS.gtk_timeout_add (400, &mouseHoverProcFunc, &mouseHoverProcCallbackData); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
618 mouseHoverHandle = handle; |
30 | 619 } |
620 | |
18 | 621 void addPopup (Menu menu) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
622 if (popups is null) popups = new Menu [4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
623 int length = popups.length; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
624 for (int i=0; i<length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
625 if (popups [i] is menu) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
626 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
627 int index = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
628 while (index < length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
629 if (popups [index] is null) break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
630 index++; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
631 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
632 if (index is length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
633 Menu [] newPopups = new Menu [length + 4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
634 System.arraycopy (popups, 0, newPopups, 0, length); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
635 popups = newPopups; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
636 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
637 popups [index] = menu; |
18 | 638 } |
639 | |
28 | 640 void addWidget (GtkWidget* handle, Widget widget) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
641 if (handle is null) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
642 if (freeSlot is -1) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
643 int len = (freeSlot = indexTable.length) + GROW_SIZE; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
644 int[] newIndexTable = new int[len]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
645 Widget[] newWidgetTable = new Widget [len]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
646 System.arraycopy (indexTable, 0, newIndexTable, 0, freeSlot); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
647 System.arraycopy (widgetTable, 0, newWidgetTable, 0, freeSlot); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
648 for (int i = freeSlot; i < len - 1; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
649 newIndexTable[i] = i + 1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
650 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
651 newIndexTable[len - 1] = -1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
652 indexTable = newIndexTable; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
653 widgetTable = newWidgetTable; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
654 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
655 int index = freeSlot + 1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
656 OS.g_object_set_qdata (cast(GObject*)handle, SWT_OBJECT_INDEX, cast(void*)index); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
657 int oldSlot = freeSlot; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
658 freeSlot = indexTable[oldSlot]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
659 indexTable [oldSlot] = -2; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
660 widgetTable [oldSlot] = widget; |
18 | 661 } |
662 | |
663 /** | |
664 * Causes the <code>run()</code> method of the runnable to | |
665 * be invoked by the user-interface thread at the next | |
666 * reasonable opportunity. The caller of this method continues | |
667 * to run in parallel, and is not notified when the | |
668 * runnable has completed. Specifying <code>null</code> as the | |
669 * runnable simply wakes the user-interface thread when run. | |
670 * <p> | |
671 * Note that at the time the runnable is invoked, widgets | |
672 * that have the receiver as their display may have been | |
673 * disposed. Therefore, it is necessary to check for this | |
674 * case inside the runnable before accessing the widget. | |
675 * </p> | |
676 * | |
677 * @param runnable code to run on the user-interface thread or <code>null</code> | |
678 * | |
679 * @exception SWTException <ul> | |
680 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
681 * </ul> | |
682 * | |
683 * @see #syncExec | |
684 */ | |
685 public void asyncExec (Runnable runnable) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
686 if (isDisposed ()) error (SWT.ERROR_DEVICE_DISPOSED); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
687 synchronized (idleLock) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
688 if (idleNeeded && idleHandle is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
689 //NOTE: calling unlocked function in OS |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
690 idleHandle = OS.g_idle_add (&idleProcFunc, cast(void*) this); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
691 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
692 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
693 synchronizer.asyncExec (runnable); |
18 | 694 } |
695 | |
696 /** | |
697 * Causes the system hardware to emit a short sound | |
698 * (if it supports this capability). | |
699 * | |
700 * @exception SWTException <ul> | |
701 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
702 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
703 * </ul> | |
704 */ | |
705 public void beep () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
706 if (!isValidThread ()) error (SWT.ERROR_THREAD_INVALID_ACCESS); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
707 OS.gdk_beep(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
708 if (!OS.GDK_WINDOWING_X11 ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
709 OS.gdk_flush (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
710 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
711 void* 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:
54
diff
changeset
|
712 OS.XFlush (xDisplay); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
713 } |
18 | 714 } |
715 | |
26 | 716 int /*long*/ cellDataProc (int /*long*/ tree_column, int /*long*/ cell, int /*long*/ tree_model, int /*long*/ iter, GtkWidget* data) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
717 Widget widget = getWidget (data); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
718 if (widget 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:
54
diff
changeset
|
719 return widget.cellDataProc (tree_column, cell, tree_model, iter, data); |
18 | 720 } |
721 | |
722 protected void checkDevice () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
723 if (thread is null) error (SWT.ERROR_WIDGET_DISPOSED); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
724 if (thread !is Thread.getThis ()) error (SWT.ERROR_THREAD_INVALID_ACCESS); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
725 if (isDisposed ()) error (SWT.ERROR_DEVICE_DISPOSED); |
18 | 726 } |
727 | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
728 static synchronized void checkDisplay (Thread thread, bool multiple) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
729 for (int i=0; i<Displays.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
730 if (Displays [i] !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
731 if (!multiple) SWT.error (SWT.ERROR_NOT_IMPLEMENTED, null, " [multiple displays]"); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
732 if (Displays [i].thread is thread) SWT.error (SWT.ERROR_THREAD_INVALID_ACCESS); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
733 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
734 } |
18 | 735 } |
736 | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
737 private static extern(C) int checkIfEventProcFunc (void* display, XEvent* xEvent, char* userData) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
738 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
26 | 739 auto disp = cast(Display)userData; |
740 return disp.checkIfEventProcMeth( display, xEvent ); | |
741 } | |
742 | |
743 int checkIfEventProcMeth (void* display, XEvent* xEvent) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
744 int type = xEvent.type; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
745 switch (type) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
746 case OS.VisibilityNotify: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
747 case OS.Expose: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
748 case OS.GraphicsExpose: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
749 break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
750 default: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
751 return 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
752 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
753 GdkWindow* window = OS.gdk_window_lookup ( xEvent.xany.window ); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
754 if (window 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:
54
diff
changeset
|
755 if (flushWindow !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
756 if (flushAll) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
757 auto tempWindow = window; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
758 do { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
759 if (tempWindow is flushWindow) break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
760 } while ((tempWindow = OS.gdk_window_get_parent (tempWindow)) !is null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
761 if (tempWindow !is flushWindow) return 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
762 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
763 if (window !is flushWindow) return 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
764 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
765 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
766 *exposeEvent = *cast(XExposeEvent*)xEvent; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
767 switch (type) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
768 case OS.Expose: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
769 case OS.GraphicsExpose: { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
770 flushRect.x = exposeEvent.x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
771 flushRect.y = exposeEvent.y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
772 flushRect.width = exposeEvent.width; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
773 flushRect.height = exposeEvent.height; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
774 OS.gdk_window_invalidate_rect (window, flushRect, true); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
775 exposeEvent.type = -1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
776 memmove (xEvent, exposeEvent, XExposeEvent.sizeof); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
777 break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
778 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
779 case OS.VisibilityNotify: { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
780 memmove (visibilityEvent, xEvent, XVisibilityEvent.sizeof); |
26 | 781 GtkWidget* handle; |
782 OS.gdk_window_get_user_data (window, cast(void**) & handle); | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
783 Widget widget = handle !is null ? getWidget (handle) : null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
784 if (auto control = cast(Control)widget ) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
785 if (window is control.paintWindow ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
786 if (visibilityEvent.state is OS.VisibilityFullyObscured) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
787 control.state |= Widget.OBSCURED; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
788 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
789 control.state &= ~Widget.OBSCURED; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
790 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
791 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
792 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
793 break; |
54 | 794 default: |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
795 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
796 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
797 return 0; |
18 | 798 } |
799 | |
800 /** | |
801 * Checks that this class can be subclassed. | |
802 * <p> | |
803 * IMPORTANT: See the comment in <code>Widget.checkSubclass()</code>. | |
804 * </p> | |
805 * | |
806 * @exception SWTException <ul> | |
807 * <li>ERROR_INVALID_SUBCLASS - if this class is not an allowed subclass</li> | |
808 * </ul> | |
809 * | |
810 * @see Widget#checkSubclass | |
811 */ | |
812 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:
54
diff
changeset
|
813 //PORTING_TODO if (!isValidClass (getClass ())) error (SWT.ERROR_INVALID_SUBCLASS); |
18 | 814 } |
815 | |
816 /** | |
817 * Requests that the connection between SWT and the underlying | |
818 * operating system be closed. | |
819 * | |
820 * @exception SWTException <ul> | |
821 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
822 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
823 * </ul> | |
824 * | |
825 * @see Device#dispose | |
826 * | |
827 * @since 2.0 | |
828 */ | |
829 public void close () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
830 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
831 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:
54
diff
changeset
|
832 sendEvent (SWT.Close, event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
833 if (event.doit) dispose (); |
18 | 834 } |
835 | |
836 /** | |
837 * Creates the device in the operating system. If the device | |
838 * does not have a handle, this method may do nothing depending | |
839 * on the device. | |
840 * <p> | |
841 * This method is called before <code>init</code>. | |
842 * </p> | |
843 * | |
844 * @param data the DeviceData which describes the receiver | |
845 * | |
846 * @see #init | |
847 */ | |
848 protected void create (DeviceData data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
849 checkSubclass (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
850 checkDisplay(thread = Thread.getThis (), false); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
851 createDisplay (data); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
852 register (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
853 if (Default is null) Default = this; |
18 | 854 } |
855 | |
856 synchronized void createDisplay (DeviceData data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
857 /* Required for g_main_context_wakeup */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
858 if (!OS.g_thread_supported ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
859 OS.g_thread_init (null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
860 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
861 OS.gtk_set_locale(); |
26 | 862 int cnt = 0; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
863 if (!OS.gtk_init_check (&cnt, null)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
864 SWT.error (SWT.ERROR_NO_HANDLES, null, " [gtk_init_check() failed]"); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
865 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
866 if (OS.GDK_WINDOWING_X11 ()) xDisplay = cast(void*) OS.GDK_DISPLAY (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
867 char* ptr = OS.gtk_check_version (MAJOR, MINOR, MICRO); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
868 if (ptr !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
869 char [] buffer = fromUtf8z(ptr); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
870 Stdout.formatln ("***WARNING: {}", buffer ); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
871 Stdout.formatln ("***WARNING: SWT requires GTK {}.{}.{}", MAJOR, MINOR, MICRO ); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
872 int major = OS.gtk_major_version (), minor = OS.gtk_minor_version (), micro = OS.gtk_micro_version (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
873 Stdout.formatln ("***WARNING: Detected: {}.{}.{}", major, minor, micro); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
874 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
875 if (fixed_type is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
876 GTypeInfo* fixed_info = new GTypeInfo (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
877 fixed_info.class_size = GtkFixedClass.sizeof; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
878 fixed_info.class_init = & fixedClassInitProcFunc; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
879 fixed_info.instance_size = GtkFixed.sizeof; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
880 fixed_type = OS.g_type_register_static (OS.GTK_TYPE_FIXED (), "SwtFixed".ptr, fixed_info, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
881 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
882 if (text_renderer_type is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
883 GTypeInfo* renderer_info = new GTypeInfo (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
884 renderer_info.class_size = GtkCellRendererTextClass.sizeof; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
885 renderer_info.class_init = & rendererClassInitProcFunc; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
886 renderer_info.instance_size = GtkCellRendererText.sizeof; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
887 text_renderer_type = OS.g_type_register_static (OS.GTK_TYPE_CELL_RENDERER_TEXT (), "SwtTextRenderer".ptr, renderer_info, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
888 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
889 if (pixbuf_renderer_type is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
890 GTypeInfo* renderer_info = new GTypeInfo (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
891 renderer_info.class_size = GtkCellRendererPixbufClass.sizeof; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
892 renderer_info.class_init = & rendererClassInitProcFunc; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
893 renderer_info.instance_size = GtkCellRendererPixbuf.sizeof; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
894 pixbuf_renderer_type = OS.g_type_register_static (OS.GTK_TYPE_CELL_RENDERER_PIXBUF (), "SwtPixbufRenderer".ptr, renderer_info, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
895 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
896 if (toggle_renderer_type is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
897 GTypeInfo* renderer_info = new GTypeInfo (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
898 renderer_info.class_size = GtkCellRendererToggleClass.sizeof; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
899 renderer_info.class_init = & rendererClassInitProcFunc; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
900 renderer_info.instance_size = GtkCellRendererToggle.sizeof; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
901 toggle_renderer_type = OS.g_type_register_static (OS.GTK_TYPE_CELL_RENDERER_TOGGLE (), "SwtToggleRenderer".ptr, renderer_info, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
902 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
903 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
904 OS.gtk_widget_set_default_direction (OS.GTK_TEXT_DIR_LTR); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
905 OS.gdk_rgb_init (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
906 char* p = toStringz(APP_NAME); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
907 OS.g_set_prgname (p); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
908 OS.gdk_set_program_class (p); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
909 OS.gtk_rc_parse_string ("style \"swt-flat\" { GtkToolbar::shadow-type = none } widget \"*.swt-toolbar-flat\" style : highest \"swt-flat\"".ptr); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
910 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
911 /* Initialize the hidden shell */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
912 shellHandle = OS.gtk_window_new (OS.GTK_WINDOW_TOPLEVEL); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
913 if (shellHandle is null) SWT.error (SWT.ERROR_NO_HANDLES); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
914 OS.gtk_widget_realize (shellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
915 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
916 /* Initialize the filter and event callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
917 OS.gdk_event_handler_set (&eventProcFunc, cast(void*)this, null); |
54 | 918 //filterProcCallbackData.display = this; |
919 //filterProcCallbackData.data = null; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
920 //OS.gdk_window_add_filter (null, &filterProcFunc, cast(void*)&filterProcCallbackData ); |
54 | 921 doWindowAddFilter( &filterProcCallbackData, null, null ); |
18 | 922 } |
923 | |
38 | 924 /* |
925 * Used by Shell | |
926 */ | |
927 package void doWindowAddFilter( CallbackData* cbdata, GdkWindow* window, GtkWidget* widget ){ | |
928 cbdata.display = this; | |
929 cbdata.data = widget; | |
54 | 930 OS.gdk_window_add_filter (window, &filterProcFunc, cbdata ); |
38 | 931 } |
932 | |
933 package void doWindowRemoveFilter( CallbackData* cbdata, GdkWindow* window, GtkWidget* widget ){ | |
934 cbdata.display = this; | |
935 cbdata.data = widget; | |
54 | 936 OS.gdk_window_remove_filter(window, &filterProcFunc, cbdata ); |
38 | 937 } |
938 | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
939 Image createImage (char[] name) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
940 auto style = OS.gtk_widget_get_default_style (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
941 char[] buffer = name; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
942 auto pixbuf = OS.gtk_icon_set_render_icon ( |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
943 OS.gtk_icon_factory_lookup_default (buffer.ptr), style, |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
944 OS.GTK_TEXT_DIR_NONE, |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
945 OS.GTK_STATE_NORMAL, |
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
946 OS.GTK_ICON_SIZE_DIALOG, null, null ); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
947 if (pixbuf 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:
54
diff
changeset
|
948 int width = OS.gdk_pixbuf_get_width (pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
949 int height = OS.gdk_pixbuf_get_height (pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
950 int stride = OS.gdk_pixbuf_get_rowstride (pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
951 bool hasAlpha = cast(bool)OS.gdk_pixbuf_get_has_alpha (pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
952 char* pixels = OS.gdk_pixbuf_get_pixels (pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
953 byte [] data = new byte [stride * height]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
954 memmove (data.ptr, pixels, data.length); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
955 OS.g_object_unref (pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
956 ImageData imageData = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
957 if (hasAlpha) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
958 PaletteData palette = new PaletteData (0xFF000000, 0xFF0000, 0xFF00); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
959 imageData = new ImageData (width, height, 32, palette); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
960 byte [] alpha = new byte [stride * height]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
961 for (int y=0; y<height; y++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
962 for (int x=0; x<width; x++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
963 alpha [y*width+x] = data [y*stride+x*4+3]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
964 data [y*stride+x*4+3] = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
965 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
966 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
967 imageData.setAlphas (0, 0, width * height, alpha, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
968 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
969 PaletteData palette = new PaletteData (0xFF0000, 0xFF00, 0xFF); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
970 imageData = new ImageData (width, height, 24, palette); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
971 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
972 imageData.data = data; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
973 imageData.bytesPerLine = stride; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
974 return new Image (this, imageData); |
18 | 975 } |
976 | |
26 | 977 static GdkPixbuf* createPixbuf(Image image) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
978 int w, h; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
979 OS.gdk_drawable_get_size (image.pixmap, &w, &h); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
980 auto colormap = OS.gdk_colormap_get_system (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
981 GdkPixbuf* pixbuf; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
982 bool hasMask = image.mask !is null && OS.gdk_drawable_get_depth (image.mask) is 1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
983 if (hasMask) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
984 pixbuf = OS.gdk_pixbuf_new (OS.GDK_COLORSPACE_RGB, true, 8, w, h ); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
985 if (pixbuf is null) SWT.error (SWT.ERROR_NO_HANDLES); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
986 OS.gdk_pixbuf_get_from_drawable (pixbuf, image.pixmap, colormap, 0, 0, 0, 0, w, h); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
987 auto maskPixbuf = OS.gdk_pixbuf_new(OS.GDK_COLORSPACE_RGB, false, 8, w, h); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
988 if (maskPixbuf is null) SWT.error (SWT.ERROR_NO_HANDLES); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
989 OS.gdk_pixbuf_get_from_drawable(maskPixbuf, image.mask, null, 0, 0, 0, 0, w, h); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
990 int stride = OS.gdk_pixbuf_get_rowstride(pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
991 auto pixels = OS.gdk_pixbuf_get_pixels(pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
992 byte[] line = new byte[stride]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
993 int maskStride = OS.gdk_pixbuf_get_rowstride(maskPixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
994 auto maskPixels = OS.gdk_pixbuf_get_pixels(maskPixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
995 byte[] maskLine = new byte[maskStride]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
996 for (int y=0; y<h; y++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
997 auto offset = pixels + (y * stride); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
998 memmove(line.ptr, offset, stride); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
999 auto maskOffset = maskPixels + (y * maskStride); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1000 memmove(maskLine.ptr, maskOffset, maskStride); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1001 for (int x=0; x<w; x++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1002 if (maskLine[x * 3] is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1003 line[x * 4 + 3] = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1004 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1005 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1006 memmove(offset, line.ptr, stride); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1007 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1008 OS.g_object_unref(maskPixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1009 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1010 ImageData data = image.getImageData (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1011 bool hasAlpha = data.getTransparencyType () is SWT.TRANSPARENCY_ALPHA; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1012 pixbuf = OS.gdk_pixbuf_new (OS.GDK_COLORSPACE_RGB, hasAlpha, 8, w, h); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1013 if (pixbuf is null) SWT.error (SWT.ERROR_NO_HANDLES); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1014 OS.gdk_pixbuf_get_from_drawable (pixbuf, image.pixmap, colormap, 0, 0, 0, 0, w, h); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1015 if (hasAlpha) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1016 byte [] alpha = data.alphaData; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1017 int stride = OS.gdk_pixbuf_get_rowstride (pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1018 auto pixels = OS.gdk_pixbuf_get_pixels (pixbuf); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1019 byte [] line = new byte [stride]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1020 for (int y = 0; y < h; y++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1021 auto offset = pixels + (y * stride); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1022 memmove (line.ptr, offset, stride); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1023 for (int x = 0; x < w; x++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1024 line [x*4+3] = alpha [y*w+x]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1025 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1026 memmove (offset, line.ptr, stride); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1027 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1028 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1029 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1030 return pixbuf; |
18 | 1031 } |
1032 | |
1033 synchronized void deregister () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1034 for (int i=0; i<Displays.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1035 if (this is Displays [i]) Displays [i] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1036 } |
18 | 1037 } |
1038 | |
1039 /** | |
1040 * Destroys the device in the operating system and releases | |
1041 * the device's handle. If the device does not have a handle, | |
1042 * this method may do nothing depending on the device. | |
1043 * <p> | |
1044 * This method is called after <code>release</code>. | |
1045 * </p> | |
1046 * @see Device#dispose | |
1047 * @see #release | |
1048 */ | |
1049 protected void destroy () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1050 if (this is Default) Default = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1051 deregister (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1052 destroyDisplay (); |
18 | 1053 } |
1054 | |
1055 void destroyDisplay () { | |
1056 } | |
1057 | |
1058 /** | |
1059 * Returns the display which the given thread is the | |
1060 * user-interface thread for, or null if the given thread | |
1061 * is not a user-interface thread for any display. Specifying | |
1062 * <code>null</code> as the thread will return <code>null</code> | |
1063 * for the display. | |
1064 * | |
1065 * @param thread the user-interface thread | |
1066 * @return the display for the given thread | |
1067 */ | |
1068 public static synchronized Display findDisplay (Thread thread) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1069 for (int i=0; i<Displays.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1070 Display display = Displays [i]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1071 if (display !is null && display.thread is thread) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1072 return display; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1073 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1074 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1075 return null; |
18 | 1076 } |
1077 | |
1078 /** | |
1079 * Causes the <code>run()</code> method of the runnable to | |
1080 * be invoked by the user-interface thread just before the | |
1081 * receiver is disposed. Specifying a <code>null</code> runnable | |
1082 * is ignored. | |
1083 * | |
1084 * @param runnable code to run at dispose time. | |
1085 * | |
1086 * @exception SWTException <ul> | |
1087 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1088 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1089 * </ul> | |
1090 */ | |
1091 public void disposeExec (Runnable runnable) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1092 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1093 if (disposeList is null) disposeList = new Runnable [4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1094 for (int i=0; i<disposeList.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1095 if (disposeList [i] is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1096 disposeList [i] = runnable; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1097 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1098 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1099 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1100 Runnable [] newDisposeList = new Runnable [disposeList.length + 4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1101 SimpleType!(Runnable).arraycopy (disposeList, 0, newDisposeList, 0, disposeList.length); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1102 newDisposeList [disposeList.length] = runnable; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1103 disposeList = newDisposeList; |
18 | 1104 } |
1105 | |
1106 /** | |
1107 * Does whatever display specific cleanup is required, and then | |
1108 * uses the code in <code>SWTError.error</code> to handle the error. | |
1109 * | |
1110 * @param code the descriptive error code | |
1111 * | |
1112 * @see SWTError#error | |
1113 */ | |
1114 void error (int code) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1115 SWT.error (code); |
18 | 1116 } |
1117 | |
26 | 1118 private static extern(C) void eventProcFunc (GdkEvent* event, void* data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1119 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
26 | 1120 Display disp = cast(Display)data; |
1121 disp.eventProcMeth(event); | |
1122 } | |
1123 void eventProcMeth (GdkEvent* event) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1124 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1125 * Use gdk_event_get_time() rather than event.time or |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1126 * gtk_get_current_event_time(). If the event does not |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1127 * have a time stamp, then the field will contain garbage. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1128 * Note that calling gtk_get_current_event_time() from |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1129 * outside of gtk_main_do_event() seems to always |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1130 * return zero. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1131 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1132 int time = OS.gdk_event_get_time (event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1133 if (time !is 0) lastEventTime = time; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1134 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1135 int eventType = OS.GDK_EVENT_TYPE (event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1136 switch (eventType) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1137 case OS.GDK_BUTTON_PRESS: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1138 case OS.GDK_KEY_PRESS: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1139 lastUserEventTime = time; |
54 | 1140 default: |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1141 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1142 bool dispatch = true; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1143 if (dispatchEvents !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1144 dispatch = false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1145 for (int i = 0; i < dispatchEvents.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1146 if (eventType is dispatchEvents [i]) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1147 dispatch = true; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1148 break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1149 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1150 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1151 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1152 if (!dispatch) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1153 addGdkEvent (OS.gdk_event_copy (event)); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1154 return 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1155 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1156 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1157 * Feature in GTK. GTK implements modality by adding a grab |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1158 * to the GTK top level window. Normally, all mouse and |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1159 * keyboard events are delivered to child widgets and the |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1160 * shell when the grab is active. When an override redirect |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1161 * shell is created as a child of a dialog, then events are |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1162 * grabbed by the dialog instead of the override redirect |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1163 * shell. The fix is to add a temporary grab to the override |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1164 * redirect window when there is not already a grab in a |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1165 * child widget of the override redirect shell (for example, |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1166 * in a scroll bar). |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1167 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1168 Shell shell = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1169 Control control = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1170 auto grabHandle = OS.gtk_grab_get_current (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1171 if (grabHandle !is null && OS.GTK_IS_WINDOW (cast(GTypeInstance*)grabHandle) && OS.gtk_window_get_modal (cast(GtkWindow*)grabHandle)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1172 switch (eventType) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1173 case OS.GDK_KEY_PRESS: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1174 case OS.GDK_KEY_RELEASE: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1175 case OS.GDK_ENTER_NOTIFY: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1176 case OS.GDK_LEAVE_NOTIFY: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1177 case OS.GDK_BUTTON_PRESS: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1178 case OS.GDK_2BUTTON_PRESS: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1179 case OS.GDK_3BUTTON_PRESS: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1180 case OS.GDK_BUTTON_RELEASE: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1181 case OS.GDK_MOTION_NOTIFY: { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1182 auto window = OS.GDK_EVENT_WINDOW (cast(GdkEventAny*)event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1183 do { |
26 | 1184 GtkWidget* handle; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1185 OS.gdk_window_get_user_data (window, cast(void**) &handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1186 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:
54
diff
changeset
|
1187 Widget widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1188 if (widget !is null && (null !is cast(Control)widget)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1189 control = cast(Control) widget; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1190 break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1191 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1192 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1193 } while ((window = OS.gdk_window_get_parent (window)) !is null); |
54 | 1194 default: |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1195 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1196 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1197 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:
54
diff
changeset
|
1198 shell = control.getShell (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1199 if ((shell.style & SWT.ON_TOP) !is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1200 OS.gtk_grab_add (shell.shellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1201 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1202 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1203 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1204 OS.gtk_main_do_event (event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1205 if (dispatchEvents is null) putGdkEvents (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1206 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:
54
diff
changeset
|
1207 if (shell !is null && !shell.isDisposed () && (shell.style & SWT.ON_TOP) !is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1208 OS.gtk_grab_remove (shell.shellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1209 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1210 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1211 return 0; |
18 | 1212 } |
1213 | |
1214 /** | |
1215 * Given the operating system handle for a widget, returns | |
1216 * the instance of the <code>Widget</code> subclass which | |
1217 * represents it in the currently running application, if | |
1218 * such exists, or null if no matching widget can be found. | |
1219 * <p> | |
1220 * <b>IMPORTANT:</b> This method should not be called from | |
1221 * application code. The arguments are platform-specific. | |
1222 * </p> | |
1223 * | |
1224 * @param handle the handle for the widget | |
1225 * @return the SWT widget that the handle represents | |
1226 * | |
1227 * @exception SWTException <ul> | |
1228 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1229 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1230 * </ul> | |
1231 */ | |
26 | 1232 public Widget findWidget (GtkWidget* handle) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1233 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1234 return getWidget (handle); |
18 | 1235 } |
1236 | |
1237 /** | |
1238 * Given the operating system handle for a widget, | |
1239 * and widget-specific id, returns the instance of | |
1240 * the <code>Widget</code> subclass which represents | |
1241 * the handle/id pair in the currently running application, | |
1242 * if such exists, or null if no matching widget can be found. | |
1243 * <p> | |
1244 * <b>IMPORTANT:</b> This method should not be called from | |
1245 * application code. The arguments are platform-specific. | |
1246 * </p> | |
1247 * | |
1248 * @param handle the handle for the widget | |
1249 * @param id the id for the subwidget (usually an item) | |
1250 * @return the SWT widget that the handle/id pair represents | |
1251 * | |
1252 * @exception SWTException <ul> | |
1253 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1254 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1255 * </ul> | |
1256 * | |
1257 * @since 3.1 | |
1258 */ | |
26 | 1259 public Widget findWidget (GtkWidget* handle, int id) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1260 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1261 return null; |
18 | 1262 } |
1263 | |
1264 /** | |
1265 * Given a widget and a widget-specific id, returns the | |
1266 * instance of the <code>Widget</code> subclass which represents | |
1267 * the widget/id pair in the currently running application, | |
1268 * if such exists, or null if no matching widget can be found. | |
1269 * | |
1270 * @param widget the widget | |
1271 * @param id the id for the subwidget (usually an item) | |
1272 * @return the SWT subwidget (usually an item) that the widget/id pair represents | |
1273 * | |
1274 * @exception SWTException <ul> | |
1275 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1276 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1277 * </ul> | |
1278 * | |
1279 * @since 3.3 | |
1280 */ | |
1281 public Widget findWidget (Widget widget, int id) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1282 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1283 return null; |
18 | 1284 } |
1285 | |
26 | 1286 private static extern(C) void fixedClassInitProcFunc (void* g_class, void* class_data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1287 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1288 GtkWidgetClass* klass = cast(GtkWidgetClass*)g_class; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1289 klass.map = &fixedMapProcFunc; |
18 | 1290 } |
1291 | |
26 | 1292 private static extern(C) void fixedMapProcFunc (GtkWidget * handle) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1293 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1294 Display display = getCurrent (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1295 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:
54
diff
changeset
|
1296 if (widget !is null) widget.fixedMapProc (handle); |
18 | 1297 } |
1298 | |
26 | 1299 private static extern(C) void rendererClassInitProcFunc (void* g_class, void* class_data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1300 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
26 | 1301 GtkCellRendererClass* klass = cast(GtkCellRendererClass*)g_class; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1302 klass.render = &rendererRenderProcFunc; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1303 klass.get_size = &rendererGetSizeProcFunc; |
18 | 1304 } |
26 | 1305 private static extern(C) void rendererGetSizeProcFunc(GtkCellRenderer *cell, GtkWidget *handle, GdkRectangle *cell_area, int *x_offset, int *y_offset, int *width, int *height) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1306 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1307 Display display = getCurrent (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1308 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:
54
diff
changeset
|
1309 if (widget !is null) widget.rendererGetSizeProc (cell, handle, cell_area, x_offset, y_offset, width, height); |
26 | 1310 } |
1311 private static extern(C) void rendererRenderProcFunc(GtkCellRenderer * cell, GdkDrawable * window, GtkWidget * handle, GdkRectangle *background_area, GdkRectangle *cell_area, GdkRectangle *expose_area, int flags){ | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1312 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1313 Display display = getCurrent (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1314 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:
54
diff
changeset
|
1315 if (widget !is null) widget.rendererRenderProc (cell, window, handle, background_area, cell_area, expose_area, flags); |
18 | 1316 } |
1317 | |
26 | 1318 void flushExposes (GdkWindow* window, bool all) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1319 OS.gdk_flush (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1320 OS.gdk_flush (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1321 if (OS.GDK_WINDOWING_X11 ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1322 this.flushWindow = window; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1323 this.flushAll = all; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1324 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:
54
diff
changeset
|
1325 auto xEvent = cast(XEvent*)OS.g_malloc (XEvent.sizeof); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1326 OS.XCheckIfEvent (xDisplay, xEvent, &checkIfEventProcFunc, cast(char*)this ); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1327 OS.g_free (xEvent); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1328 this.flushWindow = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1329 } |
18 | 1330 } |
1331 | |
1332 /** | |
1333 * Returns the currently active <code>Shell</code>, or null | |
1334 * if no shell belonging to the currently running application | |
1335 * is active. | |
1336 * | |
1337 * @return the active shell or null | |
1338 * | |
1339 * @exception SWTException <ul> | |
1340 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1341 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1342 * </ul> | |
1343 */ | |
1344 public Shell getActiveShell () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1345 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1346 return activeShell; |
18 | 1347 } |
1348 | |
1349 /** | |
1350 * Returns a rectangle describing the receiver's size and location. | |
1351 * | |
1352 * @return the bounding rectangle | |
1353 * | |
1354 * @exception SWTException <ul> | |
1355 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1356 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1357 * </ul> | |
1358 */ | |
1359 public Rectangle getBounds () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1360 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1361 return new Rectangle (0, 0, OS.gdk_screen_width (), OS.gdk_screen_height ()); |
18 | 1362 } |
1363 | |
1364 /** | |
1365 * Returns the display which the currently running thread is | |
1366 * the user-interface thread for, or null if the currently | |
1367 * running thread is not a user-interface thread for any display. | |
1368 * | |
1369 * @return the current display | |
1370 */ | |
1371 public static synchronized Display getCurrent () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1372 Thread current = Thread.getThis (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1373 for (int i=0; i<Displays.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1374 Display display = Displays [i]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1375 if (display !is null && display.thread is current) return display; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1376 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1377 return null; |
18 | 1378 } |
1379 | |
1380 int getCaretBlinkTime () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1381 // checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1382 auto settings = OS.gtk_settings_get_default (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1383 if (settings is null) return 500; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1384 int buffer; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1385 OS.g_object_get1 (settings, OS.gtk_cursor_blink.ptr, &buffer ); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1386 if (buffer 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:
54
diff
changeset
|
1387 OS.g_object_get1 (settings, OS.gtk_cursor_blink_time.ptr, &buffer); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1388 if (buffer is 0) return 500; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1389 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1390 * By experimentation, GTK application don't use the whole |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1391 * blink cycle time. Instead, they divide up the time, using |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1392 * an effective blink rate of about 1/2 the total time. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1393 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1394 return buffer / 2; |
18 | 1395 } |
1396 | |
1397 /** | |
1398 * Returns the control which the on-screen pointer is currently | |
1399 * over top of, or null if it is not currently over one of the | |
1400 * controls built by the currently running application. | |
1401 * | |
1402 * @return the control under the cursor | |
1403 * | |
1404 * @exception SWTException <ul> | |
1405 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1406 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1407 * </ul> | |
1408 */ | |
1409 public Control getCursorControl () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1410 checkDevice(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1411 int x, y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1412 auto window = OS.gdk_window_at_pointer (&x, &y); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1413 if (window is null) return null; |
26 | 1414 GtkWidget* handle; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1415 OS.gdk_window_get_user_data (window, cast(void**)&handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1416 if (handle 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:
54
diff
changeset
|
1417 do { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1418 Widget widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1419 if (widget !is null && (null !is cast(Control)widget)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1420 Control control = cast(Control) widget; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1421 if (control.isEnabled ()) return control; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1422 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1423 } while ((handle = OS.gtk_widget_get_parent (handle)) !is null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1424 return null; |
18 | 1425 } |
1426 | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
1427 bool filterEvent (Event event) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1428 if (filterTable !is null) filterTable.sendEvent (event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1429 return false; |
18 | 1430 } |
1431 | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
1432 bool filters (int eventType) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1433 if (filterTable 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:
54
diff
changeset
|
1434 return filterTable.hooks (eventType); |
18 | 1435 } |
1436 | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1437 private static extern(C) int filterProcFunc (GdkXEvent* xEvent, GdkEvent* gdkEvent, void* data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1438 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 1439 auto callbackdata = cast(CallbackData*)data; |
1440 auto disp = callbackdata.display; | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1441 if( disp is null ) return 0; |
54 | 1442 auto res = disp.filterProcMeth(xEvent,gdkEvent,callbackdata); |
1443 return res; | |
27 | 1444 } |
1445 | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1446 int filterProcMeth (GdkXEvent* xEvent, GdkEvent* gdkEvent, CallbackData* callbackData) { |
27 | 1447 if( callbackData.data is null ){ |
1448 /* | |
1449 * Feature in GTK. When button 4, 5, 6, or 7 is released, GTK | |
1450 * does not deliver a corresponding GTK event. Button 6 and 7 | |
1451 * are mapped to buttons 4 and 5 in SWT. The fix is to change | |
1452 * the button number of the event to a negative number so that | |
1453 * it gets dispatched by GTK. SWT has been modified to look | |
1454 * for negative button numbers. | |
1455 */ | |
1456 XButtonEvent* mouseEvent = cast(XButtonEvent*) xEvent; | |
1457 if (mouseEvent.type is OS.ButtonRelease) { | |
1458 switch (mouseEvent.button) { | |
1459 case 6: | |
1460 case 7: | |
1461 mouseEvent.button = -mouseEvent.button; | |
1462 break; | |
54 | 1463 default: |
27 | 1464 } |
1465 } | |
1466 } | |
1467 Widget widget = getWidget (cast(GtkWidget*)callbackData.data); | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1468 if (widget is null) return 0; |
38 | 1469 return widget.filterProc (cast(XEvent*)xEvent, gdkEvent, callbackData.data); |
27 | 1470 } |
1471 | |
1472 /** | |
1473 * Returns the location of the on-screen pointer relative | |
1474 * to the top left corner of the screen. | |
1475 * | |
1476 * @return the cursor location | |
1477 * | |
1478 * @exception SWTException <ul> | |
1479 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1480 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1481 * </ul> | |
1482 */ | |
1483 public Point getCursorLocation () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1484 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1485 int x, y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1486 OS.gdk_window_get_pointer (null, &x, &y, null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1487 return new Point (x, y); |
27 | 1488 } |
1489 | |
1490 /** | |
1491 * Returns an array containing the recommended cursor sizes. | |
1492 * | |
1493 * @return the array of cursor sizes | |
1494 * | |
1495 * @exception SWTException <ul> | |
1496 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1497 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1498 * </ul> | |
1499 * | |
1500 * @since 3.0 | |
1501 */ | |
1502 public Point [] getCursorSizes () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1503 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1504 return [new Point (16, 16), new Point (32, 32)]; |
18 | 1505 } |
1506 | |
27 | 1507 /** |
1508 * Returns the application defined property of the receiver | |
1509 * with the specified name, or null if it has not been set. | |
1510 * <p> | |
1511 * Applications may have associated arbitrary objects with the | |
1512 * receiver in this fashion. If the objects stored in the | |
1513 * properties need to be notified when the display is disposed | |
1514 * of, it is the application's responsibility to provide a | |
1515 * <code>disposeExec()</code> handler which does so. | |
1516 * </p> | |
1517 * | |
1518 * @param key the name of the property | |
1519 * @return the value of the property or null if it has not been set | |
1520 * | |
1521 * @exception IllegalArgumentException <ul> | |
1522 * <li>ERROR_NULL_ARGUMENT - if the key is null</li> | |
1523 * </ul> | |
1524 * @exception SWTException <ul> | |
1525 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1526 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1527 * </ul> | |
1528 * | |
1529 * @see #setData(String, Object) | |
1530 * @see #disposeExec(Runnable) | |
1531 */ | |
1532 public Object getData (char[] key) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1533 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1534 if (key is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1535 if (key ==/*eq*/ DISPATCH_EVENT_KEY) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1536 return new ArrayWrapperInt(dispatchEvents); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1537 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1538 if (keys 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:
54
diff
changeset
|
1539 for (int i=0; i<keys.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1540 if (keys [i] ==/*eq*/ key) return values [i]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1541 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1542 return null; |
18 | 1543 } |
27 | 1544 |
1545 /** | |
1546 * Returns the application defined, display specific data | |
1547 * associated with the receiver, or null if it has not been | |
1548 * set. The <em>display specific data</em> is a single, | |
1549 * unnamed field that is stored with every display. | |
1550 * <p> | |
1551 * Applications may put arbitrary objects in this field. If | |
1552 * the object stored in the display specific data needs to | |
1553 * be notified when the display is disposed of, it is the | |
1554 * application's responsibility to provide a | |
1555 * <code>disposeExec()</code> handler which does so. | |
1556 * </p> | |
1557 * | |
1558 * @return the display specific data | |
1559 * | |
1560 * @exception SWTException <ul> | |
1561 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1562 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1563 * </ul> | |
1564 * | |
1565 * @see #setData(Object) | |
1566 * @see #disposeExec(Runnable) | |
1567 */ | |
1568 public Object getData () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1569 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1570 return data; |
27 | 1571 } |
1572 | |
1573 /** | |
1574 * Returns a point whose x coordinate is the horizontal | |
1575 * dots per inch of the display, and whose y coordinate | |
1576 * is the vertical dots per inch of the display. | |
1577 * | |
1578 * @return the horizontal and vertical DPI | |
1579 * | |
1580 * @exception SWTException <ul> | |
1581 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1582 * </ul> | |
1583 */ | |
1584 public Point getDPI () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1585 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1586 int widthMM = OS.gdk_screen_width_mm (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1587 int width = OS.gdk_screen_width (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1588 int dpi = Compatibility.round (254 * width, widthMM * 10); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1589 return new Point (dpi, dpi); |
27 | 1590 } |
1591 | |
1592 int /*long*/ gtk_fixed_get_type () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1593 return fixed_type; |
27 | 1594 } |
1595 | |
1596 int /*long*/ gtk_cell_renderer_text_get_type () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1597 return text_renderer_type; |
27 | 1598 } |
1599 | |
1600 int /*long*/ gtk_cell_renderer_pixbuf_get_type () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1601 return pixbuf_renderer_type; |
27 | 1602 } |
1603 | |
1604 int /*long*/ gtk_cell_renderer_toggle_get_type () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1605 return toggle_renderer_type; |
27 | 1606 } |
1607 | |
1608 /** | |
1609 * Returns the default display. One is created (making the | |
1610 * thread that invokes this method its user-interface thread) | |
1611 * if it did not already exist. | |
1612 * | |
1613 * @return the default display | |
1614 */ | |
18 | 1615 public static synchronized Display getDefault () { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1616 if (Default is null) Default = new Display (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1617 return Default; |
18 | 1618 } |
27 | 1619 |
26 | 1620 // /+static bool isValidClass (Class clazz) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1621 // //PORTING_TODO char[] name = clazz.getName (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1622 // //PORTING_TODO int index = name.lastIndexOf ('.'); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1623 // //PORTING_TODO return name.substring (0, index + 1)==/*eq*/ PACKAGE_PREFIX; |
26 | 1624 // return true; |
1625 // }+/ | |
27 | 1626 |
1627 /** | |
1628 * Returns the button dismissal alignment, one of <code>LEFT</code> or <code>RIGHT</code>. | |
1629 * The button dismissal alignment is the ordering that should be used when positioning the | |
1630 * default dismissal button for a dialog. For example, in a dialog that contains an OK and | |
1631 * CANCEL button, on platforms where the button dismissal alignment is <code>LEFT</code>, the | |
1632 * button ordering should be OK/CANCEL. When button dismissal alignment is <code>RIGHT</code>, | |
1633 * the button ordering should be CANCEL/OK. | |
1634 * | |
1635 * @return the button dismissal order | |
1636 * | |
1637 * @exception SWTException <ul> | |
1638 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1639 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1640 * </ul> | |
1641 * | |
1642 * @since 2.1 | |
1643 */ | |
1644 public int getDismissalAlignment () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1645 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1646 return SWT.RIGHT; |
27 | 1647 } |
1648 | |
1649 /** | |
1650 * Returns the longest duration, in milliseconds, between | |
1651 * two mouse button clicks that will be considered a | |
1652 * <em>double click</em> by the underlying operating system. | |
1653 * | |
1654 * @return the double click time | |
1655 * | |
1656 * @exception SWTException <ul> | |
1657 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1658 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1659 * </ul> | |
1660 */ | |
1661 public int getDoubleClickTime () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1662 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1663 auto settings = OS.gtk_settings_get_default (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1664 int buffer; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1665 OS.g_object_get1 (settings, OS.gtk_double_click_time.ptr, &buffer); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1666 return buffer; |
27 | 1667 } |
1668 | |
1669 /** | |
1670 * Returns the control which currently has keyboard focus, | |
1671 * or null if keyboard events are not currently going to | |
1672 * any of the controls built by the currently running | |
1673 * application. | |
1674 * | |
1675 * @return the control under the cursor | |
1676 * | |
1677 * @exception SWTException <ul> | |
1678 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1679 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1680 * </ul> | |
1681 */ | |
1682 public Control getFocusControl () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1683 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1684 if (focusControl !is null && !focusControl.isDisposed ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1685 return focusControl; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1686 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1687 if (activeShell 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:
54
diff
changeset
|
1688 auto shellHandle = activeShell.shellHandle; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1689 auto handle = OS.gtk_window_get_focus (cast(GtkWindow*)shellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1690 if (handle 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:
54
diff
changeset
|
1691 do { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1692 Widget widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1693 if (widget !is null && (null !is cast(Control)widget)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1694 Control control = cast(Control) widget; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1695 return control.isEnabled () ? control : null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1696 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1697 } while ((handle = OS.gtk_widget_get_parent (handle)) !is null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1698 return null; |
27 | 1699 } |
1700 | |
1701 /** | |
1702 * Returns true when the high contrast mode is enabled. | |
1703 * Otherwise, false is returned. | |
1704 * <p> | |
1705 * Note: This operation is a hint and is not supported on | |
1706 * platforms that do not have this concept. | |
1707 * </p> | |
1708 * | |
1709 * @return the high contrast mode | |
1710 * | |
1711 * @exception SWTException <ul> | |
1712 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1713 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1714 * </ul> | |
1715 * | |
1716 * @since 3.0 | |
1717 */ | |
1718 public bool getHighContrast () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1719 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1720 return false; |
27 | 1721 } |
1722 | |
1723 public int getDepth () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1724 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1725 auto visual = 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:
54
diff
changeset
|
1726 return visual.depth; |
27 | 1727 } |
1728 | |
1729 /** | |
1730 * Returns the maximum allowed depth of icons on this display, in bits per pixel. | |
1731 * On some platforms, this may be different than the actual depth of the display. | |
1732 * | |
1733 * @return the maximum icon depth | |
1734 * | |
1735 * @exception SWTException <ul> | |
1736 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1737 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1738 * </ul> | |
1739 * | |
1740 * @see Device#getDepth | |
1741 */ | |
1742 public int getIconDepth () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1743 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1744 return getDepth (); |
27 | 1745 } |
1746 | |
1747 /** | |
1748 * Returns an array containing the recommended icon sizes. | |
1749 * | |
1750 * @return the array of icon sizes | |
1751 * | |
1752 * @exception SWTException <ul> | |
1753 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1754 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1755 * </ul> | |
1756 * | |
1757 * @see Decorations#setImages(Image[]) | |
1758 * | |
1759 * @since 3.0 | |
1760 */ | |
1761 public Point [] getIconSizes () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1762 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1763 return [new Point (16, 16), new Point (32, 32)]; |
27 | 1764 } |
1765 | |
1766 int getLastEventTime () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1767 return lastEventTime; |
27 | 1768 } |
1769 | |
1770 int getMessageCount () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1771 return synchronizer.getMessageCount (); |
27 | 1772 } |
1773 | |
1774 /** | |
1775 * Returns the work area, an EWMH property to store the size | |
1776 * and position of the screen not covered by dock and panel | |
1777 * windows. See http://freedesktop.org/Standards/wm-spec. | |
1778 */ | |
1779 Rectangle getWorkArea() { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1780 auto atom = OS.gdk_atom_intern ("_NET_WORKAREA".ptr, true); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1781 if (atom is null/*OS.GDK_NONE*/) return null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1782 void* actualType; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1783 int actualFormat; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1784 int actualLength; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1785 char* data; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1786 if (!OS.gdk_property_get (cast(GdkDrawable*)OS.GDK_ROOT_PARENT (), atom, null/*OS.GDK_NONE*/, 0, 16, 0, &actualType, &actualFormat, &actualLength, &data)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1787 return null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1788 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1789 Rectangle result = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1790 if (data !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1791 if (actualLength is 16) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1792 int[] values = (cast(int*)data)[0..4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1793 result = new Rectangle (values [0],values [1],values [2],values [3]); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1794 } else if (actualLength is 32) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1795 long[] values = (cast(long*)data)[0..4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1796 result = new Rectangle (cast(int)values [0],cast(int)values [1],cast(int)values [2],cast(int)values [3]); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1797 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1798 OS.g_free (data); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1799 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1800 return result; |
27 | 1801 } |
1802 | |
1803 /** | |
1804 * Returns an array of monitors attached to the device. | |
1805 * | |
1806 * @return the array of monitors | |
1807 * | |
1808 * @since 3.0 | |
1809 */ | |
1810 public dwt.widgets.Monitor.Monitor [] getMonitors () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1811 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1812 dwt.widgets.Monitor.Monitor [] monitors = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1813 Rectangle workArea = getWorkArea(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1814 auto screen = OS.gdk_screen_get_default (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1815 if (screen !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1816 int monitorCount = OS.gdk_screen_get_n_monitors (screen); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1817 if (monitorCount > 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1818 monitors = new dwt.widgets.Monitor.Monitor [monitorCount]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1819 GdkRectangle* dest = new GdkRectangle (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1820 for (int i = 0; i < monitorCount; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1821 OS.gdk_screen_get_monitor_geometry (screen, i, dest); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1822 auto monitor = new dwt.widgets.Monitor.Monitor (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1823 monitor.handle = i; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1824 monitor.x = dest.x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1825 monitor.y = dest.y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1826 monitor.width = dest.width; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1827 monitor.height = dest.height; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1828 if (i is 0 && workArea !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1829 monitor.clientX = workArea.x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1830 monitor.clientY = workArea.y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1831 monitor.clientWidth = workArea.width; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1832 monitor.clientHeight = workArea.height; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1833 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1834 monitor.clientX = monitor.x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1835 monitor.clientY = monitor.y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1836 monitor.clientWidth = monitor.width; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1837 monitor.clientHeight = monitor.height; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1838 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1839 monitors [i] = monitor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1840 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1841 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1842 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1843 if (monitors is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1844 /* No multimonitor support detected, default to one monitor */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1845 auto monitor = new dwt.widgets.Monitor.Monitor (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1846 Rectangle bounds = getBounds (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1847 monitor.x = bounds.x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1848 monitor.y = bounds.y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1849 monitor.width = bounds.width; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1850 monitor.height = bounds.height; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1851 if (workArea !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1852 monitor.clientX = workArea.x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1853 monitor.clientY = workArea.y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1854 monitor.clientWidth = workArea.width; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1855 monitor.clientHeight = workArea.height; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1856 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1857 monitor.clientX = monitor.x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1858 monitor.clientY = monitor.y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1859 monitor.clientWidth = monitor.width; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1860 monitor.clientHeight = monitor.height; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1861 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1862 monitors = [ monitor ]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1863 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1864 return monitors; |
27 | 1865 } |
1866 | |
1867 /** | |
1868 * Returns the primary monitor for that device. | |
1869 * | |
1870 * @return the primary monitor | |
1871 * | |
1872 * @since 3.0 | |
1873 */ | |
1874 public dwt.widgets.Monitor.Monitor getPrimaryMonitor () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1875 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1876 auto monitors = getMonitors (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1877 return monitors [0]; |
27 | 1878 } |
1879 | |
1880 /** | |
1881 * Returns a (possibly empty) array containing all shells which have | |
1882 * not been disposed and have the receiver as their display. | |
1883 * | |
1884 * @return the receiver's shells | |
1885 * | |
1886 * @exception SWTException <ul> | |
1887 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1888 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1889 * </ul> | |
1890 */ | |
1891 public Shell [] getShells () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1892 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1893 int index = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1894 Shell [] result = new Shell [16]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1895 for (int i = 0; i < widgetTable.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1896 Widget widget = widgetTable [i]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1897 if (widget !is null && (null !is cast(Shell)widget)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1898 int j = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1899 while (j < index) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1900 if (result [j] is widget) break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1901 j++; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1902 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1903 if (j is index) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1904 if (index is result.length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1905 Shell [] newResult = new Shell [index + 16]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1906 System.arraycopy (result, 0, newResult, 0, index); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1907 result = newResult; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1908 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1909 result [index++] = cast(Shell) widget; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1910 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1911 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1912 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1913 if (index is result.length) return result; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1914 Shell [] newResult = new Shell [index]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1915 System.arraycopy (result, 0, newResult, 0, index); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1916 return newResult; |
27 | 1917 } |
1918 | |
1919 /** | |
1920 * Returns the thread that has invoked <code>syncExec</code> | |
1921 * or null if no such runnable is currently being invoked by | |
1922 * the user-interface thread. | |
1923 * <p> | |
1924 * Note: If a runnable invoked by asyncExec is currently | |
1925 * running, this method will return null. | |
1926 * </p> | |
1927 * | |
1928 * @return the receiver's sync-interface thread | |
1929 * | |
1930 * @exception SWTException <ul> | |
1931 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1932 * </ul> | |
1933 */ | |
1934 public Thread getSyncThread () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1935 if (isDisposed ()) error (SWT.ERROR_DEVICE_DISPOSED); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1936 return synchronizer.syncThread; |
27 | 1937 } |
1938 | |
1939 /** | |
1940 * Returns the matching standard color for the given | |
1941 * constant, which should be one of the color constants | |
1942 * specified in class <code>SWT</code>. Any value other | |
1943 * than one of the SWT color constants which is passed | |
1944 * in will result in the color black. This color should | |
1945 * not be free'd because it was allocated by the system, | |
1946 * not the application. | |
1947 * | |
1948 * @param id the color constant | |
1949 * @return the matching color | |
1950 * | |
1951 * @exception SWTException <ul> | |
1952 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
1953 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1954 * </ul> | |
1955 * | |
1956 * @see SWT | |
1957 */ | |
1958 public Color getSystemColor (int id) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1959 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1960 GdkColor* gdkColor = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1961 switch (id) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1962 case SWT.COLOR_INFO_FOREGROUND: gdkColor = COLOR_INFO_FOREGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1963 case SWT.COLOR_INFO_BACKGROUND: gdkColor = COLOR_INFO_BACKGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1964 case SWT.COLOR_TITLE_FOREGROUND: gdkColor = COLOR_TITLE_FOREGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1965 case SWT.COLOR_TITLE_BACKGROUND: gdkColor = COLOR_TITLE_BACKGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1966 case SWT.COLOR_TITLE_BACKGROUND_GRADIENT: gdkColor = COLOR_TITLE_BACKGROUND_GRADIENT; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1967 case SWT.COLOR_TITLE_INACTIVE_FOREGROUND: gdkColor = COLOR_TITLE_INACTIVE_FOREGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1968 case SWT.COLOR_TITLE_INACTIVE_BACKGROUND: gdkColor = COLOR_TITLE_INACTIVE_BACKGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1969 case SWT.COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT: gdkColor = COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1970 case SWT.COLOR_WIDGET_DARK_SHADOW: gdkColor = COLOR_WIDGET_DARK_SHADOW; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1971 case SWT.COLOR_WIDGET_NORMAL_SHADOW: gdkColor = COLOR_WIDGET_NORMAL_SHADOW; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1972 case SWT.COLOR_WIDGET_LIGHT_SHADOW: gdkColor = COLOR_WIDGET_LIGHT_SHADOW; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1973 case SWT.COLOR_WIDGET_HIGHLIGHT_SHADOW: gdkColor = COLOR_WIDGET_HIGHLIGHT_SHADOW; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1974 case SWT.COLOR_WIDGET_BACKGROUND: gdkColor = COLOR_WIDGET_BACKGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1975 case SWT.COLOR_WIDGET_FOREGROUND: gdkColor = COLOR_WIDGET_FOREGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1976 case SWT.COLOR_WIDGET_BORDER: gdkColor = COLOR_WIDGET_BORDER; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1977 case SWT.COLOR_LIST_FOREGROUND: gdkColor = COLOR_LIST_FOREGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1978 case SWT.COLOR_LIST_BACKGROUND: gdkColor = COLOR_LIST_BACKGROUND; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1979 case SWT.COLOR_LIST_SELECTION: gdkColor = COLOR_LIST_SELECTION; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1980 case SWT.COLOR_LIST_SELECTION_TEXT: gdkColor = COLOR_LIST_SELECTION_TEXT; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1981 default: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1982 return super.getSystemColor (id); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1983 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1984 if (gdkColor is null) return super.getSystemColor (SWT.COLOR_BLACK); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1985 return Color.gtk_new (this, gdkColor); |
27 | 1986 } |
1987 | |
1988 /** | |
1989 * Returns the matching standard platform cursor for the given | |
1990 * constant, which should be one of the cursor constants | |
1991 * specified in class <code>SWT</code>. This cursor should | |
1992 * not be free'd because it was allocated by the system, | |
1993 * not the application. A value of <code>null</code> will | |
1994 * be returned if the supplied constant is not an SWT cursor | |
1995 * constant. | |
1996 * | |
1997 * @param id the SWT cursor constant | |
1998 * @return the corresponding cursor or <code>null</code> | |
1999 * | |
2000 * @exception SWTException <ul> | |
2001 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
2002 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2003 * </ul> | |
2004 * | |
2005 * @see SWT#CURSOR_ARROW | |
2006 * @see SWT#CURSOR_WAIT | |
2007 * @see SWT#CURSOR_CROSS | |
2008 * @see SWT#CURSOR_APPSTARTING | |
2009 * @see SWT#CURSOR_HELP | |
2010 * @see SWT#CURSOR_SIZEALL | |
2011 * @see SWT#CURSOR_SIZENESW | |
2012 * @see SWT#CURSOR_SIZENS | |
2013 * @see SWT#CURSOR_SIZENWSE | |
2014 * @see SWT#CURSOR_SIZEWE | |
2015 * @see SWT#CURSOR_SIZEN | |
2016 * @see SWT#CURSOR_SIZES | |
2017 * @see SWT#CURSOR_SIZEE | |
2018 * @see SWT#CURSOR_SIZEW | |
2019 * @see SWT#CURSOR_SIZENE | |
2020 * @see SWT#CURSOR_SIZESE | |
2021 * @see SWT#CURSOR_SIZESW | |
2022 * @see SWT#CURSOR_SIZENW | |
2023 * @see SWT#CURSOR_UPARROW | |
2024 * @see SWT#CURSOR_IBEAM | |
2025 * @see SWT#CURSOR_NO | |
2026 * @see SWT#CURSOR_HAND | |
2027 * | |
2028 * @since 3.0 | |
2029 */ | |
2030 public Cursor getSystemCursor (int id) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2031 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2032 if (!(0 <= id && id < cursors.length)) return null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2033 if (cursors [id] is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2034 cursors [id] = new Cursor (this, id); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2035 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2036 return cursors [id]; |
27 | 2037 } |
2038 | |
2039 /** | |
2040 * Returns the matching standard platform image for the given | |
2041 * constant, which should be one of the icon constants | |
2042 * specified in class <code>SWT</code>. This image should | |
2043 * not be free'd because it was allocated by the system, | |
2044 * not the application. A value of <code>null</code> will | |
2045 * be returned either if the supplied constant is not an | |
2046 * SWT icon constant or if the platform does not define an | |
2047 * image that corresponds to the constant. | |
2048 * | |
2049 * @param id the SWT icon constant | |
2050 * @return the corresponding image or <code>null</code> | |
2051 * | |
2052 * @exception SWTException <ul> | |
2053 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
2054 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2055 * </ul> | |
2056 * | |
2057 * @see SWT#ICON_ERROR | |
2058 * @see SWT#ICON_INFORMATION | |
2059 * @see SWT#ICON_QUESTION | |
2060 * @see SWT#ICON_WARNING | |
2061 * @see SWT#ICON_WORKING | |
2062 * | |
2063 * @since 3.0 | |
2064 */ | |
2065 public Image getSystemImage (int id) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2066 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2067 switch (id) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2068 case SWT.ICON_ERROR: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2069 if (errorImage is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2070 errorImage = createImage ("gtk-dialog-error"); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2071 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2072 return errorImage; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2073 case SWT.ICON_INFORMATION: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2074 case SWT.ICON_WORKING: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2075 if (infoImage is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2076 infoImage = createImage ("gtk-dialog-info"); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2077 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2078 return infoImage; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2079 case SWT.ICON_QUESTION: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2080 if (questionImage is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2081 questionImage = createImage ("gtk-dialog-question"); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2082 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2083 return questionImage; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2084 case SWT.ICON_WARNING: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2085 if (warningImage is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2086 warningImage = createImage ("gtk-dialog-warning"); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2087 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2088 return warningImage; |
54 | 2089 default: |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2090 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2091 return null; |
27 | 2092 } |
2093 | |
2094 void initializeSystemColors () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2095 GdkColor* gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2096 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2097 /* Get Tooltip resources */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2098 auto tooltipShellHandle = OS.gtk_window_new (OS.GTK_WINDOW_POPUP); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2099 if (tooltipShellHandle is null) SWT.error (SWT.ERROR_NO_HANDLES); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2100 // byte[] gtk_tooltips = Converter.wcsToMbcs (null, "gtk-tooltips", true); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2101 OS.gtk_widget_set_name (tooltipShellHandle, "gtk-tooltips".ptr ); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2102 OS.gtk_widget_realize (tooltipShellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2103 auto tooltipStyle = OS.gtk_widget_get_style (tooltipShellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2104 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2105 OS.gtk_style_get_fg (tooltipStyle, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2106 COLOR_INFO_FOREGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2107 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2108 OS.gtk_style_get_bg (tooltipStyle, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2109 COLOR_INFO_BACKGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2110 OS.gtk_widget_destroy (tooltipShellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2111 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2112 /* Get Shell resources */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2113 auto style = OS.gtk_widget_get_style (shellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2114 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2115 OS.gtk_style_get_black (style, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2116 COLOR_WIDGET_DARK_SHADOW = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2117 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2118 OS.gtk_style_get_dark (style, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2119 COLOR_WIDGET_NORMAL_SHADOW = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2120 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2121 OS.gtk_style_get_bg (style, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2122 COLOR_WIDGET_LIGHT_SHADOW = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2123 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2124 OS.gtk_style_get_light (style, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2125 COLOR_WIDGET_HIGHLIGHT_SHADOW = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2126 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2127 OS.gtk_style_get_fg (style, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2128 COLOR_WIDGET_FOREGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2129 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2130 OS.gtk_style_get_bg (style, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2131 COLOR_WIDGET_BACKGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2132 //gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2133 //OS.gtk_style_get_text (style, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2134 //COLOR_TEXT_FOREGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2135 //gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2136 //OS.gtk_style_get_base (style, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2137 //COLOR_TEXT_BACKGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2138 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2139 OS.gtk_style_get_text (style, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2140 COLOR_LIST_FOREGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2141 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2142 OS.gtk_style_get_base (style, OS.GTK_STATE_NORMAL, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2143 COLOR_LIST_BACKGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2144 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2145 OS.gtk_style_get_text (style, OS.GTK_STATE_SELECTED, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2146 COLOR_LIST_SELECTION_TEXT = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2147 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2148 OS.gtk_style_get_base (style, OS.GTK_STATE_SELECTED, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2149 COLOR_LIST_SELECTION = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2150 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2151 OS.gtk_style_get_bg (style, OS.GTK_STATE_SELECTED, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2152 COLOR_TITLE_BACKGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2153 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2154 OS.gtk_style_get_fg (style, OS.GTK_STATE_SELECTED, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2155 COLOR_TITLE_FOREGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2156 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2157 OS.gtk_style_get_light (style, OS.GTK_STATE_SELECTED, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2158 COLOR_TITLE_BACKGROUND_GRADIENT = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2159 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2160 OS.gtk_style_get_bg (style, OS.GTK_STATE_INSENSITIVE, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2161 COLOR_TITLE_INACTIVE_BACKGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2162 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2163 OS.gtk_style_get_fg (style, OS.GTK_STATE_INSENSITIVE, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2164 COLOR_TITLE_INACTIVE_FOREGROUND = gdkColor; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2165 gdkColor = new GdkColor(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2166 OS.gtk_style_get_light (style, OS.GTK_STATE_INSENSITIVE, gdkColor); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2167 COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT = gdkColor; |
27 | 2168 } |
2169 | |
2170 /** | |
2171 * Returns a reasonable font for applications to use. | |
2172 * On some platforms, this will match the "default font" | |
2173 * or "system font" if such can be found. This font | |
2174 * should not be free'd because it was allocated by the | |
2175 * system, not the application. | |
2176 * <p> | |
2177 * Typically, applications which want the default look | |
2178 * should simply not set the font on the widgets they | |
2179 * create. Widgets are always created with the correct | |
2180 * default font for the class of user-interface component | |
2181 * they represent. | |
2182 * </p> | |
2183 * | |
2184 * @return a font | |
2185 * | |
2186 * @exception SWTException <ul> | |
2187 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
2188 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2189 * </ul> | |
2190 */ | |
2191 public Font getSystemFont () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2192 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2193 if (systemFont !is null) return systemFont; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2194 auto style = OS.gtk_widget_get_style (shellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2195 auto defaultFont = OS.pango_font_description_copy (OS.gtk_style_get_font_desc (style)); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2196 return systemFont = Font.gtk_new (this, defaultFont); |
27 | 2197 } |
2198 | |
2199 /** | |
2200 * Returns the single instance of the system tray or null | |
2201 * when there is no system tray available for the platform. | |
2202 * | |
2203 * @return the system tray or <code>null</code> | |
2204 * | |
2205 * @exception SWTException <ul> | |
2206 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2207 * </ul> | |
2208 * | |
2209 * @since 3.0 | |
2210 */ | |
2211 public Tray getSystemTray () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2212 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2213 if (tray !is null) return tray; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2214 return tray = new Tray (this, SWT.NONE); |
27 | 2215 } |
2216 | |
2217 /** | |
2218 * Returns the user-interface thread for the receiver. | |
2219 * | |
2220 * @return the receiver's user-interface thread | |
2221 * | |
2222 * @exception SWTException <ul> | |
2223 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2224 * </ul> | |
2225 */ | |
2226 public Thread getThread () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2227 if (isDisposed ()) error (SWT.ERROR_DEVICE_DISPOSED); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2228 return thread; |
27 | 2229 } |
2230 | |
26 | 2231 Widget getWidget (GtkWidget* handle) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2232 if (handle 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:
54
diff
changeset
|
2233 if (lastWidget !is null && lastHandle is handle) return lastWidget; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2234 auto index = cast(int) OS.g_object_get_qdata ( cast(GObject*)handle, SWT_OBJECT_INDEX) - 1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2235 if (0 <= index && index < widgetTable.length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2236 lastHandle = handle; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2237 return lastWidget = widgetTable [cast(int)/*64*/index]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2238 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2239 return null; |
18 | 2240 } |
2241 | |
26 | 2242 private static extern(C) int idleProcFunc (void* data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2243 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 2244 auto dbdata = cast(CallbackData*)data; |
2245 return dbdata.display.idleProc(); | |
26 | 2246 } |
27 | 2247 private int idleProc () { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2248 bool result = runAsyncMessages (false); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2249 if (!result) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2250 synchronized (idleLock) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2251 idleHandle = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2252 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2253 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2254 return result ? 1 : 0; |
26 | 2255 return 0; |
18 | 2256 } |
27 | 2257 |
2258 /** | |
2259 * Initializes any internal resources needed by the | |
2260 * device. | |
2261 * <p> | |
2262 * This method is called after <code>create</code>. | |
2263 * </p> | |
2264 * | |
2265 * @see #create | |
2266 */ | |
2267 protected void init () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2268 super.init (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2269 initializeCallbacks (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2270 initializeSystemColors (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2271 initializeSystemSettings (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2272 initializeWidgetTable (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2273 initializeWindowManager (); |
27 | 2274 } |
2275 | |
2276 void initializeCallbacks () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2277 closures = new GClosure* [Widget.LAST_SIGNAL]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2278 signalIds = new int [Widget.LAST_SIGNAL]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2279 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2280 /* Cache signals for GtkWidget */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2281 signalIds [Widget.BUTTON_PRESS_EVENT] = OS.g_signal_lookup (OS.button_press_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2282 signalIds [Widget.BUTTON_RELEASE_EVENT] = OS.g_signal_lookup (OS.button_release_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2283 signalIds [Widget.CONFIGURE_EVENT] = OS.g_signal_lookup (OS.configure_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2284 signalIds [Widget.DELETE_EVENT] = OS.g_signal_lookup (OS.delete_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2285 signalIds [Widget.ENTER_NOTIFY_EVENT] = OS.g_signal_lookup (OS.enter_notify_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2286 signalIds [Widget.EVENT] = OS.g_signal_lookup (OS.event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2287 signalIds [Widget.EVENT_AFTER] = OS.g_signal_lookup (OS.event_after.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2288 signalIds [Widget.EXPOSE_EVENT] = OS.g_signal_lookup (OS.expose_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2289 signalIds [Widget.FOCUS] = OS.g_signal_lookup (OS.focus.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2290 signalIds [Widget.FOCUS_IN_EVENT] = OS.g_signal_lookup (OS.focus_in_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2291 signalIds [Widget.FOCUS_OUT_EVENT] = OS.g_signal_lookup (OS.focus_out_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2292 signalIds [Widget.GRAB_FOCUS] = OS.g_signal_lookup (OS.grab_focus.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2293 signalIds [Widget.HIDE] = OS.g_signal_lookup (OS.hide.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2294 signalIds [Widget.KEY_PRESS_EVENT] = OS.g_signal_lookup (OS.key_press_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2295 signalIds [Widget.KEY_RELEASE_EVENT] = OS.g_signal_lookup (OS.key_release_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2296 signalIds [Widget.LEAVE_NOTIFY_EVENT] = OS.g_signal_lookup (OS.leave_notify_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2297 signalIds [Widget.MAP] = OS.g_signal_lookup (OS.map.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2298 signalIds [Widget.MAP_EVENT] = OS.g_signal_lookup (OS.map_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2299 signalIds [Widget.MNEMONIC_ACTIVATE] = OS.g_signal_lookup (OS.mnemonic_activate.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2300 signalIds [Widget.MOTION_NOTIFY_EVENT] = OS.g_signal_lookup (OS.motion_notify_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2301 signalIds [Widget.POPUP_MENU] = OS.g_signal_lookup (OS.popup_menu.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2302 signalIds [Widget.REALIZE] = OS.g_signal_lookup (OS.realize.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2303 signalIds [Widget.SCROLL_EVENT] = OS.g_signal_lookup (OS.scroll_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2304 signalIds [Widget.SHOW] = OS.g_signal_lookup (OS.show.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2305 signalIds [Widget.SHOW_HELP] = OS.g_signal_lookup (OS.show_help.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2306 signalIds [Widget.SIZE_ALLOCATE] = OS.g_signal_lookup (OS.size_allocate.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2307 signalIds [Widget.STYLE_SET] = OS.g_signal_lookup (OS.style_set.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2308 signalIds [Widget.UNMAP] = OS.g_signal_lookup (OS.unmap.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2309 signalIds [Widget.UNMAP_EVENT] = OS.g_signal_lookup (OS.unmap_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2310 signalIds [Widget.UNREALIZE] = OS.g_signal_lookup (OS.realize.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2311 signalIds [Widget.VISIBILITY_NOTIFY_EVENT] = OS.g_signal_lookup (OS.visibility_notify_event.ptr, OS.GTK_TYPE_WIDGET ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2312 signalIds [Widget.WINDOW_STATE_EVENT] = OS.g_signal_lookup (OS.window_state_event.ptr, OS.GTK_TYPE_WIDGET ()); |
27 | 2313 |
2314 GClosure* do_cclosure_new( GCallback cb, int value, int notify ){ | |
2315 CallbackData* res= new CallbackData; | |
2316 res.display = this; | |
2317 res.data = cast(void*)value; | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2318 windowProcCallbackDatas[ value ] = res; |
27 | 2319 return OS.g_cclosure_new( cb, cast(void*)res, cast(GClosureNotify)notify ); |
2320 } | |
2321 | |
2322 GCallback windowProc2 = cast(GCallback)&windowProcFunc2; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2323 closures [Widget.ACTIVATE] = do_cclosure_new (windowProc2, Widget.ACTIVATE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2324 closures [Widget.ACTIVATE_INVERSE] = do_cclosure_new (windowProc2, Widget.ACTIVATE_INVERSE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2325 closures [Widget.CHANGED] = do_cclosure_new (windowProc2, Widget.CHANGED, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2326 closures [Widget.CLICKED] = do_cclosure_new (windowProc2, Widget.CLICKED, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2327 closures [Widget.DAY_SELECTED] = do_cclosure_new (windowProc2, Widget.DAY_SELECTED, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2328 closures [Widget.HIDE] = do_cclosure_new (windowProc2, Widget.HIDE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2329 closures [Widget.GRAB_FOCUS] = do_cclosure_new (windowProc2, Widget.GRAB_FOCUS, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2330 closures [Widget.MAP] = do_cclosure_new (windowProc2, Widget.MAP, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2331 closures [Widget.MONTH_CHANGED] = do_cclosure_new (windowProc2, Widget.MONTH_CHANGED, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2332 closures [Widget.OUTPUT] = do_cclosure_new (windowProc2, Widget.OUTPUT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2333 closures [Widget.POPUP_MENU] = do_cclosure_new (windowProc2, Widget.POPUP_MENU, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2334 closures [Widget.PREEDIT_CHANGED] = do_cclosure_new (windowProc2, Widget.PREEDIT_CHANGED, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2335 closures [Widget.REALIZE] = do_cclosure_new (windowProc2, Widget.REALIZE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2336 closures [Widget.SELECT] = do_cclosure_new (windowProc2, Widget.SELECT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2337 closures [Widget.SHOW] = do_cclosure_new (windowProc2, Widget.SHOW, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2338 closures [Widget.VALUE_CHANGED] = do_cclosure_new (windowProc2, Widget.VALUE_CHANGED, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2339 closures [Widget.UNMAP] = do_cclosure_new (windowProc2, Widget.UNMAP, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2340 closures [Widget.UNREALIZE] = do_cclosure_new (windowProc2, Widget.UNREALIZE, 0); |
27 | 2341 |
2342 GCallback windowProc3 = cast(GCallback)&windowProcFunc3; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2343 closures [Widget.BUTTON_PRESS_EVENT] = do_cclosure_new (windowProc3, Widget.BUTTON_PRESS_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2344 closures [Widget.BUTTON_PRESS_EVENT_INVERSE] = do_cclosure_new (windowProc3, Widget.BUTTON_PRESS_EVENT_INVERSE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2345 closures [Widget.BUTTON_RELEASE_EVENT] = do_cclosure_new (windowProc3, Widget.BUTTON_RELEASE_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2346 closures [Widget.BUTTON_RELEASE_EVENT_INVERSE] = do_cclosure_new (windowProc3, Widget.BUTTON_RELEASE_EVENT_INVERSE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2347 closures [Widget.COMMIT] = do_cclosure_new (windowProc3, Widget.COMMIT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2348 closures [Widget.CONFIGURE_EVENT] = do_cclosure_new (windowProc3, Widget.CONFIGURE_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2349 closures [Widget.DELETE_EVENT] = do_cclosure_new (windowProc3, Widget.DELETE_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2350 closures [Widget.ENTER_NOTIFY_EVENT] = do_cclosure_new (windowProc3, Widget.ENTER_NOTIFY_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2351 closures [Widget.EVENT] = do_cclosure_new (windowProc3, Widget.EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2352 closures [Widget.EVENT_AFTER] = do_cclosure_new (windowProc3, Widget.EVENT_AFTER, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2353 closures [Widget.EXPOSE_EVENT] = do_cclosure_new (windowProc3, Widget.EXPOSE_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2354 closures [Widget.EXPOSE_EVENT_INVERSE] = do_cclosure_new (windowProc3, Widget.EXPOSE_EVENT_INVERSE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2355 closures [Widget.FOCUS] = do_cclosure_new (windowProc3, Widget.FOCUS, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2356 closures [Widget.FOCUS_IN_EVENT] = do_cclosure_new (windowProc3, Widget.FOCUS_IN_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2357 closures [Widget.FOCUS_OUT_EVENT] = do_cclosure_new (windowProc3, Widget.FOCUS_OUT_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2358 closures [Widget.KEY_PRESS_EVENT] = do_cclosure_new (windowProc3, Widget.KEY_PRESS_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2359 closures [Widget.KEY_RELEASE_EVENT] = do_cclosure_new (windowProc3, Widget.KEY_RELEASE_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2360 closures [Widget.INPUT] = do_cclosure_new (windowProc3, Widget.INPUT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2361 closures [Widget.LEAVE_NOTIFY_EVENT] = do_cclosure_new (windowProc3, Widget.LEAVE_NOTIFY_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2362 closures [Widget.MAP_EVENT] = do_cclosure_new (windowProc3, Widget.MAP_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2363 closures [Widget.MNEMONIC_ACTIVATE] = do_cclosure_new (windowProc3, Widget.MNEMONIC_ACTIVATE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2364 closures [Widget.MOTION_NOTIFY_EVENT] = do_cclosure_new (windowProc3, Widget.MOTION_NOTIFY_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2365 closures [Widget.MOTION_NOTIFY_EVENT_INVERSE] = do_cclosure_new (windowProc3, Widget.MOTION_NOTIFY_EVENT_INVERSE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2366 closures [Widget.MOVE_FOCUS] = do_cclosure_new (windowProc3, Widget.MOVE_FOCUS, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2367 closures [Widget.SCROLL_EVENT] = do_cclosure_new (windowProc3, Widget.SCROLL_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2368 closures [Widget.SHOW_HELP] = do_cclosure_new (windowProc3, Widget.SHOW_HELP, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2369 closures [Widget.SIZE_ALLOCATE] = do_cclosure_new (windowProc3, Widget.SIZE_ALLOCATE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2370 closures [Widget.STYLE_SET] = do_cclosure_new (windowProc3, Widget.STYLE_SET, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2371 closures [Widget.TOGGLED] = do_cclosure_new (windowProc3, Widget.TOGGLED, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2372 closures [Widget.UNMAP_EVENT] = do_cclosure_new (windowProc3, Widget.UNMAP_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2373 closures [Widget.VISIBILITY_NOTIFY_EVENT] = do_cclosure_new (windowProc3, Widget.VISIBILITY_NOTIFY_EVENT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2374 closures [Widget.WINDOW_STATE_EVENT] = do_cclosure_new (windowProc3, Widget.WINDOW_STATE_EVENT, 0); |
27 | 2375 |
2376 GCallback windowProc4 = cast(GCallback)&windowProcFunc4; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2377 closures [Widget.DELETE_RANGE] = do_cclosure_new (windowProc4, Widget.DELETE_RANGE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2378 closures [Widget.DELETE_TEXT] = do_cclosure_new (windowProc4, Widget.DELETE_TEXT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2379 closures [Widget.ROW_ACTIVATED] = do_cclosure_new (windowProc4, Widget.ROW_ACTIVATED, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2380 closures [Widget.SCROLL_CHILD] = do_cclosure_new (windowProc4, Widget.SCROLL_CHILD, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2381 closures [Widget.SWITCH_PAGE] = do_cclosure_new (windowProc4, Widget.SWITCH_PAGE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2382 closures [Widget.TEST_COLLAPSE_ROW] = do_cclosure_new (windowProc4, Widget.TEST_COLLAPSE_ROW, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2383 closures [Widget.TEST_EXPAND_ROW] = do_cclosure_new (windowProc4, Widget.TEST_EXPAND_ROW, 0); |
27 | 2384 |
2385 GCallback windowProc5 = cast(GCallback)&windowProcFunc5; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2386 closures [Widget.CHANGE_VALUE] = do_cclosure_new (windowProc5, Widget.CHANGE_VALUE, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2387 closures [Widget.EXPAND_COLLAPSE_CURSOR_ROW] = do_cclosure_new (windowProc5, Widget.EXPAND_COLLAPSE_CURSOR_ROW, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2388 closures [Widget.INSERT_TEXT] = do_cclosure_new (windowProc5, Widget.INSERT_TEXT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2389 closures [Widget.TEXT_BUFFER_INSERT_TEXT] = do_cclosure_new (windowProc5, Widget.TEXT_BUFFER_INSERT_TEXT, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2390 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2391 for (int i = 0; i < Widget.LAST_SIGNAL; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2392 if (closures [i] !is null) OS.g_closure_ref (closures [i]); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2393 } |
27 | 2394 shellMapProcCallbackData.display = this; |
2395 shellMapProcCallbackData.data = null; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2396 shellMapProcClosure = OS.g_cclosure_new (cast(GCallback)&shellMapProcFunc, &shellMapProcCallbackData, cast(GClosureNotify)0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2397 OS.g_closure_ref (shellMapProcClosure); |
27 | 2398 } |
2399 | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2400 void* getWindowProcUserData( int value ){ |
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2401 return windowProcCallbackDatas[ value ]; |
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2402 } |
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2403 |
27 | 2404 void initializeSystemSettings () { |
2405 styleSetProcCallbackData.display = this; | |
2406 styleSetProcCallbackData.data = null; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2407 OS.g_signal_connect (shellHandle, OS.style_set.ptr, cast(GCallback)&styleSetProcFunc, &styleSetProcCallbackData); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2408 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2409 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2410 * Feature in GTK. Despite the fact that the |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2411 * gtk-entry-select-on-focus property is a global |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2412 * setting, it is initialized when the GtkEntry |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2413 * is initialized. This means that it cannot be |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2414 * accessed before a GtkEntry is created. The |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2415 * fix is to for the initializaion by creating |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2416 * a temporary GtkEntry. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2417 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2418 auto entry = OS.gtk_entry_new (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2419 OS.gtk_widget_destroy (entry); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2420 int buffer2; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2421 auto settings = OS.gtk_settings_get_default (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2422 OS.g_object_get1 (settings, OS.gtk_entry_select_on_focus.ptr, &buffer2); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2423 entrySelectOnFocus = buffer2 !is 0; |
27 | 2424 } |
2425 | |
2426 void initializeWidgetTable () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2427 indexTable = new int [GROW_SIZE]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2428 widgetTable = new Widget [GROW_SIZE]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2429 for (int i=0; i<GROW_SIZE-1; i++) indexTable [i] = i + 1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2430 indexTable [GROW_SIZE - 1] = -1; |
27 | 2431 } |
2432 | |
2433 void initializeWindowManager () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2434 /* Get the window manager name */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2435 windowManager = ""; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2436 if (OS.GTK_VERSION >= OS.buildVERSION (2, 2, 0)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2437 auto screen = OS.gdk_screen_get_default (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2438 if (screen !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2439 auto ptr2 = OS.gdk_x11_screen_get_window_manager_name (screen); |
27 | 2440 windowManager = fromUtf8z( ptr2 ); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2441 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2442 } |
27 | 2443 } |
2444 | |
2445 /** | |
2446 * Invokes platform specific functionality to dispose a GC handle. | |
2447 * <p> | |
2448 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public | |
2449 * API for <code>Display</code>. It is marked public only so that it | |
2450 * can be shared within the packages provided by SWT. It is not | |
2451 * available on all platforms, and should never be called from | |
2452 * application code. | |
2453 * </p> | |
2454 * | |
2455 * @param hDC the platform specific GC handle | |
2456 * @param data the platform specific GC data | |
2457 */ | |
26 | 2458 public void internal_dispose_GC (GdkGC* gdkGC, GCData data) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2459 OS.g_object_unref (gdkGC); |
26 | 2460 } |
27 | 2461 |
2462 /** | |
2463 * Invokes platform specific functionality to allocate a new GC handle. | |
2464 * <p> | |
2465 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public | |
2466 * API for <code>Display</code>. It is marked public only so that it | |
2467 * can be shared within the packages provided by SWT. It is not | |
2468 * available on all platforms, and should never be called from | |
2469 * application code. | |
2470 * </p> | |
2471 * | |
2472 * @param data the platform specific GC data | |
2473 * @return the platform specific GC handle | |
2474 * | |
2475 * @exception SWTException <ul> | |
2476 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2477 * </ul> | |
2478 * @exception SWTError <ul> | |
2479 * <li>ERROR_NO_HANDLES if a handle could not be obtained for gc creation</li> | |
2480 * </ul> | |
2481 */ | |
26 | 2482 public GdkGC* internal_new_GC (GCData data) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2483 if (isDisposed()) SWT.error(SWT.ERROR_DEVICE_DISPOSED); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2484 auto root = cast(GdkDrawable *) OS.GDK_ROOT_PARENT (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2485 auto gdkGC = OS.gdk_gc_new (root); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2486 if (gdkGC is null) SWT.error (SWT.ERROR_NO_HANDLES); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2487 OS.gdk_gc_set_subwindow (gdkGC, OS.GDK_INCLUDE_INFERIORS); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2488 if (data !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2489 int mask = SWT.LEFT_TO_RIGHT | SWT.RIGHT_TO_LEFT; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2490 if ((data.style & mask) is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2491 data.style |= SWT.LEFT_TO_RIGHT; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2492 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2493 data.device = this; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2494 data.drawable = root; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2495 data.background = getSystemColor (SWT.COLOR_WHITE).handle; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2496 data.foreground = getSystemColor (SWT.COLOR_BLACK).handle; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2497 data.font = getSystemFont ().handle; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2498 } |
27 | 2499 return gdkGC; |
26 | 2500 return null; |
2501 } | |
27 | 2502 |
26 | 2503 bool isValidThread () { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2504 return thread is Thread.getThis (); |
18 | 2505 } |
27 | 2506 |
2507 /** | |
2508 * Maps a point from one coordinate system to another. | |
2509 * When the control is null, coordinates are mapped to | |
2510 * the display. | |
2511 * <p> | |
2512 * NOTE: On right-to-left platforms where the coordinate | |
2513 * systems are mirrored, special care needs to be taken | |
2514 * when mapping coordinates from one control to another | |
2515 * to ensure the result is correctly mirrored. | |
2516 * | |
2517 * Mapping a point that is the origin of a rectangle and | |
2518 * then adding the width and height is not equivalent to | |
2519 * mapping the rectangle. When one control is mirrored | |
2520 * and the other is not, adding the width and height to a | |
2521 * point that was mapped causes the rectangle to extend | |
2522 * in the wrong direction. Mapping the entire rectangle | |
2523 * instead of just one point causes both the origin and | |
2524 * the corner of the rectangle to be mapped. | |
2525 * </p> | |
2526 * | |
2527 * @param from the source <code>Control</code> or <code>null</code> | |
2528 * @param to the destination <code>Control</code> or <code>null</code> | |
2529 * @param point to be mapped | |
2530 * @return point with mapped coordinates | |
2531 * | |
2532 * @exception IllegalArgumentException <ul> | |
2533 * <li>ERROR_NULL_ARGUMENT - if the point is null</li> | |
2534 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> | |
2535 * </ul> | |
2536 * @exception SWTException <ul> | |
2537 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
2538 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2539 * </ul> | |
2540 * | |
2541 * @since 2.1.2 | |
2542 */ | |
2543 public Point map (Control from, Control to, Point point) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2544 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2545 if (point is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2546 return map (from, to, point.x, point.y); |
27 | 2547 } |
2548 | |
2549 /** | |
2550 * Maps a point from one coordinate system to another. | |
2551 * When the control is null, coordinates are mapped to | |
2552 * the display. | |
2553 * <p> | |
2554 * NOTE: On right-to-left platforms where the coordinate | |
2555 * systems are mirrored, special care needs to be taken | |
2556 * when mapping coordinates from one control to another | |
2557 * to ensure the result is correctly mirrored. | |
2558 * | |
2559 * Mapping a point that is the origin of a rectangle and | |
2560 * then adding the width and height is not equivalent to | |
2561 * mapping the rectangle. When one control is mirrored | |
2562 * and the other is not, adding the width and height to a | |
2563 * point that was mapped causes the rectangle to extend | |
2564 * in the wrong direction. Mapping the entire rectangle | |
2565 * instead of just one point causes both the origin and | |
2566 * the corner of the rectangle to be mapped. | |
2567 * </p> | |
2568 * | |
2569 * @param from the source <code>Control</code> or <code>null</code> | |
2570 * @param to the destination <code>Control</code> or <code>null</code> | |
2571 * @param x coordinates to be mapped | |
2572 * @param y coordinates to be mapped | |
2573 * @return point with mapped coordinates | |
2574 * | |
2575 * @exception IllegalArgumentException <ul> | |
2576 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> | |
2577 * </ul> | |
2578 * @exception SWTException <ul> | |
2579 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
2580 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2581 * </ul> | |
2582 * | |
2583 * @since 2.1.2 | |
2584 */ | |
2585 public Point map (Control from, Control to, int x, int y) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2586 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2587 if (from !is null && from.isDisposed()) error (SWT.ERROR_INVALID_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2588 if (to !is null && to.isDisposed()) error (SWT.ERROR_INVALID_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2589 Point point = new Point (x, y); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2590 if (from is to) return point; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2591 if (from !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2592 auto window = from.eventWindow (); |
27 | 2593 int origin_x, origin_y; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2594 OS.gdk_window_get_origin (window, &origin_x, &origin_y); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2595 point.x += origin_x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2596 point.y += origin_y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2597 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2598 if (to !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2599 auto window = to.eventWindow (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2600 int origin_x, origin_y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2601 OS.gdk_window_get_origin (window, &origin_x, &origin_y); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2602 point.x -= origin_x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2603 point.y -= origin_y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2604 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2605 return point; |
27 | 2606 } |
2607 | |
2608 /** | |
2609 * Maps a point from one coordinate system to another. | |
2610 * When the control is null, coordinates are mapped to | |
2611 * the display. | |
2612 * <p> | |
2613 * NOTE: On right-to-left platforms where the coordinate | |
2614 * systems are mirrored, special care needs to be taken | |
2615 * when mapping coordinates from one control to another | |
2616 * to ensure the result is correctly mirrored. | |
2617 * | |
2618 * Mapping a point that is the origin of a rectangle and | |
2619 * then adding the width and height is not equivalent to | |
2620 * mapping the rectangle. When one control is mirrored | |
2621 * and the other is not, adding the width and height to a | |
2622 * point that was mapped causes the rectangle to extend | |
2623 * in the wrong direction. Mapping the entire rectangle | |
2624 * instead of just one point causes both the origin and | |
2625 * the corner of the rectangle to be mapped. | |
2626 * </p> | |
2627 * | |
2628 * @param from the source <code>Control</code> or <code>null</code> | |
2629 * @param to the destination <code>Control</code> or <code>null</code> | |
2630 * @param rectangle to be mapped | |
2631 * @return rectangle with mapped coordinates | |
2632 * | |
2633 * @exception IllegalArgumentException <ul> | |
2634 * <li>ERROR_NULL_ARGUMENT - if the rectangle is null</li> | |
2635 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> | |
2636 * </ul> | |
2637 * @exception SWTException <ul> | |
2638 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
2639 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2640 * </ul> | |
2641 * | |
2642 * @since 2.1.2 | |
2643 */ | |
2644 public Rectangle map (Control from, Control to, Rectangle rectangle) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2645 checkDevice(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2646 if (rectangle is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2647 return map (from, to, rectangle.x, rectangle.y, rectangle.width, rectangle.height); |
27 | 2648 } |
2649 | |
2650 static wchar mbcsToWcs (wchar ch) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2651 int key = ch & 0xFFFF; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2652 if (key <= 0x7F) return ch; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2653 char [] buffer; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2654 if (key <= 0xFF) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2655 buffer = new char [1]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2656 buffer [0] = cast(char) key; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2657 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2658 buffer = new char [2]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2659 buffer [0] = cast(char) ((key >> 8) & 0xFF); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2660 buffer [1] = cast(char) (key & 0xFF); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2661 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2662 wchar [] result = Converter.mbcsToWcs (null, buffer); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2663 if (result.length 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:
54
diff
changeset
|
2664 return result [0]; |
27 | 2665 } |
2666 | |
48 | 2667 |
2668 package void doMenuPositionProc( GtkMenu* window, bool hasLocation ){ | |
2669 /* | |
2670 * Bug in GTK. The timestamp passed into gtk_menu_popup is used | |
2671 * to perform an X pointer grab. It cannot be zero, else the grab | |
2672 * will fail. The fix is to ensure that the timestamp of the last | |
2673 * event processed is used. | |
2674 */ | |
2675 OS.gtk_menu_popup (window, null, null, | |
2676 hasLocation ? &menuPositionProcFunc : null, | |
2677 cast(void*)this, 0, getLastEventTime() ); | |
2678 } | |
2679 | |
2680 private static extern(C) void menuPositionProcFunc (GtkMenu* menu, int* x, int* y, int* push_in, void* user_data) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2681 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
48 | 2682 auto display = cast(Display)user_data; |
2683 display.menuPositionProc( menu, x, y, push_in, null ); | |
2684 } | |
2685 | |
2686 void menuPositionProc (GtkMenu* menu, int* x, int* y, int* push_in, void* user_data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2687 Widget widget = getWidget (cast(GtkWidget*)menu); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2688 if (widget 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:
54
diff
changeset
|
2689 widget.menuPositionProc (menu, x, y, push_in, user_data); |
18 | 2690 } |
2691 | |
27 | 2692 /** |
2693 * Maps a point from one coordinate system to another. | |
2694 * When the control is null, coordinates are mapped to | |
2695 * the display. | |
2696 * <p> | |
2697 * NOTE: On right-to-left platforms where the coordinate | |
2698 * systems are mirrored, special care needs to be taken | |
2699 * when mapping coordinates from one control to another | |
2700 * to ensure the result is correctly mirrored. | |
2701 * | |
2702 * Mapping a point that is the origin of a rectangle and | |
2703 * then adding the width and height is not equivalent to | |
2704 * mapping the rectangle. When one control is mirrored | |
2705 * and the other is not, adding the width and height to a | |
2706 * point that was mapped causes the rectangle to extend | |
2707 * in the wrong direction. Mapping the entire rectangle | |
2708 * instead of just one point causes both the origin and | |
2709 * the corner of the rectangle to be mapped. | |
2710 * </p> | |
2711 * | |
2712 * @param from the source <code>Control</code> or <code>null</code> | |
2713 * @param to the destination <code>Control</code> or <code>null</code> | |
2714 * @param x coordinates to be mapped | |
2715 * @param y coordinates to be mapped | |
2716 * @param width coordinates to be mapped | |
2717 * @param height coordinates to be mapped | |
2718 * @return rectangle with mapped coordinates | |
2719 * | |
2720 * @exception IllegalArgumentException <ul> | |
2721 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> | |
2722 * </ul> | |
2723 * @exception SWTException <ul> | |
2724 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
2725 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2726 * </ul> | |
2727 * | |
2728 * @since 2.1.2 | |
2729 */ | |
2730 public Rectangle map (Control from, Control to, 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:
54
diff
changeset
|
2731 checkDevice(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2732 if (from !is null && from.isDisposed()) error (SWT.ERROR_INVALID_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2733 if (to !is null && to.isDisposed()) error (SWT.ERROR_INVALID_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2734 Rectangle rect = new Rectangle (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:
54
diff
changeset
|
2735 if (from is to) return rect; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2736 if (from !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2737 auto window = from.eventWindow (); |
27 | 2738 int origin_x, origin_y; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2739 OS.gdk_window_get_origin (window, &origin_x, &origin_y); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2740 rect.x += origin_x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2741 rect.y += origin_y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2742 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2743 if (to !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2744 auto window = to.eventWindow (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2745 int origin_x, origin_y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2746 OS.gdk_window_get_origin (window, &origin_x, &origin_y); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2747 rect.x -= origin_x; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2748 rect.y -= origin_y; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2749 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2750 return rect; |
27 | 2751 } |
2752 | |
30 | 2753 private static extern(C) int /*long*/ mouseHoverProcFunc ( void* user_data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2754 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
30 | 2755 CallbackData* cbdata = cast(CallbackData*)user_data; |
2756 return cbdata.display.mouseHoverProc( cast(GtkWidget*)cbdata.data ); | |
27 | 2757 } |
30 | 2758 int /*long*/ mouseHoverProc (GtkWidget* handle) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2759 Widget widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2760 if (widget 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:
54
diff
changeset
|
2761 return widget.hoverProc (handle); |
27 | 2762 } |
2763 | |
2764 /** | |
2765 * Generate a low level system event. | |
2766 * | |
2767 * <code>post</code> is used to generate low level keyboard | |
2768 * and mouse events. The intent is to enable automated UI | |
2769 * testing by simulating the input from the user. Most | |
2770 * SWT applications should never need to call this method. | |
2771 * <p> | |
2772 * Note that this operation can fail when the operating system | |
2773 * fails to generate the event for any reason. For example, | |
2774 * this can happen when there is no such key or mouse button | |
2775 * or when the system event queue is full. | |
2776 * </p> | |
2777 * <p> | |
2778 * <b>Event Types:</b> | |
2779 * <p>KeyDown, KeyUp | |
2780 * <p>The following fields in the <code>Event</code> apply: | |
2781 * <ul> | |
2782 * <li>(in) type KeyDown or KeyUp</li> | |
2783 * <p> Either one of: | |
2784 * <li>(in) character a character that corresponds to a keyboard key</li> | |
2785 * <li>(in) keyCode the key code of the key that was typed, | |
2786 * as defined by the key code constants in class <code>SWT</code></li> | |
2787 * </ul> | |
2788 * <p>MouseDown, MouseUp</p> | |
2789 * <p>The following fields in the <code>Event</code> apply: | |
2790 * <ul> | |
2791 * <li>(in) type MouseDown or MouseUp | |
2792 * <li>(in) button the button that is pressed or released | |
2793 * </ul> | |
2794 * <p>MouseMove</p> | |
2795 * <p>The following fields in the <code>Event</code> apply: | |
2796 * <ul> | |
2797 * <li>(in) type MouseMove | |
2798 * <li>(in) x the x coordinate to move the mouse pointer to in screen coordinates | |
2799 * <li>(in) y the y coordinate to move the mouse pointer to in screen coordinates | |
2800 * </ul> | |
2801 * </dl> | |
2802 * | |
2803 * @param event the event to be generated | |
2804 * | |
2805 * @return true if the event was generated or false otherwise | |
2806 * | |
2807 * @exception IllegalArgumentException <ul> | |
2808 * <li>ERROR_NULL_ARGUMENT - if the event is null</li> | |
2809 * </ul> | |
2810 * @exception SWTException <ul> | |
2811 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2812 * </ul> | |
2813 * | |
2814 * @since 3.0 | |
2815 * | |
2816 */ | |
2817 public bool post (Event event) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2818 if (isDisposed ()) error (SWT.ERROR_DEVICE_DISPOSED); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2819 if (event is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2820 if (!OS.GDK_WINDOWING_X11()) return false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2821 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:
54
diff
changeset
|
2822 int type = event.type; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2823 switch (type) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2824 case SWT.KeyDown: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2825 case SWT.KeyUp: { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2826 int keyCode = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2827 auto keysym = untranslateKey (event.keyCode); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2828 if (keysym !is 0) keyCode = OS.XKeysymToKeycode (xDisplay, keysym); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2829 if (keyCode is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2830 char key = event.character; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2831 switch (key) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2832 case SWT.BS: keysym = OS.GDK_BackSpace; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2833 case SWT.CR: keysym = OS.GDK_Return; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2834 case SWT.DEL: keysym = OS.GDK_Delete; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2835 case SWT.ESC: keysym = OS.GDK_Escape; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2836 case SWT.TAB: keysym = OS.GDK_Tab; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2837 case SWT.LF: keysym = OS.GDK_Linefeed; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2838 default: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2839 keysym = wcsToMbcs (key); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2840 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2841 keyCode = OS.XKeysymToKeycode (xDisplay, keysym); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2842 if (keyCode is 0) return false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2843 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2844 OS.XTestFakeKeyEvent (xDisplay, keyCode, type is SWT.KeyDown, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2845 return true; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2846 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2847 case SWT.MouseDown: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2848 case SWT.MouseMove: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2849 case SWT.MouseUp: { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2850 if (type is SWT.MouseMove) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2851 OS.XTestFakeMotionEvent (xDisplay, -1, event.x, event.y, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2852 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2853 int button = event.button; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2854 switch (button) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2855 case 1: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2856 case 2: |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2857 case 3: break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2858 case 4: button = 6; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2859 case 5: button = 7; break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2860 default: return false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2861 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2862 OS.XTestFakeButtonEvent (xDisplay, button, type is SWT.MouseDown, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2863 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2864 return true; |
54 | 2865 default: |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2866 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2867 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2868 * This code is intentionally commented. After posting a |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2869 * mouse wheel event the system may respond unpredictably |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2870 * to subsequent mouse actions. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2871 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2872 // case SWT.MouseWheel: { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2873 // if (event.count is 0) return false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2874 // int button = event.count < 0 ? 5 : 4; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2875 // OS.XTestFakeButtonEvent (xDisplay, button, type is SWT.MouseWheel, 0); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2876 // } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2877 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2878 return false; |
27 | 2879 } |
2880 | |
2881 void postEvent (Event event) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2882 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2883 * Place the event at the end of the event queue. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2884 * This code is always called in the Display's |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2885 * thread so it must be re-enterant but does not |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2886 * need to be synchronized. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2887 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2888 if (eventQueue is null) eventQueue = new Event [4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2889 int index = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2890 int length = eventQueue.length; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2891 while (index < length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2892 if (eventQueue [index] is null) break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2893 index++; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2894 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2895 if (index is length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2896 Event [] newQueue = new Event [length + 4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2897 System.arraycopy (eventQueue, 0, newQueue, 0, length); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2898 eventQueue = newQueue; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2899 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2900 eventQueue [index] = event; |
27 | 2901 } |
2902 | |
2903 void putGdkEvents () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2904 if (gdkEventCount !is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2905 for (int i = 0; i < gdkEventCount; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2906 auto event = gdkEvents [i]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2907 Widget widget = gdkEventWidgets [i]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2908 if (widget is null || !widget.isDisposed ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2909 OS.gdk_event_put (event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2910 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2911 OS.gdk_event_free (event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2912 gdkEvents [i] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2913 gdkEventWidgets [i] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2914 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2915 gdkEventCount = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2916 } |
27 | 2917 } |
2918 | |
2919 /** | |
2920 * Reads an event from the operating system's event queue, | |
2921 * dispatches it appropriately, and returns <code>true</code> | |
2922 * if there is potentially more work to do, or <code>false</code> | |
2923 * if the caller can sleep until another event is placed on | |
2924 * the event queue. | |
2925 * <p> | |
2926 * In addition to checking the system event queue, this method also | |
2927 * checks if any inter-thread messages (created by <code>syncExec()</code> | |
2928 * or <code>asyncExec()</code>) are waiting to be processed, and if | |
2929 * so handles them before returning. | |
2930 * </p> | |
2931 * | |
2932 * @return <code>false</code> if the caller can sleep upon return from this method | |
2933 * | |
2934 * @exception SWTException <ul> | |
2935 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
2936 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2937 * <li>ERROR_FAILED_EXEC - if an exception occurred while running an inter-thread message</li> | |
2938 * </ul> | |
2939 * | |
2940 * @see #sleep | |
2941 * @see #wake | |
2942 */ | |
2943 public bool readAndDispatch () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2944 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2945 bool events = false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2946 events |= runSettings (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2947 events |= runPopups (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2948 events |= cast(bool)OS.g_main_context_iteration (null, false); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2949 if (events) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2950 runDeferredEvents (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2951 return true; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2952 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2953 return runAsyncMessages (false); |
27 | 2954 } |
2955 | |
18 | 2956 synchronized void register () { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2957 for (int i=0; i<Displays.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2958 if (Displays [i] is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2959 Displays [i] = this; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2960 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2961 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2962 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2963 Display [] newDisplays = new Display [Displays.length + 4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2964 System.arraycopy (Displays, 0, newDisplays, 0, Displays.length); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2965 newDisplays [Displays.length] = this; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2966 Displays = newDisplays; |
18 | 2967 } |
2968 | |
27 | 2969 /** |
2970 * Releases any internal resources back to the operating | |
2971 * system and clears all fields except the device handle. | |
2972 * <p> | |
2973 * Disposes all shells which are currently open on the display. | |
2974 * After this method has been invoked, all related related shells | |
2975 * will answer <code>true</code> when sent the message | |
2976 * <code>isDisposed()</code>. | |
2977 * </p><p> | |
2978 * When a device is destroyed, resources that were acquired | |
2979 * on behalf of the programmer need to be returned to the | |
2980 * operating system. For example, if the device allocated a | |
2981 * font to be used as the system font, this font would be | |
2982 * freed in <code>release</code>. Also,to assist the garbage | |
2983 * collector and minimize the amount of memory that is not | |
2984 * reclaimed when the programmer keeps a reference to a | |
2985 * disposed device, all fields except the handle are zero'd. | |
2986 * The handle is needed by <code>destroy</code>. | |
2987 * </p> | |
2988 * This method is called before <code>destroy</code>. | |
2989 * | |
2990 * @see Device#dispose | |
2991 * @see #destroy | |
2992 */ | |
2993 protected void release () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2994 sendEvent (SWT.Dispose, new Event ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2995 Shell [] shells = getShells (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2996 for (int i=0; i<shells.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2997 Shell shell = shells [i]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2998 if (!shell.isDisposed ()) shell.dispose (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2999 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3000 if (tray !is null) tray.dispose (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3001 tray = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3002 while (readAndDispatch ()) {} |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3003 if (disposeList !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3004 for (int i=0; i<disposeList.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3005 if (disposeList [i] !is null) disposeList [i].run (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3006 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3007 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3008 disposeList = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3009 synchronizer.releaseSynchronizer (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3010 synchronizer = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3011 releaseDisplay (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3012 super.release (); |
27 | 3013 } |
3014 | |
3015 void releaseDisplay () { | |
3016 | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3017 /* Dispose xfilter callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3018 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3019 /* Dispose checkIfEvent callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3020 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3021 /* Dispose preedit window */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3022 if (preeditWindow !is null) OS.gtk_widget_destroy ( &preeditWindow.bin.container.widget); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3023 imControl = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3024 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3025 /* Dispose the menu callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3026 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3027 /* Dispose the tooltip map callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3028 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3029 /* Dispose the shell map callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3030 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3031 /* Dispose the run async messages callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3032 if (idleHandle !is 0) OS.g_source_remove (idleHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3033 idleHandle = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3034 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3035 /* Dispose GtkTreeView callbacks */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3036 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3037 /* Dispose the set direction callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3038 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3039 /* Dispose the set direction callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3040 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3041 /* Dispose the caret callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3042 if (caretId !is 0) OS.gtk_timeout_remove (caretId); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3043 caretId = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3044 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3045 /* Release closures */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3046 for (int i = 0; i < Widget.LAST_SIGNAL; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3047 if (closures [i] !is null) OS.g_closure_unref (closures [i]); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3048 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3049 if (shellMapProcClosure !is null) OS.g_closure_unref (shellMapProcClosure); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3050 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3051 /* Dispose the timer callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3052 if (timerIds !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3053 for (int i=0; i<timerIds.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3054 if (timerIds [i] !is 0) OS.gtk_timeout_remove (timerIds [i]); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3055 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3056 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3057 timerIds = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3058 timerList = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3059 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3060 /* Dispose mouse hover callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3061 if (mouseHoverId !is 0) OS.gtk_timeout_remove (mouseHoverId); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3062 mouseHoverId = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3063 mouseHoverHandle = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3064 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3065 /* Dispose the default font */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3066 if (systemFont !is null) systemFont.dispose (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3067 systemFont = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3068 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3069 /* Dispose the System Images */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3070 if (errorImage !is null) errorImage.dispose(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3071 if (infoImage !is null) infoImage.dispose(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3072 if (questionImage !is null) questionImage.dispose(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3073 if (warningImage !is null) warningImage.dispose(); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3074 errorImage = infoImage = questionImage = warningImage = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3075 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3076 /* Release the System Cursors */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3077 for (int i = 0; i < cursors.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3078 if (cursors [i] !is null) cursors [i].dispose (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3079 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3080 cursors = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3081 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3082 /* Release Acquired Resources */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3083 if (resources !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3084 for (int i=0; i<resources.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3085 if (resources [i] !is null) resources [i].dispose (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3086 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3087 resources = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3088 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3089 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3090 /* Release the System Colors */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3091 COLOR_WIDGET_DARK_SHADOW = COLOR_WIDGET_NORMAL_SHADOW = COLOR_WIDGET_LIGHT_SHADOW = |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3092 COLOR_WIDGET_HIGHLIGHT_SHADOW = COLOR_WIDGET_BACKGROUND = COLOR_WIDGET_BORDER = |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3093 COLOR_LIST_FOREGROUND = COLOR_LIST_BACKGROUND = COLOR_LIST_SELECTION = COLOR_LIST_SELECTION_TEXT = |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3094 COLOR_INFO_BACKGROUND = COLOR_INFO_FOREGROUND = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3095 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3096 /* Dispose the event callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3097 OS.gdk_event_handler_set (null, null, null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3098 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3099 /* Dispose the hidden shell */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3100 if (shellHandle !is null) OS.gtk_widget_destroy (shellHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3101 shellHandle = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3102 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3103 /* Dispose the settings callback */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3104 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3105 /* Release the sleep resources */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3106 max_priority = 0; |
27 | 3107 timeout = 0; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3108 if (fds !is null) OS.g_free (fds.ptr); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3109 fds = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3110 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3111 /* Release references */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3112 popups = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3113 thread = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3114 activeShell = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3115 lastWidget = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3116 indexTable = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3117 widgetTable = null; |
27 | 3118 } |
3119 | |
3120 /** | |
3121 * Removes the listener from the collection of listeners who will | |
3122 * be notified when an event of the given type occurs anywhere in | |
3123 * a widget. The event type is one of the event constants defined | |
3124 * in class <code>SWT</code>. | |
3125 * | |
3126 * @param eventType the type of event to listen for | |
3127 * @param listener the listener which should no longer be notified when the event occurs | |
3128 * | |
3129 * @exception IllegalArgumentException <ul> | |
3130 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li> | |
3131 * </ul> | |
3132 * @exception SWTException <ul> | |
3133 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3134 * </ul> | |
3135 * | |
3136 * @see Listener | |
3137 * @see SWT | |
3138 * @see #addFilter | |
3139 * @see #addListener | |
3140 * | |
3141 * @since 3.0 | |
3142 */ | |
3143 public void removeFilter (int eventType, Listener listener) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3144 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3145 if (listener is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3146 if (filterTable is null) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3147 filterTable.unhook (eventType, listener); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3148 if (filterTable.size () is 0) filterTable = null; |
27 | 3149 } |
3150 | |
3151 GdkEvent* removeGdkEvent () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3152 if (gdkEventCount is 0) return null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3153 auto event = gdkEvents [0]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3154 --gdkEventCount; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3155 SimpleType!(GdkEvent*).arraycopy (gdkEvents, 1, gdkEvents, 0, gdkEventCount); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3156 System.arraycopy (gdkEventWidgets, 1, gdkEventWidgets, 0, gdkEventCount); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3157 gdkEvents [gdkEventCount] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3158 gdkEventWidgets [gdkEventCount] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3159 if (gdkEventCount is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3160 gdkEvents = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3161 gdkEventWidgets = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3162 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3163 return event; |
27 | 3164 } |
3165 | |
3166 void removeIdleProc () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3167 synchronized(idleLock) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3168 if (idleHandle !is 0) OS.g_source_remove (idleHandle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3169 idleNeeded = false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3170 idleHandle = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3171 } |
27 | 3172 } |
3173 /** | |
3174 * Removes the listener from the collection of listeners who will | |
3175 * be notified when an event of the given type occurs. The event type | |
3176 * is one of the event constants defined in class <code>SWT</code>. | |
3177 * | |
3178 * @param eventType the type of event to listen for | |
3179 * @param listener the listener which should no longer be notified when the event occurs | |
3180 * | |
3181 * @exception IllegalArgumentException <ul> | |
3182 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li> | |
3183 * </ul> | |
3184 * @exception SWTException <ul> | |
3185 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3186 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3187 * </ul> | |
3188 * | |
3189 * @see Listener | |
3190 * @see SWT | |
3191 * @see #addListener | |
3192 * | |
3193 * @since 2.0 | |
3194 */ | |
3195 public void removeListener (int eventType, Listener listener) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3196 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3197 if (listener is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3198 if (eventTable is null) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3199 eventTable.unhook (eventType, listener); |
27 | 3200 } |
3201 | |
3202 void removeMouseHoverTimeout (void* handle) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3203 if (handle !is mouseHoverHandle) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3204 if (mouseHoverId !is 0) OS.gtk_timeout_remove (mouseHoverId); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3205 mouseHoverId = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3206 mouseHoverHandle = null; |
27 | 3207 } |
3208 | |
3209 void removePopup (Menu menu) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3210 if (popups is null) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3211 for (int i=0; i<popups.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3212 if (popups [i] is menu) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3213 popups [i] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3214 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3215 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3216 } |
27 | 3217 } |
3218 | |
3219 Widget removeWidget (GtkWidget* handle) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3220 if (handle 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:
54
diff
changeset
|
3221 lastWidget = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3222 Widget widget = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3223 int index = cast(int)/*64*/ OS.g_object_get_qdata (cast(GObject*)handle, SWT_OBJECT_INDEX) - 1; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3224 if (0 <= index && index < widgetTable.length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3225 widget = widgetTable [index]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3226 widgetTable [index] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3227 indexTable [index] = freeSlot; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3228 freeSlot = index; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3229 OS.g_object_set_qdata (cast(GObject*)handle, SWT_OBJECT_INDEX, null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3230 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3231 return widget; |
27 | 3232 } |
3233 | |
3234 bool runAsyncMessages (bool all) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3235 return synchronizer.runAsyncMessages (all); |
27 | 3236 } |
3237 | |
3238 bool runDeferredEvents () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3239 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3240 * Run deferred events. This code is always |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3241 * called in the Display's thread so it must |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3242 * be re-enterant but need not be synchronized. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3243 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3244 while (eventQueue !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3245 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3246 /* Take an event off the queue */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3247 Event event = eventQueue [0]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3248 if (event is null) break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3249 int len = eventQueue.length; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3250 System.arraycopy (eventQueue, 1, eventQueue, 0, --len); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3251 eventQueue [len] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3252 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3253 /* Run the event */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3254 Widget widget = event.widget; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3255 if (widget !is null && !widget.isDisposed ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3256 Widget item = event.item; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3257 if (item is null || !item.isDisposed ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3258 widget.sendEvent (event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3259 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3260 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3261 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3262 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3263 * At this point, the event queue could |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3264 * be null due to a recursive invokation |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3265 * when running the event. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3266 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3267 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3268 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3269 /* Clear the queue */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3270 eventQueue = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3271 return true; |
27 | 3272 } |
3273 | |
3274 bool runPopups () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3275 if (popups 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:
54
diff
changeset
|
3276 bool result = false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3277 while (popups !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3278 Menu menu = popups [0]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3279 if (menu is null) break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3280 int len = popups.length; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3281 System.arraycopy (popups, 1, popups, 0, --len); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3282 popups [len] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3283 runDeferredEvents (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3284 if (!menu.isDisposed ()) menu._setVisible (true); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3285 result = true; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3286 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3287 popups = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3288 return result; |
27 | 3289 } |
3290 | |
3291 bool runSettings () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3292 if (!runSettingsFld) return false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3293 runSettingsFld = false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3294 saveResources (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3295 initializeSystemColors (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3296 sendEvent (SWT.Settings, null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3297 Shell [] shells = getShells (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3298 for (int i=0; i<shells.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3299 Shell shell = shells [i]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3300 if (!shell.isDisposed ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3301 shell.fixStyle (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3302 shell.redraw (true); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3303 shell.layout (true, true); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3304 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3305 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3306 return true; |
27 | 3307 } |
3308 | |
3309 /** | |
3310 * On platforms which support it, sets the application name | |
3311 * to be the argument. On Motif, for example, this can be used | |
3312 * to set the name used for resource lookup. Specifying | |
3313 * <code>null</code> for the name clears it. | |
3314 * | |
3315 * @param name the new app name or <code>null</code> | |
3316 */ | |
3317 public static void setAppName (char[] name) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3318 APP_NAME = name; |
27 | 3319 } |
3320 | |
3321 /** | |
3322 * Sets the location of the on-screen pointer relative to the top left corner | |
3323 * of the screen. <b>Note: It is typically considered bad practice for a | |
3324 * program to move the on-screen pointer location.</b> | |
3325 * | |
3326 * @param x the new x coordinate for the cursor | |
3327 * @param y the new y coordinate for the cursor | |
3328 * | |
3329 * @exception SWTException <ul> | |
3330 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3331 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3332 * </ul> | |
3333 * | |
3334 * @since 2.1 | |
3335 */ | |
3336 public void setCursorLocation (int x, int y) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3337 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3338 if (OS.GDK_WINDOWING_X11 ()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3339 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:
54
diff
changeset
|
3340 auto xWindow = OS.XDefaultRootWindow (xDisplay); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3341 OS.XWarpPointer (xDisplay, OS.None, xWindow, 0, 0, 0, 0, x, y); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3342 } |
27 | 3343 } |
3344 | |
3345 /** | |
3346 * Sets the location of the on-screen pointer relative to the top left corner | |
3347 * of the screen. <b>Note: It is typically considered bad practice for a | |
3348 * program to move the on-screen pointer location.</b> | |
3349 * | |
3350 * @param point new position | |
3351 * | |
3352 * @exception SWTException <ul> | |
3353 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3354 * <li>ERROR_NULL_ARGUMENT - if the point is null | |
3355 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3356 * </ul> | |
3357 * | |
3358 * @since 2.0 | |
3359 */ | |
3360 public void setCursorLocation (Point point) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3361 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3362 if (point is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3363 setCursorLocation (point.x, point.y); |
27 | 3364 } |
3365 | |
3366 /** | |
3367 * Sets the application defined property of the receiver | |
3368 * with the specified name to the given argument. | |
3369 * <p> | |
3370 * Applications may have associated arbitrary objects with the | |
3371 * receiver in this fashion. If the objects stored in the | |
3372 * properties need to be notified when the display is disposed | |
3373 * of, it is the application's responsibility provide a | |
3374 * <code>disposeExec()</code> handler which does so. | |
3375 * </p> | |
3376 * | |
3377 * @param key the name of the property | |
3378 * @param value the new value for the property | |
3379 * | |
3380 * @exception IllegalArgumentException <ul> | |
3381 * <li>ERROR_NULL_ARGUMENT - if the key is null</li> | |
3382 * </ul> | |
3383 * @exception SWTException <ul> | |
3384 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3385 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3386 * </ul> | |
3387 * | |
3388 * @see #getData(String) | |
3389 * @see #disposeExec(Runnable) | |
3390 */ | |
3391 public void setData (char[] key, Object value) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3392 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3393 if (key is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3394 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3395 if (key==/*eq*/ DISPATCH_EVENT_KEY) { |
27 | 3396 ArrayWrapperInt wrappedValue; |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3397 if (value is null || (null !is (wrappedValue=cast(ArrayWrapperInt)value))) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3398 dispatchEvents = wrappedValue.array; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3399 if (value is null) putGdkEvents (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3400 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3401 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3402 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3403 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3404 if (key==/*eq*/ ADD_WIDGET_KEY) { |
27 | 3405 auto wrap = cast(ArrayWrapperObject) value; |
3406 if( wrap is null ) SWT.error(SWT.ERROR_INVALID_ARGUMENT, null, " []"); | |
3407 Object [] data = wrap.array; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3408 auto handle = (cast(LONG) data [0]).value; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3409 Widget widget = cast(Widget) data [1]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3410 if (widget !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3411 addWidget (cast(GtkWidget*)handle, widget); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3412 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3413 removeWidget (cast(GtkWidget*)handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3414 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3415 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3416 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3417 if (key==/*eq*/ ADD_IDLE_PROC_KEY) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3418 addIdleProc (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3419 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3420 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3421 if (key==/*eq*/ REMOVE_IDLE_PROC_KEY) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3422 removeIdleProc (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3423 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3424 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3425 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3426 /* Remove the key/value pair */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3427 if (value is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3428 if (keys is null) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3429 int index = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3430 while (index < keys.length && keys [index]!=/*!eq*/ key) index++; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3431 if (index is keys.length) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3432 if (keys.length is 1) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3433 keys = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3434 values = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3435 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3436 char[] [] newKeys = new char[] [keys.length - 1]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3437 Object [] newValues = new Object [values.length - 1]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3438 System.arraycopy (keys, 0, newKeys, 0, index); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3439 System.arraycopy (keys, index + 1, newKeys, index, newKeys.length - index); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3440 System.arraycopy (values, 0, newValues, 0, index); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3441 System.arraycopy (values, index + 1, newValues, index, newValues.length - index); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3442 keys = newKeys; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3443 values = newValues; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3444 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3445 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3446 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3447 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3448 /* Add the key/value pair */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3449 if (keys is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3450 keys = [key]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3451 values = [value]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3452 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3453 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3454 for (int i=0; i<keys.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3455 if (keys [i]==/*eq*/ key) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3456 values [i] = value; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3457 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3458 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3459 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3460 char[] [] newKeys = new char[] [keys.length + 1]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3461 Object [] newValues = new Object [values.length + 1]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3462 System.arraycopy (keys, 0, newKeys, 0, keys.length); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3463 System.arraycopy (values, 0, newValues, 0, values.length); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3464 newKeys [keys.length] = key; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3465 newValues [values.length] = value; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3466 keys = newKeys; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3467 values = newValues; |
27 | 3468 } |
3469 | |
3470 /** | |
3471 * Sets the application defined, display specific data | |
3472 * associated with the receiver, to the argument. | |
3473 * The <em>display specific data</em> is a single, | |
3474 * unnamed field that is stored with every display. | |
3475 * <p> | |
3476 * Applications may put arbitrary objects in this field. If | |
3477 * the object stored in the display specific data needs to | |
3478 * be notified when the display is disposed of, it is the | |
3479 * application's responsibility provide a | |
3480 * <code>disposeExec()</code> handler which does so. | |
3481 * </p> | |
3482 * | |
3483 * @param data the new display specific data | |
3484 * | |
3485 * @exception SWTException <ul> | |
3486 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3487 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3488 * </ul> | |
3489 * | |
3490 * @see #getData() | |
3491 * @see #disposeExec(Runnable) | |
3492 */ | |
3493 public void setData (Object data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3494 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3495 this.data = data; |
27 | 3496 } |
3497 | |
3498 private static extern(C) int /*long*/ setDirectionProcFunc (GtkWidget* widget, void* direction) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3499 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 3500 return setDirectionProc( widget, cast(int)direction ); |
3501 } | |
3502 static int /*long*/ setDirectionProc (GtkWidget* widget, int /*long*/ direction) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3503 OS.gtk_widget_set_direction (widget, direction); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3504 if (OS.GTK_IS_CONTAINER (cast(GTypeInstance*)widget)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3505 OS.gtk_container_forall (cast(GtkContainer*)widget, cast(GtkCallback)&setDirectionProcFunc, cast(void*)direction); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3506 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3507 return 0; |
27 | 3508 } |
3509 | |
3510 /** | |
3511 * Sets the synchronizer used by the display to be | |
3512 * the argument, which can not be null. | |
3513 * | |
3514 * @param synchronizer the new synchronizer for the display (must not be null) | |
3515 * | |
3516 * @exception IllegalArgumentException <ul> | |
3517 * <li>ERROR_NULL_ARGUMENT - if the synchronizer is null</li> | |
3518 * </ul> | |
3519 * @exception SWTException <ul> | |
3520 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3521 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3522 * <li>ERROR_FAILED_EXEC - if an exception occurred while running an inter-thread message</li> | |
3523 * </ul> | |
3524 */ | |
3525 public void setSynchronizer (Synchronizer synchronizer) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3526 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3527 if (synchronizer is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3528 if (this.synchronizer !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3529 this.synchronizer.runAsyncMessages(true); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3530 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3531 this.synchronizer = synchronizer; |
27 | 3532 } |
3533 | |
3534 void showIMWindow (Control control) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3535 imControl = control; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3536 if (preeditWindow is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3537 preeditWindow = cast(GtkWindow*)OS.gtk_window_new (OS.GTK_WINDOW_POPUP); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3538 if (preeditWindow is null) error (SWT.ERROR_NO_HANDLES); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3539 preeditLabel = cast(GtkLabel*) OS.gtk_label_new (null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3540 if (preeditLabel is null) error (SWT.ERROR_NO_HANDLES); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3541 OS.gtk_container_add (cast(GtkContainer*)preeditWindow, cast(GtkWidget*) preeditLabel); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3542 OS.gtk_widget_show (cast(GtkWidget*)preeditLabel); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3543 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3544 char* preeditString; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3545 PangoAttrList* pangoAttrs; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3546 auto imHandle = control.imHandle (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3547 OS.gtk_im_context_get_preedit_string (imHandle, &preeditString, &pangoAttrs, null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3548 if (preeditString !is null && strlen (preeditString) > 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3549 Control widget = control.findBackgroundControl (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3550 if (widget is null) widget = control; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3551 OS.gtk_widget_modify_bg (cast(GtkWidget*)preeditWindow, OS.GTK_STATE_NORMAL, widget.getBackgroundColor ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3552 widget.setForegroundColor (cast(GtkWidget*)preeditLabel, control.getForegroundColor()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3553 OS.gtk_widget_modify_font (cast(GtkWidget*)preeditLabel, control.getFontDescription ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3554 if (pangoAttrs !is null) OS.gtk_label_set_attributes (preeditLabel, pangoAttrs); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3555 OS.gtk_label_set_text (preeditLabel, preeditString); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3556 Point point = control.toDisplay (control.getIMCaretPos ()); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3557 OS.gtk_window_move (preeditWindow, point.x, point.y); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3558 GtkRequisition* requisition = new GtkRequisition (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3559 OS.gtk_widget_size_request (cast(GtkWidget*)preeditLabel, requisition); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3560 OS.gtk_window_resize (preeditWindow, requisition.width, requisition.height); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3561 OS.gtk_widget_show (cast(GtkWidget*)preeditWindow); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3562 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3563 OS.gtk_widget_hide (cast(GtkWidget*)preeditWindow); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3564 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3565 if (preeditString !is null) OS.g_free (preeditString); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3566 if (pangoAttrs !is null) OS.pango_attr_list_unref (pangoAttrs); |
27 | 3567 } |
3568 | |
3569 /** | |
3570 * Causes the user-interface thread to <em>sleep</em> (that is, | |
3571 * to be put in a state where it does not consume CPU cycles) | |
3572 * until an event is received or it is otherwise awakened. | |
3573 * | |
3574 * @return <code>true</code> if an event requiring dispatching was placed on the queue. | |
3575 * | |
3576 * @exception SWTException <ul> | |
3577 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3578 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3579 * </ul> | |
3580 * | |
3581 * @see #wake | |
3582 */ | |
3583 public bool sleep () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3584 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3585 if (gdkEventCount is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3586 gdkEvents = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3587 gdkEventWidgets = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3588 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3589 if (settingsChanged) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3590 settingsChanged = false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3591 runSettingsFld = true; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3592 return false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3593 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3594 if (getMessageCount () !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:
54
diff
changeset
|
3595 if (fds is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3596 allocated_nfds = 2; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3597 fds = new GPollFD[ allocated_nfds ]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3598 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3599 max_priority = timeout = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3600 auto context = OS.g_main_context_default (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3601 bool result = false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3602 do { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3603 if (OS.g_main_context_acquire (context)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3604 result = cast(bool)OS.g_main_context_prepare (context, &max_priority); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3605 int nfds; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3606 while ((nfds = OS.g_main_context_query (context, max_priority, &timeout, fds.ptr, allocated_nfds)) > allocated_nfds) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3607 OS.g_free (fds.ptr); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3608 allocated_nfds = nfds; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3609 fds = new GPollFD[allocated_nfds]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3610 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3611 GPollFunc poll = OS.g_main_context_get_poll_func (context); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3612 if (poll !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3613 if (nfds > 0 || timeout !is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3614 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3615 * Bug in GTK. For some reason, g_main_context_wakeup() may |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3616 * fail to wake up the UI thread from the polling function. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3617 * The fix is to sleep for a maximum of 50 milliseconds. |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3618 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3619 if (timeout < 0) timeout = 50; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3620 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3621 /* Exit the OS lock to allow other threads to enter GTK */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3622 Lock lock = OS.lock; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3623 int count = lock.lock (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3624 for (int i = 0; i < count; i++) lock.unlock (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3625 try { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3626 wake_state = false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3627 poll( fds.ptr, nfds, timeout); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3628 } finally { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3629 for (int i = 0; i < count; i++) lock.lock (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3630 lock.unlock (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3631 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3632 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3633 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3634 OS.g_main_context_check (context, max_priority, fds.ptr, nfds); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3635 OS.g_main_context_release (context); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3636 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3637 } while (!result && getMessageCount () is 0 && !wake_state); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3638 wake_state = false; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3639 return true; |
27 | 3640 } |
3641 | |
3642 /** | |
3643 * Causes the <code>run()</code> method of the runnable to | |
3644 * be invoked by the user-interface thread after the specified | |
3645 * number of milliseconds have elapsed. If milliseconds is less | |
3646 * than zero, the runnable is not executed. | |
3647 * <p> | |
3648 * Note that at the time the runnable is invoked, widgets | |
3649 * that have the receiver as their display may have been | |
3650 * disposed. Therefore, it is necessary to check for this | |
3651 * case inside the runnable before accessing the widget. | |
3652 * </p> | |
3653 * | |
3654 * @param milliseconds the delay before running the runnable | |
3655 * @param runnable code to run on the user-interface thread | |
3656 * | |
3657 * @exception IllegalArgumentException <ul> | |
3658 * <li>ERROR_NULL_ARGUMENT - if the runnable is null</li> | |
3659 * </ul> | |
3660 * @exception SWTException <ul> | |
3661 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3662 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3663 * </ul> | |
3664 * | |
3665 * @see #asyncExec | |
3666 */ | |
3667 public void timerExec (int milliseconds, Runnable runnable) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3668 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3669 if (runnable is null) error (SWT.ERROR_NULL_ARGUMENT); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3670 if (timerList is null) timerList = new Runnable [4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3671 if (timerIds is null) timerIds = new int [4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3672 int index = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3673 while (index < timerList.length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3674 if (timerList [index] is runnable) break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3675 index++; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3676 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3677 if (index !is timerList.length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3678 OS.gtk_timeout_remove (timerIds [index]); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3679 timerList [index] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3680 timerIds [index] = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3681 if (milliseconds < 0) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3682 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3683 if (milliseconds < 0) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3684 index = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3685 while (index < timerList.length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3686 if (timerList [index] is null) break; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3687 index++; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3688 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3689 if (index is timerList.length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3690 Runnable [] newTimerList = new Runnable [timerList.length + 4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3691 SimpleType!(Runnable).arraycopy (timerList, 0, newTimerList, 0, timerList.length); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3692 timerList = newTimerList; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3693 int [] newTimerIds = new int [timerIds.length + 4]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3694 System.arraycopy (timerIds, 0, newTimerIds, 0, timerIds.length); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3695 timerIds = newTimerIds; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3696 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3697 } |
27 | 3698 timerProcCallbackData.display = this; |
3699 timerProcCallbackData.data = cast(void*)index; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3700 int timerId = OS.gtk_timeout_add (milliseconds, &timerProcFunc, &timerProcCallbackData); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3701 if (timerId !is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3702 timerIds [index] = timerId; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3703 timerList [index] = runnable; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3704 } |
27 | 3705 } |
3706 | |
47
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
3707 |
27 | 3708 private static extern(C) int timerProcFunc ( void * data ) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3709 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 3710 CallbackData* cbdata = cast( CallbackData* ) data; |
3711 return cbdata.display.timerProc( cast(int) cbdata.data ); | |
3712 } | |
3713 | |
3714 int /*long*/ timerProc (int /*long*/ i) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3715 if (timerList 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:
54
diff
changeset
|
3716 int index = cast(int)/*64*/i; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3717 if (0 <= index && index < timerList.length) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3718 Runnable runnable = timerList [index]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3719 timerList [index] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3720 timerIds [index] = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3721 if (runnable !is null) runnable.run (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3722 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3723 return 0; |
27 | 3724 } |
3725 | |
3726 private static extern(C) int caretProcFunc ( void * data ) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3727 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 3728 CallbackData* cbdata = cast( CallbackData* ) data; |
3729 return cbdata.display.caretProc( cast(int) cbdata.data ); | |
3730 } | |
3731 int /*long*/ caretProc (int /*long*/ clientData) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3732 caretId = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3733 if (currentCaret is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3734 return 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3735 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3736 if (currentCaret.blinkCaret()) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3737 int blinkRate = currentCaret.blinkRate; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3738 if (blinkRate is 0) return 0; |
27 | 3739 caretProcCallbackData.display = this; |
3740 caretProcCallbackData.data = cast(void*)0; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3741 caretId = OS.gtk_timeout_add (blinkRate, &caretProcFunc, &caretProcCallbackData); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3742 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3743 currentCaret = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3744 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3745 return 0; |
27 | 3746 } |
3747 | |
54 | 3748 |
3749 package int doSizeAllocateConnect( CallbackData* cbdata, GtkWidget* window, GtkWidget* widget ){ | |
3750 cbdata.display = this; | |
3751 cbdata.data = cast(void*)widget; | |
3752 return OS.g_signal_connect (cast(void*)window, OS.size_allocate.ptr, cast(GCallback)&sizeAllocateProcFunc, cast(void*)&cbdata); | |
3753 } | |
3754 | |
3755 private static extern(C) void sizeAllocateProcFunc (GtkWidget* handle, int /*long*/ arg0, int /*long*/ user_data) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3756 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
54 | 3757 auto cbdata = cast(CallbackData*)user_data; |
3758 cbdata.display.sizeAllocateProc( cast(GtkWidget*)handle, arg0, cast(int)cbdata.data ); | |
3759 } | |
3760 | |
3761 void sizeAllocateProc (GtkWidget* handle, int /*long*/ arg0, int /*long*/ user_data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3762 Widget widget = getWidget ( cast(GtkWidget*)user_data); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3763 if (widget 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:
54
diff
changeset
|
3764 widget.sizeAllocateProc (handle, arg0, user_data); |
27 | 3765 } |
3766 | |
38 | 3767 |
54 | 3768 package int doSizeRequestConnect( CallbackData* cbdata, GtkWidget* window, GtkWidget* widget ){ |
3769 cbdata.display = this; | |
3770 cbdata.data = cast(void*)widget; | |
3771 return OS.g_signal_connect (cast(void*)window, OS.size_request.ptr, cast(GCallback)&sizeRequestProcFunc, cast(void*)&cbdata ); | |
3772 } | |
3773 | |
3774 private static extern(C) void sizeRequestProcFunc (GtkWidget* handle, int /*long*/ arg0, int /*long*/ user_data) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3775 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
54 | 3776 auto cbdata = cast(CallbackData*)user_data; |
3777 cbdata.display.sizeRequestProcMeth( cast(GtkWidget*)handle, arg0, cast(int)cbdata.data ); | |
3778 } | |
3779 | |
38 | 3780 int /*long*/ sizeRequestProcMeth (GtkWidget* handle, int /*long*/ arg0, int /*long*/ user_data) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3781 Widget widget = getWidget (cast(GtkWidget*)user_data); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3782 if (widget 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:
54
diff
changeset
|
3783 return widget.sizeRequestProc (handle, arg0, user_data); |
27 | 3784 } |
3785 | |
67 | 3786 package void doTreeSelectionProcConnect( CallbackData* cbdata, GtkWidget* widget, GtkTreeSelection* selection ){ |
3787 cbdata.display = this; | |
3788 cbdata.data = cast(void*)widget; | |
3789 OS.gtk_tree_selection_selected_foreach (selection, &treeSelectionProcFunc, widget); | |
3790 } | |
3791 | |
3792 private static extern(C) void treeSelectionProcFunc (GtkTreeModel *model, GtkTreePath *path, GtkTreeIter *iter, void* data) { | |
3793 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; | |
3794 auto cbdata = cast(CallbackData*)data; | |
3795 cbdata.display.treeSelectionProcMeth( model, path, iter, cbdata.data ); | |
3796 } | |
3797 | |
3798 void treeSelectionProcMeth (GtkTreeModel *model, GtkTreePath *path, GtkTreeIter *iter, void* data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3799 Widget widget = getWidget (cast(GtkWidget*)data); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3800 if (widget is null) return 0; |
67 | 3801 widget.treeSelectionProc (model, path, iter, treeSelection, treeSelectionLength++); |
27 | 3802 } |
3803 | |
3804 void saveResources () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3805 int resourceCount = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3806 if (resources is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3807 resources = new Resource [RESOURCE_SIZE]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3808 } else { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3809 resourceCount = resources.length; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3810 Resource [] newResources = new Resource [resourceCount + RESOURCE_SIZE]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3811 System.arraycopy (resources, 0, newResources, 0, resourceCount); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3812 resources = newResources; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3813 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3814 if (systemFont !is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3815 resources [resourceCount++] = systemFont; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3816 systemFont = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3817 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3818 if (errorImage !is null) resources [resourceCount++] = errorImage; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3819 if (infoImage !is null) resources [resourceCount++] = infoImage; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3820 if (questionImage !is null) resources [resourceCount++] = questionImage; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3821 if (warningImage !is null) resources [resourceCount++] = warningImage; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3822 errorImage = infoImage = questionImage = warningImage = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3823 for (int i=0; i<cursors.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3824 if (cursors [i] !is null) resources [resourceCount++] = cursors [i]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3825 cursors [i] = null; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3826 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3827 if (resourceCount < RESOURCE_SIZE) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3828 Resource [] newResources = new Resource [resourceCount]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3829 System.arraycopy (resources, 0, newResources, 0, resourceCount); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3830 resources = newResources; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3831 } |
27 | 3832 } |
3833 | |
26 | 3834 void sendEvent (int eventType, Event event) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3835 if (eventTable is null && filterTable is null) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3836 return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3837 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3838 if (event is null) event = new Event (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3839 event.display = this; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3840 event.type = eventType; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3841 if (event.time is 0) event.time = getLastEventTime (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3842 if (!filterEvent (event)) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3843 if (eventTable !is null) eventTable.sendEvent (event); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3844 } |
27 | 3845 } |
3846 | |
3847 void setCurrentCaret (Caret caret) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3848 if (caretId !is 0) OS.gtk_timeout_remove(caretId); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3849 caretId = 0; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3850 currentCaret = caret; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3851 if (caret is null) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3852 int blinkRate = currentCaret.blinkRate; |
27 | 3853 caretProcCallbackData.display = this; |
3854 caretProcCallbackData.data = cast(void*)0; | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3855 caretId = OS.gtk_timeout_add (blinkRate, &caretProcFunc, &caretProcCallbackData); |
27 | 3856 } |
3857 | |
3858 private static extern(C) int /*long*/ shellMapProcFunc (int /*long*/ handle, int /*long*/ arg0, int /*long*/ user_data) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3859 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 3860 auto cbdata = cast(CallbackData*)user_data; |
38 | 3861 return cbdata.display.shellMapProc( cast(GtkWidget*)handle, arg0, cast(int)cbdata.data ); |
27 | 3862 } |
3863 | |
38 | 3864 int /*long*/ shellMapProc (GtkWidget* handle, int /*long*/ arg0, int /*long*/ user_data) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3865 Widget widget = getWidget (cast(GtkWidget*)handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3866 if (widget 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:
54
diff
changeset
|
3867 return widget.shellMapProc (handle, arg0, user_data); |
27 | 3868 } |
3869 | |
3870 private static extern(C) int /*long*/ styleSetProcFunc (int /*long*/ gobject, int /*long*/ arg1, int /*long*/ user_data) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3871 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 3872 auto cbdata = cast(CallbackData*)user_data; |
3873 return cbdata.display.styleSetProcMeth( gobject, arg1, cast(int)cbdata.data ); | |
3874 } | |
3875 int /*long*/ styleSetProcMeth (int /*long*/ gobject, int /*long*/ arg1, int /*long*/ user_data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3876 settingsChanged = true; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3877 return 0; |
27 | 3878 } |
3879 | |
3880 /** | |
3881 * Causes the <code>run()</code> method of the runnable to | |
3882 * be invoked by the user-interface thread at the next | |
3883 * reasonable opportunity. The thread which calls this method | |
3884 * is suspended until the runnable completes. Specifying <code>null</code> | |
3885 * as the runnable simply wakes the user-interface thread. | |
3886 * <p> | |
3887 * Note that at the time the runnable is invoked, widgets | |
3888 * that have the receiver as their display may have been | |
3889 * disposed. Therefore, it is necessary to check for this | |
3890 * case inside the runnable before accessing the widget. | |
3891 * </p> | |
3892 * | |
3893 * @param runnable code to run on the user-interface thread or <code>null</code> | |
3894 * | |
3895 * @exception SWTException <ul> | |
3896 * <li>ERROR_FAILED_EXEC - if an exception occurred when executing the runnable</li> | |
3897 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3898 * </ul> | |
3899 * | |
3900 * @see #asyncExec | |
3901 */ | |
3902 public void syncExec (Runnable runnable) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3903 if (isDisposed ()) error (SWT.ERROR_DEVICE_DISPOSED); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3904 synchronized (idleLock) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3905 if (idleNeeded && idleHandle is 0) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3906 //NOTE: calling unlocked function in OS |
27 | 3907 idleProcCallbackData.display = this; |
3908 idleProcCallbackData.data = cast(void*)0; | |
3909 //PORTING_TODO: was _g_idle_add, calling directly | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3910 idleHandle = OS.g_idle_add (&idleProcFunc, &idleProcCallbackData); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3911 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3912 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3913 synchronizer.syncExec (runnable); |
27 | 3914 } |
3915 | |
3916 static int translateKey (int key) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3917 for (int i=0; i<KeyTable.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3918 if (KeyTable [i] [0] is key) return KeyTable [i] [1]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3919 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3920 return 0; |
27 | 3921 } |
3922 | |
3923 static int untranslateKey (int key) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3924 for (int i=0; i<KeyTable.length; i++) { |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3925 if (KeyTable [i] [1] is key) return KeyTable [i] [0]; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3926 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3927 return 0; |
18 | 3928 } |
27 | 3929 |
3930 /** | |
3931 * Forces all outstanding paint requests for the display | |
3932 * to be processed before this method returns. | |
3933 * | |
3934 * @exception SWTException <ul> | |
3935 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
3936 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3937 * </ul> | |
3938 * | |
3939 * @see Control#update() | |
3940 */ | |
3941 public void update () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3942 checkDevice (); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3943 flushExposes (null, true); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3944 OS.gdk_window_process_all_updates (); |
27 | 3945 } |
3946 | |
3947 /** | |
3948 * If the receiver's user-interface thread was <code>sleep</code>ing, | |
3949 * causes it to be awakened and start running again. Note that this | |
3950 * method may be called from any thread. | |
3951 * | |
3952 * @exception SWTException <ul> | |
3953 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3954 * </ul> | |
3955 * | |
3956 * @see #sleep | |
3957 */ | |
3958 public void wake () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3959 if (isDisposed ()) error (SWT.ERROR_DEVICE_DISPOSED); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3960 if (thread is Thread.getThis ()) return; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3961 wakeThread (); |
27 | 3962 } |
3963 | |
3964 void wakeThread () { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3965 OS.g_main_context_wakeup (null); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3966 wake_state = true; |
27 | 3967 } |
3968 | |
3969 static dchar wcsToMbcs (char ch) { | |
3970 //PORTING_TODO not sure about this | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3971 int key = ch & 0xFFFF; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3972 if (key <= 0x7F) return ch; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3973 char [] buffer = Converter.wcsToMbcs (null,[ch], false); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3974 if (buffer.length is 1) return '\0'; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3975 if (buffer.length is 2) { |
27 | 3976 return cast(char) (((buffer [0] & 0xFF) << 8) | (buffer [1] & 0xFF)); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3977 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3978 return '\0'; |
27 | 3979 } |
18 | 3980 |
27 | 3981 private static extern(C) int /*long*/ windowProcFunc2 (GtkWidget* handle, int /*long*/ user_data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3982 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 3983 CallbackData* cbdata = cast(CallbackData*)user_data; |
3984 return cbdata.display.windowProc( handle, cast(int)cbdata.data ); | |
3985 } | |
3986 int /*long*/ windowProc (GtkWidget* handle, int /*long*/ user_data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3987 Widget widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3988 if (widget 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:
54
diff
changeset
|
3989 return widget.windowProc (handle, user_data); |
27 | 3990 } |
3991 | |
3992 private static extern(C) int /*long*/ windowProcFunc3 (int /*long*/ handle, int /*long*/ arg0, int /*long*/ user_data) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3993 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 3994 CallbackData* cbdata = cast(CallbackData*)user_data; |
3995 return cbdata.display.windowProc( cast(GtkWidget*)handle, arg0, cast(int)cbdata.data ); | |
3996 } | |
3997 int /*long*/ windowProc (GtkWidget* handle, int /*long*/ arg0, int /*long*/ user_data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3998 Widget widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3999 if (widget 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:
54
diff
changeset
|
4000 return widget.windowProc (handle, arg0, user_data); |
27 | 4001 } |
4002 | |
4003 private static extern(C) int /*long*/ windowProcFunc4 (int /*long*/ handle, int /*long*/ arg0, int /*long*/ arg1, int /*long*/ user_data) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
4004 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 4005 CallbackData* cbdata = cast(CallbackData*)user_data; |
4006 return cbdata.display.windowProc( cast(GtkWidget*)handle, arg0, arg1, cast(int)cbdata.data ); | |
4007 } | |
4008 int /*long*/ windowProc (GtkWidget* handle, int /*long*/ arg0, int /*long*/ arg1, int /*long*/ user_data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4009 Widget widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4010 if (widget 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:
54
diff
changeset
|
4011 return widget.windowProc (handle, arg0, arg1, user_data); |
27 | 4012 } |
4013 | |
4014 private static extern(C) int /*long*/ windowProcFunc5 (int /*long*/ handle, int /*long*/ arg0, int /*long*/ arg1, int /*long*/ arg2, int /*long*/ user_data) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
4015 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 4016 CallbackData* cbdata = cast(CallbackData*)user_data; |
4017 return cbdata.display.windowProc( cast(GtkWidget*)handle, arg0, arg1, arg2, cast(int)cbdata.data ); | |
4018 } | |
4019 int /*long*/ windowProc (GtkWidget* handle, int /*long*/ arg0, int /*long*/ arg1, int /*long*/ arg2, int /*long*/ user_data) { | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4020 Widget widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4021 if (widget 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:
54
diff
changeset
|
4022 return widget.windowProc (handle, arg0, arg1, arg2, user_data); |
27 | 4023 } |
4024 | |
47
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4025 package int doWindowTimerAdd( CallbackData* cbdata, int delay, GtkWidget* widget ){ |
54 | 4026 cbdata.display = this; |
4027 cbdata.data = cast(void*)widget; | |
4028 return OS.gtk_timeout_add (delay, &windowTimerProcFunc, &cbdata); | |
27 | 4029 } |
47
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4030 |
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4031 private static extern(C) int /*long*/ windowTimerProcFunc (void* user_data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
4032 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
47
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4033 CallbackData* cbdata = cast(CallbackData*)user_data; |
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4034 return cbdata.display.windowTimerProc( cast(GtkWidget*)cbdata.data ); |
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4035 } |
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4036 |
27 | 4037 int /*long*/ windowTimerProc (GtkWidget* handle) { |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4038 Widget widget = getWidget (handle); |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4039 if (widget 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:
54
diff
changeset
|
4040 return widget.timerProc (handle); |
27 | 4041 } |
18 | 4042 |
4043 } | |
42 | 4044 |
4045 package struct CallbackData { | |
4046 Display display; | |
4047 void* data; | |
4048 } | |
4049 |