Mercurial > projects > dwt-linux
annotate dwt/widgets/Display.d @ 321:ffb904674b52
Fixes for LLVMDC
author | Frank Benoit <benoit@tionex.de> |
---|---|
date | Sat, 27 Sep 2008 15:58:22 +0200 |
parents | c0d810de7093 |
children | 4bffbf81e2d6 |
rev | line source |
---|---|
72 | 1 /******************************************************************************* |
259 | 2 * Copyright (c) 2000, 2008 IBM Corporation and others. |
18 | 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 | |
72 | 10 * Port to the D programming language: |
11 * Frank Benoit <benoit@tionex.de> | |
18 | 12 *******************************************************************************/ |
13 module dwt.widgets.Display; | |
14 | |
71 | 15 import dwt.DWT; |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
16 import dwt.graphics.Color; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
17 import dwt.graphics.Cursor; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
18 import dwt.graphics.Device; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
19 import dwt.graphics.DeviceData; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
20 import dwt.graphics.Font; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
21 import dwt.graphics.GCData; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
22 import dwt.graphics.Image; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
23 import dwt.graphics.ImageData; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
24 import dwt.graphics.PaletteData; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
25 import dwt.graphics.Point; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
26 import dwt.graphics.Rectangle; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
27 import dwt.graphics.Resource; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
28 import dwt.internal.Compatibility; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
29 import dwt.internal.Converter; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
30 import dwt.internal.Lock; |
27 | 31 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
|
32 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
|
33 import dwt.widgets.Caret; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
34 import dwt.widgets.Control; |
240 | 35 import dwt.widgets.Dialog; |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
36 import dwt.widgets.Event; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
37 import dwt.widgets.EventTable; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
38 import dwt.widgets.Listener; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
39 import dwt.widgets.Menu; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
40 import dwt.widgets.Monitor; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
41 import dwt.widgets.Shell; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
42 import dwt.widgets.Synchronizer; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
43 import dwt.widgets.Tray; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
44 import dwt.widgets.Widget; |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
45 |
26 | 46 import tango.stdc.string; |
47 import dwt.dwthelper.utils; | |
48 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
|
49 |
46 | 50 import tango.core.Thread; |
54 | 51 import tango.io.Stdout; |
18 | 52 |
53 /** | |
54 * Instances of this class are responsible for managing the | |
71 | 55 * connection between DWT and the underlying operating |
18 | 56 * system. Their most important function is to implement |
71 | 57 * the DWT event loop in terms of the platform event model. |
18 | 58 * They also provide various methods for accessing information |
59 * about the operating system, and have overall control over | |
71 | 60 * the operating system resources which DWT allocates. |
18 | 61 * <p> |
71 | 62 * Applications which are built with DWT will <em>almost always</em> |
18 | 63 * require only a single display. In particular, some platforms |
71 | 64 * which DWT supports will not allow more than one <em>active</em> |
18 | 65 * display. In other words, some platforms do not support |
66 * creating a new display if one already exists that has not been | |
67 * sent the <code>dispose()</code> message. | |
68 * <p> | |
71 | 69 * In DWT, the thread which creates a <code>Display</code> |
18 | 70 * instance is distinguished as the <em>user-interface thread</em> |
71 * for that display. | |
72 * </p> | |
73 * The user-interface thread for a particular display has the | |
74 * following special attributes: | |
75 * <ul> | |
76 * <li> | |
77 * The event loop for that display must be run from the thread. | |
78 * </li> | |
79 * <li> | |
71 | 80 * Some DWT API methods (notably, most of the public methods in |
18 | 81 * <code>Widget</code> and its subclasses), may only be called |
82 * from the thread. (To support multi-threaded user-interface | |
83 * applications, class <code>Display</code> provides inter-thread | |
84 * communication methods which allow threads other than the | |
85 * user-interface thread to request that it perform operations | |
86 * on their behalf.) | |
87 * </li> | |
88 * <li> | |
89 * The thread is not allowed to construct other | |
90 * <code>Display</code>s until that display has been disposed. | |
91 * (Note that, this is in addition to the restriction mentioned | |
92 * above concerning platform support for multiple displays. Thus, | |
93 * the only way to have multiple simultaneously active displays, | |
94 * even on platforms which support it, is to have multiple threads.) | |
95 * </li> | |
96 * </ul> | |
71 | 97 * Enforcing these attributes allows DWT to be implemented directly |
18 | 98 * on the underlying operating system's event model. This has |
99 * numerous benefits including smaller footprint, better use of | |
100 * resources, safer memory management, clearer program logic, | |
101 * better performance, and fewer overall operating system threads | |
102 * required. The down side however, is that care must be taken | |
103 * (only) when constructing multi-threaded applications to use the | |
104 * inter-thread communication mechanisms which this class provides | |
105 * when required. | |
106 * </p><p> | |
71 | 107 * All DWT API methods which may only be called from the user-interface |
18 | 108 * thread are distinguished in their documentation by indicating that |
109 * they throw the "<code>ERROR_THREAD_INVALID_ACCESS</code>" | |
71 | 110 * DWT exception. |
18 | 111 * </p> |
112 * <dl> | |
113 * <dt><b>Styles:</b></dt> | |
114 * <dd>(none)</dd> | |
115 * <dt><b>Events:</b></dt> | |
116 * <dd>Close, Dispose, Settings</dd> | |
117 * </dl> | |
118 * <p> | |
119 * IMPORTANT: This class is <em>not</em> intended to be subclassed. | |
120 * </p> | |
121 * @see #syncExec | |
122 * @see #asyncExec | |
123 * @see #wake | |
124 * @see #readAndDispatch | |
125 * @see #sleep | |
126 * @see Device#dispose | |
259 | 127 * @see <a href="http://www.eclipse.org/swt/snippets/#display">Display snippets</a> |
128 * @see <a href="http://www.eclipse.org/swt/">Sample code and further information</a> | |
18 | 129 */ |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
130 public class Display : Device { |
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
131 |
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
|
132 /* 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
|
133 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
|
134 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
|
135 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
|
136 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
|
137 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
|
138 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
|
139 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
|
140 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
|
141 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
|
142 void*/*Callback*/ eventCallback, filterCallback; |
27 | 143 |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
144 CallbackData*[int] windowProcCallbackDatas; // to prevent GC from collect |
27 | 145 |
146 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
|
147 EventTable eventTable, filterTable; |
240 | 148 static String APP_NAME = "DWT"; //$NON-NLS-1$ |
238 | 149 static const String DISPATCH_EVENT_KEY = "dwt.internal.gtk.dispatchEvent"; |
150 static const String ADD_WIDGET_KEY = "dwt.internal.addWidget"; | |
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
|
151 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
|
152 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
|
153 |
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 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
|
155 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
|
156 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
|
157 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
|
158 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
|
159 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
|
160 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
|
161 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
|
162 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
|
163 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
|
164 |
240 | 165 /* Modality */ |
166 Shell [] modalShells; | |
167 Dialog modalDialog; | |
168 static final String GET_MODAL_DIALOG = "dwt.internal.gtk.getModalDialog"; //$NON-NLS-1$ | |
169 static final String SET_MODAL_DIALOG = "dwt.internal.gtk.setModalDialog"; //$NON-NLS-1$ | |
170 | |
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
|
171 /* 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
|
172 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
|
173 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
|
174 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
|
175 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
|
176 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
|
177 |
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 /* 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
|
179 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
|
180 GtkWindow* preeditWindow; |
27 | 181 GtkLabel* preeditLabel; |
18 | 182 |
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
|
183 /* 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
|
184 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
|
185 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
|
186 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
187 /* 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
|
188 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
|
189 |
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 /* 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
|
191 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
|
192 |
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 /* 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
|
194 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
|
195 Runnable [] timerList; |
27 | 196 CallbackData timerProcCallbackData; |
18 | 197 |
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
|
198 /* 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
|
199 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
|
200 int caretId; |
27 | 201 CallbackData caretProcCallbackData; |
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 /* 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
|
204 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
|
205 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
206 /* 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
|
207 int mouseHoverId; |
30 | 208 GtkWidget* mouseHoverHandle; |
209 CallbackData mouseHoverProcCallbackData; | |
210 | |
211 /* Menu position callback */ | |
18 | 212 |
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
|
213 /* 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
|
214 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
215 /* Shell map callback */ |
27 | 216 CallbackData shellMapProcCallbackData; |
217 GClosure* shellMapProcClosure; | |
18 | 218 |
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
|
219 /* Idle proc callback */ |
27 | 220 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
|
221 int idleHandle; |
240 | 222 static const String ADD_IDLE_PROC_KEY = "dwt.internal.gtk.addIdleProc"; |
223 static const String REMOVE_IDLE_PROC_KEY = "dwt.internal.gtk.removeIdleProc"; | |
54 | 224 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
|
225 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
|
226 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
227 /* 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
|
228 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
|
229 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
|
230 |
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 /* Set direction callback */ |
89
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
232 CallbackData setDirectionProcCallbackData; |
240 | 233 static const String GET_DIRECTION_PROC_KEY = "dwt.internal.gtk.getDirectionProc"; //$NON-NLS-1$ |
234 | |
235 /* Set emissionProc callback */ | |
236 CallbackData emissionProcCallbackData; | |
237 static const String GET_EMISSION_PROC_KEY = "dwt.internal.gtk.getEmissionProc"; //$NON-NLS-1$ | |
18 | 238 |
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
|
239 /* Get all children callback */ |
30 | 240 CallbackData allChildrenProcCallbackData; |
26 | 241 GList* allChildren; |
18 | 242 |
89
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
243 CallbackData cellDataProcCallbackData; |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
244 |
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
|
245 /* 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
|
246 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
|
247 bool settingsChanged, runSettingsFld; |
27 | 248 CallbackData styleSetProcCallbackData; |
18 | 249 |
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
|
250 /* 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
|
251 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
|
252 |
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 /* 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
|
254 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
|
255 |
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 /* 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
|
257 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
|
258 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
|
259 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
|
260 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
|
261 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
|
262 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
|
263 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
|
264 //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
|
265 |
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 /* 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
|
267 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
|
268 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
|
269 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
|
270 Resource [] resources; |
71 | 271 static const int RESOURCE_SIZE = 1 + 4 + DWT.CURSOR_HAND + 1; |
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
|
272 |
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 /* 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
|
274 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
|
275 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
|
276 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
|
277 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
|
278 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
|
279 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
|
280 |
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 /* 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
|
282 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
|
283 |
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 /* 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
|
285 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
|
286 |
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 /* 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
|
288 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
|
289 |
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 /* 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
|
291 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
|
292 static int /*long*/ fixed_info_ptr; |
240 | 293 static extern(C) void function(GtkWidget* handle, GtkAllocation* allocation) oldFixedSizeAllocateProc; |
294 | |
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
|
295 |
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 /* 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
|
297 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
|
298 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
|
299 |
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 /* 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
|
301 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
|
302 |
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 /* Keyboard and Mouse Masks */ |
71 | 304 [OS.GDK_Alt_L, DWT.ALT], |
305 [OS.GDK_Alt_R, DWT.ALT], | |
306 [OS.GDK_Meta_L, DWT.ALT], | |
307 [OS.GDK_Meta_R, DWT.ALT], | |
308 [OS.GDK_Shift_L, DWT.SHIFT], | |
309 [OS.GDK_Shift_R, DWT.SHIFT], | |
310 [OS.GDK_Control_L, DWT.CONTROL], | |
311 [OS.GDK_Control_R, DWT.CONTROL], | |
312 // [OS.GDK_????, DWT.COMMAND], | |
313 // [OS.GDK_????, DWT.COMMAND], | |
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
|
314 |
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 /* Non-Numeric Keypad Keys */ |
71 | 316 [OS.GDK_Up, DWT.ARROW_UP], |
317 [OS.GDK_KP_Up, DWT.ARROW_UP], | |
318 [OS.GDK_Down, DWT.ARROW_DOWN], | |
319 [OS.GDK_KP_Down, DWT.ARROW_DOWN], | |
320 [OS.GDK_Left, DWT.ARROW_LEFT], | |
321 [OS.GDK_KP_Left, DWT.ARROW_LEFT], | |
322 [OS.GDK_Right, DWT.ARROW_RIGHT], | |
323 [OS.GDK_KP_Right, DWT.ARROW_RIGHT], | |
324 [OS.GDK_Page_Up, DWT.PAGE_UP], | |
325 [OS.GDK_KP_Page_Up, DWT.PAGE_UP], | |
326 [OS.GDK_Page_Down, DWT.PAGE_DOWN], | |
327 [OS.GDK_KP_Page_Down, DWT.PAGE_DOWN], | |
328 [OS.GDK_Home, DWT.HOME], | |
329 [OS.GDK_KP_Home, DWT.HOME], | |
330 [OS.GDK_End, DWT.END], | |
331 [OS.GDK_KP_End, DWT.END], | |
332 [OS.GDK_Insert, DWT.INSERT], | |
333 [OS.GDK_KP_Insert, DWT.INSERT], | |
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
|
334 |
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 /* Virtual and Ascii Keys */ |
71 | 336 [OS.GDK_BackSpace, DWT.BS], |
337 [OS.GDK_Return, DWT.CR], | |
338 [OS.GDK_Delete, DWT.DEL], | |
339 [OS.GDK_KP_Delete, DWT.DEL], | |
340 [OS.GDK_Escape, DWT.ESC], | |
341 [OS.GDK_Linefeed, DWT.LF], | |
342 [OS.GDK_Tab, DWT.TAB], | |
343 [OS.GDK_ISO_Left_Tab, DWT.TAB], | |
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
|
344 |
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 /* Functions Keys */ |
71 | 346 [OS.GDK_F1, DWT.F1], |
347 [OS.GDK_F2, DWT.F2], | |
348 [OS.GDK_F3, DWT.F3], | |
349 [OS.GDK_F4, DWT.F4], | |
350 [OS.GDK_F5, DWT.F5], | |
351 [OS.GDK_F6, DWT.F6], | |
352 [OS.GDK_F7, DWT.F7], | |
353 [OS.GDK_F8, DWT.F8], | |
354 [OS.GDK_F9, DWT.F9], | |
355 [OS.GDK_F10, DWT.F10], | |
356 [OS.GDK_F11, DWT.F11], | |
357 [OS.GDK_F12, DWT.F12], | |
358 [OS.GDK_F13, DWT.F13], | |
359 [OS.GDK_F14, DWT.F14], | |
360 [OS.GDK_F15, DWT.F15], | |
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
|
361 |
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 /* Numeric Keypad Keys */ |
71 | 363 [OS.GDK_KP_Multiply, DWT.KEYPAD_MULTIPLY], |
364 [OS.GDK_KP_Add, DWT.KEYPAD_ADD], | |
365 [OS.GDK_KP_Enter, DWT.KEYPAD_CR], | |
366 [OS.GDK_KP_Subtract, DWT.KEYPAD_SUBTRACT], | |
367 [OS.GDK_KP_Decimal, DWT.KEYPAD_DECIMAL], | |
368 [OS.GDK_KP_Divide, DWT.KEYPAD_DIVIDE], | |
369 [OS.GDK_KP_0, DWT.KEYPAD_0], | |
370 [OS.GDK_KP_1, DWT.KEYPAD_1], | |
371 [OS.GDK_KP_2, DWT.KEYPAD_2], | |
372 [OS.GDK_KP_3, DWT.KEYPAD_3], | |
373 [OS.GDK_KP_4, DWT.KEYPAD_4], | |
374 [OS.GDK_KP_5, DWT.KEYPAD_5], | |
375 [OS.GDK_KP_6, DWT.KEYPAD_6], | |
376 [OS.GDK_KP_7, DWT.KEYPAD_7], | |
377 [OS.GDK_KP_8, DWT.KEYPAD_8], | |
378 [OS.GDK_KP_9, DWT.KEYPAD_9], | |
379 [OS.GDK_KP_Equal, DWT.KEYPAD_EQUAL], | |
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
|
380 |
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 /* Other keys */ |
71 | 382 [OS.GDK_Caps_Lock, DWT.CAPS_LOCK], |
383 [OS.GDK_Num_Lock, DWT.NUM_LOCK], | |
384 [OS.GDK_Scroll_Lock, DWT.SCROLL_LOCK], | |
385 [OS.GDK_Pause, DWT.PAUSE], | |
386 [OS.GDK_Break, DWT.BREAK], | |
387 [OS.GDK_Print, DWT.PRINT_SCREEN], | |
388 [OS.GDK_Help, DWT.HELP], | |
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
|
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 ]; |
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 |
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 /* 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
|
393 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
|
394 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
|
395 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
396 /* Package name */ |
238 | 397 static const String PACKAGE_PREFIX = "dwt.widgets."; |
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
|
398 /* 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
|
399 * ".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
|
400 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
401 // static { |
238 | 402 // String name = Display.class.getName (); |
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
|
403 // 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
|
404 // 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
|
405 // } |
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 |
104 | 407 static this() { |
240 | 408 Displays = new Display [4]; |
409 initDeviceFinder(); | |
410 SWT_OBJECT_INDEX = OS.g_quark_from_string ("SWT_OBJECT_INDEX"); | |
411 SWT_OBJECT_INDEX1 = OS.g_quark_from_string ("SWT_OBJECT_INDEX1"); | |
412 SWT_OBJECT_INDEX2 = OS.g_quark_from_string ("SWT_OBJECT_INDEX2"); | |
54 | 413 } |
18 | 414 |
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
|
415 /* 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
|
416 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
|
417 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
|
418 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
|
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 /* 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
|
421 Object data; |
238 | 422 String [] keys; |
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
|
423 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
|
424 |
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 /* 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
|
426 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
|
427 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
|
428 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
|
429 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
|
430 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
|
431 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
|
432 |
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 /* Window Manager */ |
238 | 434 String windowManager; |
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
|
435 |
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 * 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
|
438 * 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
|
439 * 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
|
440 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
441 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
|
442 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
|
443 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
|
444 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
|
445 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
|
446 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
|
447 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
448 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
|
449 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
450 }; |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
451 } |
18 | 452 |
453 /* | |
454 * TEMPORARY CODE. | |
455 */ | |
456 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
|
457 CurrentDevice = device; |
18 | 458 } |
459 | |
460 /** | |
461 * Constructs a new instance of this class. | |
462 * <p> | |
463 * Note: The resulting display is marked as the <em>current</em> | |
464 * display. If this is the first display which has been | |
465 * constructed since the application started, it is also | |
466 * marked as the <em>default</em> display. | |
467 * </p> | |
468 * | |
71 | 469 * @exception DWTException <ul> |
18 | 470 * <li>ERROR_THREAD_INVALID_ACCESS - if called from a thread that already created an existing display</li> |
471 * <li>ERROR_INVALID_SUBCLASS - if this class is not an allowed subclass</li> | |
472 * </ul> | |
473 * | |
474 * @see #getCurrent | |
475 * @see #getDefault | |
476 * @see Widget#checkSubclass | |
477 * @see Shell | |
478 */ | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
479 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
|
480 this (null); |
18 | 481 } |
482 | |
483 /** | |
484 * Constructs a new instance of this class using the parameter. | |
485 * | |
486 * @param data the device data | |
487 */ | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
488 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
|
489 super (data); |
26 | 490 synchronizer = new Synchronizer (this); |
491 idleLock = new Object(); | |
492 flushRect = new GdkRectangle (); | |
493 exposeEvent = new XExposeEvent (); | |
494 visibilityEvent = new XVisibilityEvent (); | |
71 | 495 cursors = new Cursor [DWT.CURSOR_HAND + 1]; |
18 | 496 } |
497 | |
498 /** | |
499 * Adds the listener to the collection of listeners who will | |
500 * be notified when an event of the given type occurs anywhere | |
501 * in a widget. The event type is one of the event constants | |
71 | 502 * defined in class <code>DWT</code>. When the event does occur, |
18 | 503 * the listener is notified by sending it the <code>handleEvent()</code> |
504 * message. | |
505 * <p> | |
71 | 506 * Setting the type of an event to <code>DWT.None</code> from |
18 | 507 * within the <code>handleEvent()</code> method can be used to |
508 * change the event type and stop subsequent Java listeners | |
509 * from running. Because event filters run before other listeners, | |
510 * event filters can both block other listeners and set arbitrary | |
511 * fields within an event. For this reason, event filters are both | |
512 * powerful and dangerous. They should generally be avoided for | |
513 * performance, debugging and code maintenance reasons. | |
514 * </p> | |
515 * | |
516 * @param eventType the type of event to listen for | |
517 * @param listener the listener which should be notified when the event occurs | |
518 * | |
519 * @exception IllegalArgumentException <ul> | |
520 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li> | |
521 * </ul> | |
71 | 522 * @exception DWTException <ul> |
18 | 523 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
524 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
525 * </ul> | |
526 * | |
527 * @see Listener | |
71 | 528 * @see DWT |
18 | 529 * @see #removeFilter |
530 * @see #removeListener | |
531 * | |
532 * @since 3.0 | |
533 */ | |
534 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
|
535 checkDevice (); |
71 | 536 if (listener is null) error (DWT.ERROR_NULL_ARGUMENT); |
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
|
537 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
|
538 filterTable.hook (eventType, listener); |
18 | 539 } |
540 | |
26 | 541 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
|
542 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
|
543 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
|
544 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
|
545 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
|
546 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
|
547 } |
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 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
|
549 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
|
550 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
|
551 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
|
552 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
|
553 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
|
554 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
|
555 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
|
556 } |
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 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
|
558 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
|
559 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
|
560 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
|
561 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
|
562 } 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
|
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 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
|
565 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
|
566 gdkEventCount++; |
18 | 567 } |
568 | |
569 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
|
570 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
|
571 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
|
572 if (idleHandle is 0) { |
27 | 573 idleProcCallbackData.display = this; |
574 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
|
575 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
|
576 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
577 } |
18 | 578 } |
579 | |
580 /** | |
581 * Adds the listener to the collection of listeners who will | |
582 * be notified when an event of the given type occurs. The event | |
71 | 583 * type is one of the event constants defined in class <code>DWT</code>. |
18 | 584 * When the event does occur in the display, the listener is notified by |
585 * sending it the <code>handleEvent()</code> message. | |
586 * | |
587 * @param eventType the type of event to listen for | |
588 * @param listener the listener which should be notified when the event occurs | |
589 * | |
590 * @exception IllegalArgumentException <ul> | |
591 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li> | |
592 * </ul> | |
71 | 593 * @exception DWTException <ul> |
18 | 594 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
595 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
596 * </ul> | |
597 * | |
598 * @see Listener | |
71 | 599 * @see DWT |
18 | 600 * @see #removeListener |
601 * | |
602 * @since 2.0 | |
603 */ | |
604 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
|
605 checkDevice (); |
71 | 606 if (listener is null) error (DWT.ERROR_NULL_ARGUMENT); |
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
|
607 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
|
608 eventTable.hook (eventType, listener); |
18 | 609 } |
610 | |
69 | 611 void allChildrenCollect( GtkWidget* widget, int recurse ){ |
612 allChildrenProcCallbackData.display = this; | |
613 allChildrenProcCallbackData.data = cast(void*)recurse; | |
614 OS.gtk_container_forall (cast(GtkContainer*)widget, cast(GtkCallback)&allChildrenProcFunc, &allChildrenProcCallbackData); | |
615 } | |
30 | 616 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
|
617 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
30 | 618 CallbackData* cbdata = cast(CallbackData*)user_data; |
619 return cbdata.display.allChildrenProc( cast(GtkWidget*)handle, cast(int)cbdata.data ); | |
620 } | |
621 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
|
622 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
|
623 if (recurse !is 0 && OS.GTK_IS_CONTAINER (cast(GTypeInstance*)widget)) { |
30 | 624 allChildrenProcCallbackData.display = this; |
625 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
|
626 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
|
627 } |
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 return 0; |
30 | 629 } |
630 | |
631 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
|
632 if (mouseHoverId !is 0) OS.gtk_timeout_remove (mouseHoverId); |
30 | 633 mouseHoverProcCallbackData.display = this; |
634 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
|
635 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
|
636 mouseHoverHandle = handle; |
30 | 637 } |
638 | |
18 | 639 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
|
640 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
|
641 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
|
642 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
|
643 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
|
644 } |
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 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
|
646 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
|
647 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
|
648 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
|
649 } |
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 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
|
651 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
|
652 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
|
653 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
|
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 popups [index] = menu; |
18 | 656 } |
657 | |
28 | 658 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
|
659 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
|
660 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
|
661 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
|
662 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
|
663 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
|
664 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
|
665 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
|
666 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
|
667 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
|
668 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
669 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
|
670 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
|
671 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
|
672 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
673 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
|
674 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
|
675 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
|
676 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
|
677 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
|
678 widgetTable [oldSlot] = widget; |
18 | 679 } |
680 | |
681 /** | |
682 * Causes the <code>run()</code> method of the runnable to | |
683 * be invoked by the user-interface thread at the next | |
684 * reasonable opportunity. The caller of this method continues | |
685 * to run in parallel, and is not notified when the | |
686 * runnable has completed. Specifying <code>null</code> as the | |
687 * runnable simply wakes the user-interface thread when run. | |
688 * <p> | |
689 * Note that at the time the runnable is invoked, widgets | |
690 * that have the receiver as their display may have been | |
691 * disposed. Therefore, it is necessary to check for this | |
692 * case inside the runnable before accessing the widget. | |
693 * </p> | |
694 * | |
695 * @param runnable code to run on the user-interface thread or <code>null</code> | |
696 * | |
71 | 697 * @exception DWTException <ul> |
18 | 698 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> |
699 * </ul> | |
700 * | |
701 * @see #syncExec | |
702 */ | |
703 public void asyncExec (Runnable runnable) { | |
240 | 704 synchronized (Device.classinfo) { |
705 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED); | |
706 synchronized (idleLock) { | |
707 if (idleNeeded && idleHandle is 0) { | |
708 //NOTE: calling unlocked function in OS | |
709 idleHandle = OS.g_idle_add (&idleProcFunc, cast(void*) this); | |
710 } | |
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
|
711 } |
240 | 712 synchronizer.asyncExec (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
|
713 } |
18 | 714 } |
715 | |
716 /** | |
717 * Causes the system hardware to emit a short sound | |
718 * (if it supports this capability). | |
719 * | |
71 | 720 * @exception DWTException <ul> |
18 | 721 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
722 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
723 * </ul> | |
724 */ | |
725 public void beep () { | |
71 | 726 if (!isValidThread ()) error (DWT.ERROR_THREAD_INVALID_ACCESS); |
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
|
727 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
|
728 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
|
729 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
|
730 } 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
|
731 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
|
732 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
|
733 } |
18 | 734 } |
735 | |
89
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
736 void doCellDataProc( GtkWidget* widget, GtkTreeViewColumn *tree_column, GtkCellRenderer *cell_renderer ){ |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
737 cellDataProcCallbackData.display = this; |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
738 cellDataProcCallbackData.data = widget; |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
739 OS.gtk_tree_view_column_set_cell_data_func ( tree_column, cell_renderer, &cellDataProcFunc, &cellDataProcCallbackData, null ); |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
740 } |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
741 |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
742 private static extern(C) void cellDataProcFunc ( |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
743 GtkTreeViewColumn *tree_column, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
744 GtkCellRenderer *cell, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
745 GtkTreeModel *tree_model, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
746 GtkTreeIter *iter, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
747 void* data) |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
748 { |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
749 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
750 CallbackData* cbdata = cast(CallbackData*)data; |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
751 return cbdata.display.cellDataProc( tree_column, cell, tree_model, iter, cbdata.data ); |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
752 } |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
753 |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
754 void cellDataProc( |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
755 GtkTreeViewColumn *tree_column, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
756 GtkCellRenderer *cell, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
757 GtkTreeModel *tree_model, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
758 GtkTreeIter *iter, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
759 void* data) |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
760 { |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
761 Widget widget = getWidget (cast(GtkWidget*)data); |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
762 if (widget is null) return; |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
763 widget.cellDataProc (tree_column, cell, tree_model, iter, data); |
18 | 764 } |
765 | |
152
17f8449522fd
overloads second walkthrough
Frank Benoit <benoit@tionex.de>
parents:
150
diff
changeset
|
766 protected override void checkDevice () { |
71 | 767 if (thread is null) error (DWT.ERROR_WIDGET_DISPOSED); |
768 if (thread !is Thread.getThis ()) error (DWT.ERROR_THREAD_INVALID_ACCESS); | |
769 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED); | |
18 | 770 } |
771 | |
240 | 772 static void checkDisplay (Thread thread, bool multiple) { |
773 synchronized (Device.classinfo) { | |
774 for (int i=0; i<Displays.length; i++) { | |
775 if (Displays [i] !is null) { | |
776 if (!multiple) DWT.error (DWT.ERROR_NOT_IMPLEMENTED, null, " [multiple displays]"); //$NON-NLS-1$ | |
777 if (Displays [i].thread is thread) DWT.error (DWT.ERROR_THREAD_INVALID_ACCESS); | |
778 } | |
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
|
779 } |
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 } |
18 | 781 } |
782 | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
783 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
|
784 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
26 | 785 auto disp = cast(Display)userData; |
786 return disp.checkIfEventProcMeth( display, xEvent ); | |
787 } | |
788 | |
789 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
|
790 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
|
791 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
|
792 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
|
793 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
|
794 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
|
795 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
|
796 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
|
797 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
|
798 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
799 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
|
800 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
|
801 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
|
802 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
|
803 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
|
804 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
|
805 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
|
806 } 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
|
807 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
|
808 } 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
|
809 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
|
810 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
811 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
812 *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
|
813 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
|
814 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
|
815 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
|
816 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
|
817 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
|
818 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
|
819 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
|
820 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
|
821 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
|
822 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
|
823 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
|
824 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
825 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
|
826 memmove (visibilityEvent, xEvent, XVisibilityEvent.sizeof); |
26 | 827 GtkWidget* handle; |
828 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
|
829 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
|
830 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
|
831 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
|
832 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
|
833 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
|
834 } 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
|
835 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
|
836 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
837 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
838 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
839 break; |
54 | 840 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
|
841 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
842 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
843 return 0; |
18 | 844 } |
845 | |
846 /** | |
847 * Checks that this class can be subclassed. | |
848 * <p> | |
849 * IMPORTANT: See the comment in <code>Widget.checkSubclass()</code>. | |
850 * </p> | |
851 * | |
71 | 852 * @exception DWTException <ul> |
18 | 853 * <li>ERROR_INVALID_SUBCLASS - if this class is not an allowed subclass</li> |
854 * </ul> | |
855 * | |
856 * @see Widget#checkSubclass | |
857 */ | |
858 protected void checkSubclass () { | |
71 | 859 //PORTING_TODO if (!isValidClass (getClass ())) error (DWT.ERROR_INVALID_SUBCLASS); |
18 | 860 } |
861 | |
240 | 862 void clearModal (Shell shell) { |
863 if (modalShells is null) return; | |
864 int index = 0, length_ = modalShells.length; | |
865 while (index < length_) { | |
866 if (modalShells [index] is shell) break; | |
867 if (modalShells [index] is null) return; | |
868 index++; | |
869 } | |
870 if (index is length_) return; | |
871 System.arraycopy (modalShells, index + 1, modalShells, index, --length_ - index); | |
872 modalShells [length_] = null; | |
873 if (index is 0 && modalShells [0] is null) modalShells = null; | |
874 Shell [] shells = getShells (); | |
875 for (int i=0; i<shells.length; i++) shells [i].updateModal (); | |
876 } | |
877 | |
18 | 878 /** |
71 | 879 * Requests that the connection between DWT and the underlying |
18 | 880 * operating system be closed. |
881 * | |
71 | 882 * @exception DWTException <ul> |
18 | 883 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
884 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
885 * </ul> | |
886 * | |
887 * @see Device#dispose | |
888 * | |
889 * @since 2.0 | |
890 */ | |
891 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
|
892 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
|
893 Event event = new Event (); |
71 | 894 sendEvent (DWT.Close, 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
|
895 if (event.doit) dispose (); |
18 | 896 } |
897 | |
898 /** | |
899 * Creates the device in the operating system. If the device | |
900 * does not have a handle, this method may do nothing depending | |
901 * on the device. | |
902 * <p> | |
903 * This method is called before <code>init</code>. | |
904 * </p> | |
905 * | |
906 * @param data the DeviceData which describes the receiver | |
907 * | |
908 * @see #init | |
909 */ | |
152
17f8449522fd
overloads second walkthrough
Frank Benoit <benoit@tionex.de>
parents:
150
diff
changeset
|
910 protected override 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
|
911 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
|
912 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
|
913 createDisplay (data); |
240 | 914 register (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
|
915 if (Default is null) Default = this; |
18 | 916 } |
917 | |
156
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
918 private static extern(C) int XErrorHandler( void*, XErrorEvent* ){ |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
919 Stdout.formatln ("*** XError" ); |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
920 byte* p; |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
921 *p = 3; |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
922 return 0; |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
923 } |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
924 |
240 | 925 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
|
926 /* 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
|
927 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
|
928 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
|
929 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
930 OS.gtk_set_locale(); |
156
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
931 int cnt = 2; |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
932 char*[] args = [ "name".ptr, "--sync".ptr, null ]; |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
933 char** a = args.ptr; |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
934 if (!OS.gtk_init_check (&cnt, &a )) { |
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
|
935 } |
156
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
936 assert( cnt is 1 ); |
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
|
937 if (OS.GDK_WINDOWING_X11 ()) xDisplay = cast(void*) OS.GDK_DISPLAY (); |
156
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
938 |
3948d75b8370
Own XError handler that does a segfault for backtrace
Frank Benoit <benoit@tionex.de>
parents:
152
diff
changeset
|
939 OS.XSetErrorHandler( &Display.XErrorHandler ); |
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 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
|
941 if (ptr !is null) { |
158
de2578a843a7
Tango update to rev 3158, TracedException>Exception, fromUtf8z>fromStringz,Fix Bug in MenuItem Thanx to nascent for the report.
Frank Benoit <benoit@tionex.de>
parents:
156
diff
changeset
|
942 char [] buffer = fromStringz(ptr); |
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
|
943 Stdout.formatln ("***WARNING: {}", buffer ); |
71 | 944 Stdout.formatln ("***WARNING: DWT requires GTK {}.{}.{}", MAJOR, MINOR, MICRO ); |
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
|
945 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
|
946 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
|
947 } |
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 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
|
949 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
|
950 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
|
951 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
|
952 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
|
953 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
|
954 } |
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 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
|
956 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
|
957 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
|
958 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
|
959 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
|
960 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
|
961 } |
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 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
|
963 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
|
964 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
|
965 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
|
966 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
|
967 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
|
968 } |
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 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
|
970 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
|
971 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
|
972 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
|
973 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
|
974 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
|
975 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
976 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
977 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
|
978 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
|
979 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
|
980 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
|
981 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
|
982 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
|
983 |
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 /* 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
|
985 shellHandle = OS.gtk_window_new (OS.GTK_WINDOW_TOPLEVEL); |
71 | 986 if (shellHandle is null) DWT.error (DWT.ERROR_NO_HANDLES); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
987 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
|
988 |
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 /* 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
|
990 OS.gdk_event_handler_set (&eventProcFunc, cast(void*)this, null); |
54 | 991 //filterProcCallbackData.display = this; |
992 //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
|
993 //OS.gdk_window_add_filter (null, &filterProcFunc, cast(void*)&filterProcCallbackData ); |
54 | 994 doWindowAddFilter( &filterProcCallbackData, null, null ); |
18 | 995 } |
996 | |
38 | 997 /* |
998 * Used by Shell | |
999 */ | |
1000 package void doWindowAddFilter( CallbackData* cbdata, GdkWindow* window, GtkWidget* widget ){ | |
1001 cbdata.display = this; | |
1002 cbdata.data = widget; | |
54 | 1003 OS.gdk_window_add_filter (window, &filterProcFunc, cbdata ); |
38 | 1004 } |
1005 | |
1006 package void doWindowRemoveFilter( CallbackData* cbdata, GdkWindow* window, GtkWidget* widget ){ | |
1007 cbdata.display = this; | |
1008 cbdata.data = widget; | |
54 | 1009 OS.gdk_window_remove_filter(window, &filterProcFunc, cbdata ); |
38 | 1010 } |
1011 | |
238 | 1012 Image createImage (String 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
|
1013 auto style = OS.gtk_widget_get_default_style (); |
238 | 1014 String buffer = 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
|
1015 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
|
1016 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
|
1017 OS.GTK_TEXT_DIR_NONE, |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1018 OS.GTK_STATE_NORMAL, |
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1019 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
|
1020 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
|
1021 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
|
1022 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
|
1023 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
|
1024 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
|
1025 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
|
1026 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
|
1027 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
|
1028 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
|
1029 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
|
1030 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
|
1031 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
|
1032 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
|
1033 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
|
1034 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
|
1035 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
|
1036 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
|
1037 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
|
1038 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1039 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1040 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
|
1041 } 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
|
1042 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
|
1043 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
|
1044 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1045 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
|
1046 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
|
1047 return new Image (this, imageData); |
18 | 1048 } |
1049 | |
26 | 1050 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
|
1051 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
|
1052 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
|
1053 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
|
1054 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
|
1055 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
|
1056 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
|
1057 pixbuf = OS.gdk_pixbuf_new (OS.GDK_COLORSPACE_RGB, true, 8, w, h ); |
71 | 1058 if (pixbuf is null) DWT.error (DWT.ERROR_NO_HANDLES); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1059 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
|
1060 auto maskPixbuf = OS.gdk_pixbuf_new(OS.GDK_COLORSPACE_RGB, false, 8, w, h); |
71 | 1061 if (maskPixbuf is null) DWT.error (DWT.ERROR_NO_HANDLES); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1062 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
|
1063 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
|
1064 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
|
1065 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
|
1066 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
|
1067 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
|
1068 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
|
1069 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
|
1070 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
|
1071 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
|
1072 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
|
1073 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
|
1074 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
|
1075 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
|
1076 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
|
1077 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1078 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1079 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
|
1080 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1081 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
|
1082 } 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
|
1083 ImageData data = image.getImageData (); |
71 | 1084 bool hasAlpha = data.getTransparencyType () is DWT.TRANSPARENCY_ALPHA; |
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
|
1085 pixbuf = OS.gdk_pixbuf_new (OS.GDK_COLORSPACE_RGB, hasAlpha, 8, w, h); |
71 | 1086 if (pixbuf is null) DWT.error (DWT.ERROR_NO_HANDLES); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1087 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
|
1088 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
|
1089 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
|
1090 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
|
1091 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
|
1092 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
|
1093 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
|
1094 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
|
1095 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
|
1096 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
|
1097 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
|
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 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
|
1100 } |
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 } |
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 } |
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 return pixbuf; |
18 | 1104 } |
1105 | |
240 | 1106 static void deregister (Display display) { |
1107 synchronized (Device.classinfo) { | |
1108 for (int i=0; i<Displays.length; i++) { | |
1109 if (display is Displays [i]) Displays [i] = null; | |
1110 } | |
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
|
1111 } |
18 | 1112 } |
1113 | |
1114 /** | |
1115 * Destroys the device in the operating system and releases | |
1116 * the device's handle. If the device does not have a handle, | |
1117 * this method may do nothing depending on the device. | |
1118 * <p> | |
1119 * This method is called after <code>release</code>. | |
1120 * </p> | |
1121 * @see Device#dispose | |
1122 * @see #release | |
1123 */ | |
152
17f8449522fd
overloads second walkthrough
Frank Benoit <benoit@tionex.de>
parents:
150
diff
changeset
|
1124 protected override 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
|
1125 if (this is Default) Default = null; |
240 | 1126 deregister (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
|
1127 destroyDisplay (); |
18 | 1128 } |
1129 | |
1130 void destroyDisplay () { | |
1131 } | |
1132 | |
240 | 1133 static extern(C) int /*long*/ emissionFunc (GSignalInvocationHint* ihint, uint n_param_values, GValue* param_values, void* data) { |
1134 auto cb = cast(CallbackData*)data; | |
1135 return cb.display.emissionProc( ihint, n_param_values, param_values, cb.data ); | |
1136 } | |
1137 | |
1138 int /*long*/ emissionProc (GSignalInvocationHint* ihint, uint n_param_values, GValue* param_values, void* data) { | |
1139 if (OS.gtk_widget_get_toplevel (OS.g_value_peek_pointer(param_values)) is data) { | |
1140 OS.gtk_widget_set_direction (OS.g_value_peek_pointer(param_values), OS.GTK_TEXT_DIR_RTL); | |
1141 } | |
1142 return 1; | |
1143 } | |
1144 | |
18 | 1145 /** |
1146 * Returns the display which the given thread is the | |
1147 * user-interface thread for, or null if the given thread | |
1148 * is not a user-interface thread for any display. Specifying | |
1149 * <code>null</code> as the thread will return <code>null</code> | |
1150 * for the display. | |
1151 * | |
1152 * @param thread the user-interface thread | |
1153 * @return the display for the given thread | |
1154 */ | |
240 | 1155 public static Display findDisplay (Thread thread) { |
1156 synchronized (Device.classinfo) { | |
1157 for (int i=0; i<Displays.length; i++) { | |
1158 Display display = Displays [i]; | |
1159 if (display !is null && display.thread is thread) { | |
1160 return display; | |
1161 } | |
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
|
1162 } |
240 | 1163 return 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
|
1164 } |
18 | 1165 } |
1166 | |
1167 /** | |
1168 * Causes the <code>run()</code> method of the runnable to | |
1169 * be invoked by the user-interface thread just before the | |
1170 * receiver is disposed. Specifying a <code>null</code> runnable | |
1171 * is ignored. | |
1172 * | |
1173 * @param runnable code to run at dispose time. | |
1174 * | |
71 | 1175 * @exception DWTException <ul> |
18 | 1176 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1177 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1178 * </ul> | |
1179 */ | |
1180 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
|
1181 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
|
1182 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
|
1183 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
|
1184 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
|
1185 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
|
1186 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
|
1187 } |
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 } |
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 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
|
1190 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
|
1191 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
|
1192 disposeList = newDisposeList; |
18 | 1193 } |
1194 | |
1195 /** | |
1196 * Does whatever display specific cleanup is required, and then | |
71 | 1197 * uses the code in <code>DWTError.error</code> to handle the error. |
18 | 1198 * |
1199 * @param code the descriptive error code | |
1200 * | |
71 | 1201 * @see DWTError#error |
18 | 1202 */ |
1203 void error (int code) { | |
71 | 1204 DWT.error (code); |
18 | 1205 } |
1206 | |
26 | 1207 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
|
1208 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
26 | 1209 Display disp = cast(Display)data; |
1210 disp.eventProcMeth(event); | |
1211 } | |
1212 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
|
1213 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1214 * 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
|
1215 * 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
|
1216 * 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
|
1217 * 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
|
1218 * 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
|
1219 * 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
|
1220 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1221 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
|
1222 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
|
1223 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1224 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
|
1225 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
|
1226 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
|
1227 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
|
1228 lastUserEventTime = time; |
54 | 1229 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
|
1230 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1231 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
|
1232 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
|
1233 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
|
1234 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
|
1235 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
|
1236 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
|
1237 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
|
1238 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1239 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1240 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1241 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
|
1242 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
|
1243 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
|
1244 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1245 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
|
1246 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
|
1247 return 0; |
18 | 1248 } |
1249 | |
1250 /** | |
1251 * Given the operating system handle for a widget, returns | |
1252 * the instance of the <code>Widget</code> subclass which | |
1253 * represents it in the currently running application, if | |
1254 * such exists, or null if no matching widget can be found. | |
1255 * <p> | |
1256 * <b>IMPORTANT:</b> This method should not be called from | |
1257 * application code. The arguments are platform-specific. | |
1258 * </p> | |
1259 * | |
1260 * @param handle the handle for the widget | |
71 | 1261 * @return the DWT widget that the handle represents |
18 | 1262 * |
71 | 1263 * @exception DWTException <ul> |
18 | 1264 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1265 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1266 * </ul> | |
1267 */ | |
26 | 1268 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
|
1269 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
|
1270 return getWidget (handle); |
18 | 1271 } |
1272 | |
1273 /** | |
1274 * Given the operating system handle for a widget, | |
1275 * and widget-specific id, returns the instance of | |
1276 * the <code>Widget</code> subclass which represents | |
1277 * the handle/id pair in the currently running application, | |
1278 * if such exists, or null if no matching widget can be found. | |
1279 * <p> | |
1280 * <b>IMPORTANT:</b> This method should not be called from | |
1281 * application code. The arguments are platform-specific. | |
1282 * </p> | |
1283 * | |
1284 * @param handle the handle for the widget | |
1285 * @param id the id for the subwidget (usually an item) | |
71 | 1286 * @return the DWT widget that the handle/id pair represents |
18 | 1287 * |
71 | 1288 * @exception DWTException <ul> |
18 | 1289 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1290 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1291 * </ul> | |
1292 * | |
1293 * @since 3.1 | |
1294 */ | |
26 | 1295 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
|
1296 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
|
1297 return null; |
18 | 1298 } |
1299 | |
1300 /** | |
1301 * Given a widget and a widget-specific id, returns the | |
1302 * instance of the <code>Widget</code> subclass which represents | |
1303 * the widget/id pair in the currently running application, | |
1304 * if such exists, or null if no matching widget can be found. | |
1305 * | |
1306 * @param widget the widget | |
1307 * @param id the id for the subwidget (usually an item) | |
71 | 1308 * @return the DWT subwidget (usually an item) that the widget/id pair represents |
18 | 1309 * |
71 | 1310 * @exception DWTException <ul> |
18 | 1311 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1312 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1313 * </ul> | |
1314 * | |
1315 * @since 3.3 | |
1316 */ | |
240 | 1317 public Widget findWidget (Widget widget, int /*long*/ 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
|
1318 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
|
1319 return null; |
18 | 1320 } |
1321 | |
26 | 1322 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
|
1323 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
|
1324 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
|
1325 klass.map = &fixedMapProcFunc; |
240 | 1326 oldFixedSizeAllocateProc = klass.size_allocate; |
1327 klass.size_allocate = &fixedSizeAllocateProc; | |
18 | 1328 } |
1329 | |
26 | 1330 private static extern(C) void fixedMapProcFunc (GtkWidget * handle) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1331 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
|
1332 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
|
1333 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
|
1334 if (widget !is null) widget.fixedMapProc (handle); |
18 | 1335 } |
1336 | |
240 | 1337 private static extern(C) static void fixedSizeAllocateProc (GtkWidget* handle, GtkAllocation* allocation) { |
1338 Display display = getCurrent (); | |
1339 Widget widget = display.getWidget (handle); | |
1340 if (widget !is null) return widget.fixedSizeAllocateProc (handle, allocation); | |
1341 return oldFixedSizeAllocateProc(handle, allocation); | |
1342 } | |
1343 | |
26 | 1344 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
|
1345 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
26 | 1346 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
|
1347 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
|
1348 klass.get_size = &rendererGetSizeProcFunc; |
240 | 1349 |
18 | 1350 } |
89
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
1351 private static extern(C) void rendererGetSizeProcFunc( |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
1352 GtkCellRenderer *cell, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
1353 GtkWidget *handle, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
1354 GdkRectangle *cell_area, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
1355 int *x_offset, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
1356 int *y_offset, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
1357 int *width, |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
1358 int *height) |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
1359 { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
1360 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
|
1361 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
|
1362 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
|
1363 if (widget !is null) widget.rendererGetSizeProc (cell, handle, cell_area, x_offset, y_offset, width, height); |
26 | 1364 } |
1365 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
|
1366 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
|
1367 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
|
1368 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
|
1369 if (widget !is null) widget.rendererRenderProc (cell, window, handle, background_area, cell_area, expose_area, flags); |
18 | 1370 } |
1371 | |
26 | 1372 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
|
1373 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
|
1374 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
|
1375 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
|
1376 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
|
1377 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
|
1378 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
|
1379 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
|
1380 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
|
1381 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
|
1382 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
|
1383 } |
18 | 1384 } |
1385 | |
1386 /** | |
1387 * Returns the currently active <code>Shell</code>, or null | |
1388 * if no shell belonging to the currently running application | |
1389 * is active. | |
1390 * | |
1391 * @return the active shell or null | |
1392 * | |
71 | 1393 * @exception DWTException <ul> |
18 | 1394 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1395 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1396 * </ul> | |
1397 */ | |
1398 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
|
1399 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
|
1400 return activeShell; |
18 | 1401 } |
1402 | |
1403 /** | |
259 | 1404 * Returns a rectangle describing the receiver's size and location. Note that |
1405 * on multi-monitor systems the origin can be negative. | |
18 | 1406 * |
1407 * @return the bounding rectangle | |
1408 * | |
71 | 1409 * @exception DWTException <ul> |
18 | 1410 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1411 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1412 * </ul> | |
1413 */ | |
150
f2e04420fd6c
reworked overrides and superclass aliases
Frank Benoit <benoit@tionex.de>
parents:
124
diff
changeset
|
1414 public override 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
|
1415 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
|
1416 return new Rectangle (0, 0, OS.gdk_screen_width (), OS.gdk_screen_height ()); |
18 | 1417 } |
1418 | |
1419 /** | |
1420 * Returns the display which the currently running thread is | |
1421 * the user-interface thread for, or null if the currently | |
1422 * running thread is not a user-interface thread for any display. | |
1423 * | |
1424 * @return the current display | |
1425 */ | |
240 | 1426 public static Display getCurrent () { |
1427 return findDisplay (Thread.getThis ()); | |
18 | 1428 } |
1429 | |
1430 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
|
1431 // 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
|
1432 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
|
1433 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
|
1434 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
|
1435 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
|
1436 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
|
1437 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
|
1438 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
|
1439 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1440 * 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
|
1441 * 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
|
1442 * 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
|
1443 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1444 return buffer / 2; |
18 | 1445 } |
1446 | |
1447 /** | |
1448 * Returns the control which the on-screen pointer is currently | |
1449 * over top of, or null if it is not currently over one of the | |
1450 * controls built by the currently running application. | |
1451 * | |
1452 * @return the control under the cursor | |
1453 * | |
71 | 1454 * @exception DWTException <ul> |
18 | 1455 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1456 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1457 * </ul> | |
1458 */ | |
1459 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
|
1460 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
|
1461 int x, y; |
240 | 1462 GtkWidget* handle; |
1463 GtkWidget* 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
|
1464 auto window = OS.gdk_window_at_pointer (&x, &y); |
240 | 1465 if (window !is null) { |
1466 OS.gdk_window_get_user_data (window, cast(void**)&user_data); | |
1467 handle = user_data; | |
1468 } else { | |
1469 /* | |
1470 * Feature in GTK. gdk_window_at_pointer() will not return a window | |
1471 * if the pointer is over a foreign embedded window. The fix is to use | |
1472 * XQueryPointer to find the containing GDK window. | |
1473 */ | |
1474 if (!OS.GDK_WINDOWING_X11 ()) return null; | |
1475 OS.gdk_error_trap_push (); | |
1476 int unusedInt; | |
1477 uint unusedUInt; | |
1478 uint unusedPtr; | |
1479 uint buffer; | |
1480 uint xWindow, xParent = OS.XDefaultRootWindow (xDisplay); | |
1481 do { | |
1482 if (OS.XQueryPointer (xDisplay, xParent, &unusedPtr, &buffer, &unusedInt, &unusedInt, &unusedInt, &unusedInt, &unusedUInt) is 0) { | |
1483 handle = null; | |
1484 break; | |
1485 } | |
1486 if ((xWindow = buffer) !is 0) { | |
1487 xParent = xWindow; | |
1488 auto gdkWindow = OS.gdk_window_lookup (xWindow); | |
259 | 1489 if (gdkWindow !is null) { |
240 | 1490 OS.gdk_window_get_user_data (gdkWindow, cast(void**)&user_data); |
1491 if (user_data !is null) handle = user_data; | |
1492 } | |
1493 } | |
1494 } while (xWindow !is 0); | |
1495 OS.gdk_error_trap_pop (); | |
1496 } | |
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
|
1497 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
|
1498 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
|
1499 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
|
1500 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
|
1501 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
|
1502 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
|
1503 } |
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 } 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
|
1505 return null; |
18 | 1506 } |
1507 | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
1508 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
|
1509 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
|
1510 return false; |
18 | 1511 } |
1512 | |
25
fc2b263b8a3f
Merged back the System.arraycopy and use a System class
Frank Benoit <benoit@tionex.de>
parents:
18
diff
changeset
|
1513 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
|
1514 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
|
1515 return filterTable.hooks (eventType); |
18 | 1516 } |
1517 | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1518 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
|
1519 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 1520 auto callbackdata = cast(CallbackData*)data; |
1521 auto disp = callbackdata.display; | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1522 if( disp is null ) return 0; |
54 | 1523 auto res = disp.filterProcMeth(xEvent,gdkEvent,callbackdata); |
1524 return res; | |
27 | 1525 } |
1526 | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1527 int filterProcMeth (GdkXEvent* xEvent, GdkEvent* gdkEvent, CallbackData* callbackData) { |
27 | 1528 if( callbackData.data is null ){ |
1529 /* | |
1530 * Feature in GTK. When button 4, 5, 6, or 7 is released, GTK | |
1531 * does not deliver a corresponding GTK event. Button 6 and 7 | |
71 | 1532 * are mapped to buttons 4 and 5 in DWT. The fix is to change |
27 | 1533 * the button number of the event to a negative number so that |
71 | 1534 * it gets dispatched by GTK. DWT has been modified to look |
27 | 1535 * for negative button numbers. |
1536 */ | |
1537 XButtonEvent* mouseEvent = cast(XButtonEvent*) xEvent; | |
1538 if (mouseEvent.type is OS.ButtonRelease) { | |
1539 switch (mouseEvent.button) { | |
1540 case 6: | |
1541 case 7: | |
1542 mouseEvent.button = -mouseEvent.button; | |
1543 break; | |
54 | 1544 default: |
27 | 1545 } |
1546 } | |
1547 } | |
1548 Widget widget = getWidget (cast(GtkWidget*)callbackData.data); | |
33
27324bbbac70
changed to regenerated BCD bindings
Frank Benoit <benoit@tionex.de>
parents:
30
diff
changeset
|
1549 if (widget is null) return 0; |
38 | 1550 return widget.filterProc (cast(XEvent*)xEvent, gdkEvent, callbackData.data); |
27 | 1551 } |
1552 | |
1553 /** | |
1554 * Returns the location of the on-screen pointer relative | |
1555 * to the top left corner of the screen. | |
1556 * | |
1557 * @return the cursor location | |
1558 * | |
71 | 1559 * @exception DWTException <ul> |
27 | 1560 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1561 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1562 * </ul> | |
1563 */ | |
1564 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
|
1565 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
|
1566 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
|
1567 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
|
1568 return new Point (x, y); |
27 | 1569 } |
1570 | |
1571 /** | |
1572 * Returns an array containing the recommended cursor sizes. | |
1573 * | |
1574 * @return the array of cursor sizes | |
1575 * | |
71 | 1576 * @exception DWTException <ul> |
27 | 1577 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1578 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1579 * </ul> | |
1580 * | |
1581 * @since 3.0 | |
1582 */ | |
1583 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
|
1584 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
|
1585 return [new Point (16, 16), new Point (32, 32)]; |
18 | 1586 } |
1587 | |
27 | 1588 /** |
1589 * Returns the application defined property of the receiver | |
1590 * with the specified name, or null if it has not been set. | |
1591 * <p> | |
1592 * Applications may have associated arbitrary objects with the | |
1593 * receiver in this fashion. If the objects stored in the | |
1594 * properties need to be notified when the display is disposed | |
1595 * of, it is the application's responsibility to provide a | |
1596 * <code>disposeExec()</code> handler which does so. | |
1597 * </p> | |
1598 * | |
1599 * @param key the name of the property | |
1600 * @return the value of the property or null if it has not been set | |
1601 * | |
71 | 1602 * @exception DWTException <ul> |
27 | 1603 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1604 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1605 * </ul> | |
1606 * | |
1607 * @see #setData(String, Object) | |
1608 * @see #disposeExec(Runnable) | |
1609 */ | |
238 | 1610 public Object getData (String 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
|
1611 checkDevice (); |
255
5a30aa9820f3
removed tango.stdc.stringz imports and allow null for arrays and string arguments.
Frank Benoit <benoit@tionex.de>
parents:
254
diff
changeset
|
1612 // DWT extension: allow null for zero length string |
5a30aa9820f3
removed tango.stdc.stringz imports and allow null for arrays and string arguments.
Frank Benoit <benoit@tionex.de>
parents:
254
diff
changeset
|
1613 //if (key is null) error (DWT.ERROR_NULL_ARGUMENT); |
240 | 1614 if (key.equals (DISPATCH_EVENT_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
|
1615 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
|
1616 } |
240 | 1617 if (key.equals (GET_MODAL_DIALOG)) { |
1618 return modalDialog; | |
1619 } | |
1620 if (key.equals (GET_DIRECTION_PROC_KEY)) { | |
1621 return new LONG (cast(int) &setDirectionProcFunc); | |
1622 } | |
1623 if (key.equals (GET_EMISSION_PROC_KEY)) { | |
1624 return new LONG (cast(int) &emissionFunc); | |
1625 } | |
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
|
1626 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
|
1627 for (int i=0; i<keys.length; i++) { |
240 | 1628 if (keys [i].equals(key)) return values [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
|
1629 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1630 return null; |
18 | 1631 } |
27 | 1632 |
1633 /** | |
1634 * Returns the application defined, display specific data | |
1635 * associated with the receiver, or null if it has not been | |
1636 * set. The <em>display specific data</em> is a single, | |
1637 * unnamed field that is stored with every display. | |
1638 * <p> | |
1639 * Applications may put arbitrary objects in this field. If | |
1640 * the object stored in the display specific data needs to | |
1641 * be notified when the display is disposed of, it is the | |
1642 * application's responsibility to provide a | |
1643 * <code>disposeExec()</code> handler which does so. | |
1644 * </p> | |
1645 * | |
1646 * @return the display specific data | |
1647 * | |
71 | 1648 * @exception DWTException <ul> |
27 | 1649 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1650 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1651 * </ul> | |
1652 * | |
1653 * @see #setData(Object) | |
1654 * @see #disposeExec(Runnable) | |
1655 */ | |
1656 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
|
1657 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
|
1658 return data; |
27 | 1659 } |
1660 | |
1661 /** | |
1662 * Returns a point whose x coordinate is the horizontal | |
1663 * dots per inch of the display, and whose y coordinate | |
1664 * is the vertical dots per inch of the display. | |
1665 * | |
1666 * @return the horizontal and vertical DPI | |
1667 * | |
71 | 1668 * @exception DWTException <ul> |
27 | 1669 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1670 * </ul> | |
1671 */ | |
150
f2e04420fd6c
reworked overrides and superclass aliases
Frank Benoit <benoit@tionex.de>
parents:
124
diff
changeset
|
1672 public override 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
|
1673 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
|
1674 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
|
1675 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
|
1676 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
|
1677 return new Point (dpi, dpi); |
27 | 1678 } |
1679 | |
1680 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
|
1681 return fixed_type; |
27 | 1682 } |
1683 | |
1684 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
|
1685 return text_renderer_type; |
27 | 1686 } |
1687 | |
1688 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
|
1689 return pixbuf_renderer_type; |
27 | 1690 } |
1691 | |
1692 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
|
1693 return toggle_renderer_type; |
27 | 1694 } |
1695 | |
1696 /** | |
1697 * Returns the default display. One is created (making the | |
1698 * thread that invokes this method its user-interface thread) | |
1699 * if it did not already exist. | |
1700 * | |
1701 * @return the default display | |
1702 */ | |
240 | 1703 public static Display getDefault () { |
1704 synchronized (Device.classinfo) { | |
1705 if (Default is null) Default = new Display (); | |
1706 return Default; | |
1707 } | |
18 | 1708 } |
27 | 1709 |
26 | 1710 // /+static bool isValidClass (Class clazz) { |
238 | 1711 // //PORTING_TODO String name = clazz.getName (); |
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
|
1712 // //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
|
1713 // //PORTING_TODO return name.substring (0, index + 1)==/*eq*/ PACKAGE_PREFIX; |
26 | 1714 // return true; |
1715 // }+/ | |
27 | 1716 |
1717 /** | |
1718 * Returns the button dismissal alignment, one of <code>LEFT</code> or <code>RIGHT</code>. | |
1719 * The button dismissal alignment is the ordering that should be used when positioning the | |
1720 * default dismissal button for a dialog. For example, in a dialog that contains an OK and | |
1721 * CANCEL button, on platforms where the button dismissal alignment is <code>LEFT</code>, the | |
1722 * button ordering should be OK/CANCEL. When button dismissal alignment is <code>RIGHT</code>, | |
1723 * the button ordering should be CANCEL/OK. | |
1724 * | |
1725 * @return the button dismissal order | |
1726 * | |
71 | 1727 * @exception DWTException <ul> |
27 | 1728 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1729 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1730 * </ul> | |
1731 * | |
1732 * @since 2.1 | |
1733 */ | |
1734 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
|
1735 checkDevice (); |
71 | 1736 return DWT.RIGHT; |
27 | 1737 } |
1738 | |
1739 /** | |
1740 * Returns the longest duration, in milliseconds, between | |
1741 * two mouse button clicks that will be considered a | |
1742 * <em>double click</em> by the underlying operating system. | |
1743 * | |
1744 * @return the double click time | |
1745 * | |
71 | 1746 * @exception DWTException <ul> |
27 | 1747 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1748 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1749 * </ul> | |
1750 */ | |
1751 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
|
1752 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
|
1753 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
|
1754 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
|
1755 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
|
1756 return buffer; |
27 | 1757 } |
1758 | |
1759 /** | |
1760 * Returns the control which currently has keyboard focus, | |
1761 * or null if keyboard events are not currently going to | |
1762 * any of the controls built by the currently running | |
1763 * application. | |
1764 * | |
1765 * @return the control under the cursor | |
1766 * | |
71 | 1767 * @exception DWTException <ul> |
27 | 1768 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1769 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1770 * </ul> | |
1771 */ | |
1772 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
|
1773 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
|
1774 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
|
1775 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
|
1776 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1777 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
|
1778 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
|
1779 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
|
1780 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
|
1781 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
|
1782 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
|
1783 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
|
1784 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
|
1785 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
|
1786 } |
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 } 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
|
1788 return null; |
27 | 1789 } |
1790 | |
1791 /** | |
1792 * Returns true when the high contrast mode is enabled. | |
1793 * Otherwise, false is returned. | |
1794 * <p> | |
1795 * Note: This operation is a hint and is not supported on | |
1796 * platforms that do not have this concept. | |
1797 * </p> | |
1798 * | |
1799 * @return the high contrast mode | |
1800 * | |
71 | 1801 * @exception DWTException <ul> |
27 | 1802 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1803 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1804 * </ul> | |
1805 * | |
1806 * @since 3.0 | |
1807 */ | |
1808 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
|
1809 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
|
1810 return false; |
27 | 1811 } |
1812 | |
150
f2e04420fd6c
reworked overrides and superclass aliases
Frank Benoit <benoit@tionex.de>
parents:
124
diff
changeset
|
1813 public override 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
|
1814 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
|
1815 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
|
1816 return visual.depth; |
27 | 1817 } |
1818 | |
1819 /** | |
1820 * Returns the maximum allowed depth of icons on this display, in bits per pixel. | |
1821 * On some platforms, this may be different than the actual depth of the display. | |
1822 * | |
1823 * @return the maximum icon depth | |
1824 * | |
71 | 1825 * @exception DWTException <ul> |
27 | 1826 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1827 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1828 * </ul> | |
1829 * | |
1830 * @see Device#getDepth | |
1831 */ | |
1832 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
|
1833 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
|
1834 return getDepth (); |
27 | 1835 } |
1836 | |
1837 /** | |
1838 * Returns an array containing the recommended icon sizes. | |
1839 * | |
1840 * @return the array of icon sizes | |
1841 * | |
71 | 1842 * @exception DWTException <ul> |
27 | 1843 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1844 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1845 * </ul> | |
1846 * | |
1847 * @see Decorations#setImages(Image[]) | |
1848 * | |
1849 * @since 3.0 | |
1850 */ | |
1851 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
|
1852 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
|
1853 return [new Point (16, 16), new Point (32, 32)]; |
27 | 1854 } |
1855 | |
1856 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
|
1857 return lastEventTime; |
27 | 1858 } |
1859 | |
1860 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
|
1861 return synchronizer.getMessageCount (); |
27 | 1862 } |
1863 | |
240 | 1864 Dialog getModalDialog () { |
1865 return modalDialog; | |
1866 } | |
1867 | |
27 | 1868 /** |
1869 * Returns the work area, an EWMH property to store the size | |
1870 * and position of the screen not covered by dock and panel | |
1871 * windows. See http://freedesktop.org/Standards/wm-spec. | |
1872 */ | |
1873 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
|
1874 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
|
1875 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
|
1876 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
|
1877 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
|
1878 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
|
1879 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
|
1880 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
|
1881 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
|
1882 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1883 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
|
1884 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
|
1885 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
|
1886 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
|
1887 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
|
1888 } 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
|
1889 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
|
1890 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
|
1891 } |
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 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
|
1893 } |
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 return result; |
27 | 1895 } |
1896 | |
1897 /** | |
1898 * Returns an array of monitors attached to the device. | |
1899 * | |
1900 * @return the array of monitors | |
1901 * | |
1902 * @since 3.0 | |
1903 */ | |
1904 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
|
1905 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
|
1906 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
|
1907 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
|
1908 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
|
1909 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
|
1910 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
|
1911 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
|
1912 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
|
1913 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
|
1914 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
|
1915 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
|
1916 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
|
1917 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
|
1918 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
|
1919 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
|
1920 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
|
1921 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
|
1922 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
|
1923 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
|
1924 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
|
1925 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
|
1926 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
|
1927 } 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
|
1928 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
|
1929 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
|
1930 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
|
1931 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
|
1932 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1933 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
|
1934 } |
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 } |
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 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1937 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
|
1938 /* 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
|
1939 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
|
1940 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
|
1941 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
|
1942 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
|
1943 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
|
1944 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
|
1945 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
|
1946 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
|
1947 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
|
1948 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
|
1949 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
|
1950 } 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
|
1951 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
|
1952 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
|
1953 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
|
1954 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
|
1955 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1956 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
|
1957 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1958 return monitors; |
27 | 1959 } |
1960 | |
1961 /** | |
1962 * Returns the primary monitor for that device. | |
1963 * | |
1964 * @return the primary monitor | |
1965 * | |
1966 * @since 3.0 | |
1967 */ | |
1968 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
|
1969 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
|
1970 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
|
1971 return monitors [0]; |
27 | 1972 } |
1973 | |
1974 /** | |
1975 * Returns a (possibly empty) array containing all shells which have | |
1976 * not been disposed and have the receiver as their display. | |
1977 * | |
1978 * @return the receiver's shells | |
1979 * | |
71 | 1980 * @exception DWTException <ul> |
27 | 1981 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
1982 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
1983 * </ul> | |
1984 */ | |
1985 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
|
1986 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
|
1987 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
|
1988 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
|
1989 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
|
1990 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
|
1991 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
|
1992 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
|
1993 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
|
1994 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
|
1995 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
|
1996 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
1997 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
|
1998 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
|
1999 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
|
2000 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
|
2001 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
|
2002 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2003 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
|
2004 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2005 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2006 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2007 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
|
2008 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
|
2009 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
|
2010 return newResult; |
27 | 2011 } |
2012 | |
2013 /** | |
240 | 2014 * Gets the synchronizer used by the display. |
2015 * | |
2016 * @return the receiver's synchronizer | |
2017 * | |
2018 * @exception DWTException <ul> | |
2019 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> | |
2020 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2021 * </ul> | |
2022 * | |
2023 * @since 3.4 | |
2024 */ | |
2025 public Synchronizer getSynchronizer () { | |
2026 checkDevice (); | |
2027 return synchronizer; | |
2028 } | |
2029 | |
2030 /** | |
27 | 2031 * Returns the thread that has invoked <code>syncExec</code> |
2032 * or null if no such runnable is currently being invoked by | |
2033 * the user-interface thread. | |
2034 * <p> | |
2035 * Note: If a runnable invoked by asyncExec is currently | |
2036 * running, this method will return null. | |
2037 * </p> | |
2038 * | |
2039 * @return the receiver's sync-interface thread | |
2040 * | |
71 | 2041 * @exception DWTException <ul> |
27 | 2042 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> |
2043 * </ul> | |
2044 */ | |
2045 public Thread getSyncThread () { | |
240 | 2046 synchronized (Device.classinfo) { |
2047 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED); | |
2048 return synchronizer.syncThread; | |
2049 } | |
27 | 2050 } |
2051 | |
2052 /** | |
2053 * Returns the matching standard color for the given | |
2054 * constant, which should be one of the color constants | |
71 | 2055 * specified in class <code>DWT</code>. Any value other |
2056 * than one of the DWT color constants which is passed | |
27 | 2057 * in will result in the color black. This color should |
2058 * not be free'd because it was allocated by the system, | |
2059 * not the application. | |
2060 * | |
2061 * @param id the color constant | |
2062 * @return the matching color | |
2063 * | |
71 | 2064 * @exception DWTException <ul> |
27 | 2065 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
2066 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2067 * </ul> | |
2068 * | |
71 | 2069 * @see DWT |
27 | 2070 */ |
150
f2e04420fd6c
reworked overrides and superclass aliases
Frank Benoit <benoit@tionex.de>
parents:
124
diff
changeset
|
2071 public override 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
|
2072 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
|
2073 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
|
2074 switch (id) { |
71 | 2075 case DWT.COLOR_INFO_FOREGROUND: gdkColor = COLOR_INFO_FOREGROUND; break; |
2076 case DWT.COLOR_INFO_BACKGROUND: gdkColor = COLOR_INFO_BACKGROUND; break; | |
2077 case DWT.COLOR_TITLE_FOREGROUND: gdkColor = COLOR_TITLE_FOREGROUND; break; | |
2078 case DWT.COLOR_TITLE_BACKGROUND: gdkColor = COLOR_TITLE_BACKGROUND; break; | |
2079 case DWT.COLOR_TITLE_BACKGROUND_GRADIENT: gdkColor = COLOR_TITLE_BACKGROUND_GRADIENT; break; | |
2080 case DWT.COLOR_TITLE_INACTIVE_FOREGROUND: gdkColor = COLOR_TITLE_INACTIVE_FOREGROUND; break; | |
2081 case DWT.COLOR_TITLE_INACTIVE_BACKGROUND: gdkColor = COLOR_TITLE_INACTIVE_BACKGROUND; break; | |
2082 case DWT.COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT: gdkColor = COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT; break; | |
2083 case DWT.COLOR_WIDGET_DARK_SHADOW: gdkColor = COLOR_WIDGET_DARK_SHADOW; break; | |
2084 case DWT.COLOR_WIDGET_NORMAL_SHADOW: gdkColor = COLOR_WIDGET_NORMAL_SHADOW; break; | |
2085 case DWT.COLOR_WIDGET_LIGHT_SHADOW: gdkColor = COLOR_WIDGET_LIGHT_SHADOW; break; | |
2086 case DWT.COLOR_WIDGET_HIGHLIGHT_SHADOW: gdkColor = COLOR_WIDGET_HIGHLIGHT_SHADOW; break; | |
2087 case DWT.COLOR_WIDGET_BACKGROUND: gdkColor = COLOR_WIDGET_BACKGROUND; break; | |
2088 case DWT.COLOR_WIDGET_FOREGROUND: gdkColor = COLOR_WIDGET_FOREGROUND; break; | |
2089 case DWT.COLOR_WIDGET_BORDER: gdkColor = COLOR_WIDGET_BORDER; break; | |
2090 case DWT.COLOR_LIST_FOREGROUND: gdkColor = COLOR_LIST_FOREGROUND; break; | |
2091 case DWT.COLOR_LIST_BACKGROUND: gdkColor = COLOR_LIST_BACKGROUND; break; | |
2092 case DWT.COLOR_LIST_SELECTION: gdkColor = COLOR_LIST_SELECTION; break; | |
2093 case DWT.COLOR_LIST_SELECTION_TEXT: gdkColor = COLOR_LIST_SELECTION_TEXT; break; | |
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
|
2094 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
|
2095 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
|
2096 } |
71 | 2097 if (gdkColor is null) return super.getSystemColor (DWT.COLOR_BLACK); |
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
|
2098 return Color.gtk_new (this, gdkColor); |
27 | 2099 } |
2100 | |
2101 /** | |
2102 * Returns the matching standard platform cursor for the given | |
2103 * constant, which should be one of the cursor constants | |
71 | 2104 * specified in class <code>DWT</code>. This cursor should |
27 | 2105 * not be free'd because it was allocated by the system, |
2106 * not the application. A value of <code>null</code> will | |
71 | 2107 * be returned if the supplied constant is not an DWT cursor |
27 | 2108 * constant. |
2109 * | |
71 | 2110 * @param id the DWT cursor constant |
27 | 2111 * @return the corresponding cursor or <code>null</code> |
2112 * | |
71 | 2113 * @exception DWTException <ul> |
27 | 2114 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
2115 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2116 * </ul> | |
2117 * | |
71 | 2118 * @see DWT#CURSOR_ARROW |
2119 * @see DWT#CURSOR_WAIT | |
2120 * @see DWT#CURSOR_CROSS | |
2121 * @see DWT#CURSOR_APPSTARTING | |
2122 * @see DWT#CURSOR_HELP | |
2123 * @see DWT#CURSOR_SIZEALL | |
2124 * @see DWT#CURSOR_SIZENESW | |
2125 * @see DWT#CURSOR_SIZENS | |
2126 * @see DWT#CURSOR_SIZENWSE | |
2127 * @see DWT#CURSOR_SIZEWE | |
2128 * @see DWT#CURSOR_SIZEN | |
2129 * @see DWT#CURSOR_SIZES | |
2130 * @see DWT#CURSOR_SIZEE | |
2131 * @see DWT#CURSOR_SIZEW | |
2132 * @see DWT#CURSOR_SIZENE | |
2133 * @see DWT#CURSOR_SIZESE | |
2134 * @see DWT#CURSOR_SIZESW | |
2135 * @see DWT#CURSOR_SIZENW | |
2136 * @see DWT#CURSOR_UPARROW | |
2137 * @see DWT#CURSOR_IBEAM | |
2138 * @see DWT#CURSOR_NO | |
2139 * @see DWT#CURSOR_HAND | |
27 | 2140 * |
2141 * @since 3.0 | |
2142 */ | |
2143 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
|
2144 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
|
2145 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
|
2146 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
|
2147 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
|
2148 } |
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 return cursors [id]; |
27 | 2150 } |
2151 | |
2152 /** | |
2153 * Returns the matching standard platform image for the given | |
2154 * constant, which should be one of the icon constants | |
71 | 2155 * specified in class <code>DWT</code>. This image should |
27 | 2156 * not be free'd because it was allocated by the system, |
2157 * not the application. A value of <code>null</code> will | |
2158 * be returned either if the supplied constant is not an | |
71 | 2159 * DWT icon constant or if the platform does not define an |
27 | 2160 * image that corresponds to the constant. |
2161 * | |
71 | 2162 * @param id the DWT icon constant |
27 | 2163 * @return the corresponding image or <code>null</code> |
2164 * | |
71 | 2165 * @exception DWTException <ul> |
27 | 2166 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
2167 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2168 * </ul> | |
2169 * | |
71 | 2170 * @see DWT#ICON_ERROR |
2171 * @see DWT#ICON_INFORMATION | |
2172 * @see DWT#ICON_QUESTION | |
2173 * @see DWT#ICON_WARNING | |
2174 * @see DWT#ICON_WORKING | |
27 | 2175 * |
2176 * @since 3.0 | |
2177 */ | |
2178 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
|
2179 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
|
2180 switch (id) { |
71 | 2181 case DWT.ICON_ERROR: |
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
|
2182 if (errorImage is null) { |
240 | 2183 errorImage = createImage ("gtk-dialog-error"); //$NON-NLS-1$ |
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
|
2184 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2185 return errorImage; |
71 | 2186 case DWT.ICON_INFORMATION: |
2187 case DWT.ICON_WORKING: | |
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
|
2188 if (infoImage is null) { |
240 | 2189 infoImage = createImage ("gtk-dialog-info"); //$NON-NLS-1$ |
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
|
2190 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2191 return infoImage; |
71 | 2192 case DWT.ICON_QUESTION: |
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
|
2193 if (questionImage is null) { |
240 | 2194 questionImage = createImage ("gtk-dialog-question"); //$NON-NLS-1$ |
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
|
2195 } |
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 questionImage; |
71 | 2197 case DWT.ICON_WARNING: |
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
|
2198 if (warningImage is null) { |
240 | 2199 warningImage = createImage ("gtk-dialog-warning"); //$NON-NLS-1$ |
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
|
2200 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2201 return warningImage; |
54 | 2202 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
|
2203 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2204 return null; |
27 | 2205 } |
2206 | |
2207 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
|
2208 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
|
2209 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2210 /* 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
|
2211 auto tooltipShellHandle = OS.gtk_window_new (OS.GTK_WINDOW_POPUP); |
71 | 2212 if (tooltipShellHandle is null) DWT.error (DWT.ERROR_NO_HANDLES); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2213 // 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
|
2214 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
|
2215 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
|
2216 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
|
2217 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
|
2218 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
|
2219 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
|
2220 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
|
2221 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
|
2222 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
|
2223 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
|
2224 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2225 /* 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
|
2226 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
|
2227 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
|
2228 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
|
2229 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
|
2230 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
|
2231 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
|
2232 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
|
2233 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
|
2234 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
|
2235 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
|
2236 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
|
2237 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
|
2238 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
|
2239 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
|
2240 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
|
2241 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
|
2242 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
|
2243 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
|
2244 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
|
2245 //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
|
2246 //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
|
2247 //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
|
2248 //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
|
2249 //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
|
2250 //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
|
2251 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
|
2252 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
|
2253 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
|
2254 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
|
2255 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
|
2256 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
|
2257 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
|
2258 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
|
2259 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
|
2260 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
|
2261 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
|
2262 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
|
2263 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
|
2264 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
|
2265 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
|
2266 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
|
2267 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
|
2268 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
|
2269 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
|
2270 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
|
2271 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
|
2272 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
|
2273 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
|
2274 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
|
2275 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
|
2276 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
|
2277 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
|
2278 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
|
2279 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
|
2280 COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT = gdkColor; |
27 | 2281 } |
2282 | |
2283 /** | |
2284 * Returns a reasonable font for applications to use. | |
2285 * On some platforms, this will match the "default font" | |
2286 * or "system font" if such can be found. This font | |
2287 * should not be free'd because it was allocated by the | |
2288 * system, not the application. | |
2289 * <p> | |
2290 * Typically, applications which want the default look | |
2291 * should simply not set the font on the widgets they | |
2292 * create. Widgets are always created with the correct | |
2293 * default font for the class of user-interface component | |
2294 * they represent. | |
2295 * </p> | |
2296 * | |
2297 * @return a font | |
2298 * | |
71 | 2299 * @exception DWTException <ul> |
27 | 2300 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
2301 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2302 * </ul> | |
2303 */ | |
150
f2e04420fd6c
reworked overrides and superclass aliases
Frank Benoit <benoit@tionex.de>
parents:
124
diff
changeset
|
2304 public override 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
|
2305 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
|
2306 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
|
2307 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
|
2308 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
|
2309 return systemFont = Font.gtk_new (this, defaultFont); |
27 | 2310 } |
2311 | |
2312 /** | |
2313 * Returns the single instance of the system tray or null | |
2314 * when there is no system tray available for the platform. | |
2315 * | |
2316 * @return the system tray or <code>null</code> | |
2317 * | |
71 | 2318 * @exception DWTException <ul> |
27 | 2319 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> |
2320 * </ul> | |
2321 * | |
2322 * @since 3.0 | |
2323 */ | |
2324 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
|
2325 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
|
2326 if (tray !is null) return tray; |
71 | 2327 return tray = new Tray (this, DWT.NONE); |
27 | 2328 } |
2329 | |
2330 /** | |
2331 * Returns the user-interface thread for the receiver. | |
2332 * | |
2333 * @return the receiver's user-interface thread | |
2334 * | |
71 | 2335 * @exception DWTException <ul> |
27 | 2336 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> |
2337 * </ul> | |
2338 */ | |
2339 public Thread getThread () { | |
240 | 2340 synchronized (Device.classinfo) { |
2341 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED); | |
2342 return thread; | |
2343 } | |
27 | 2344 } |
2345 | |
26 | 2346 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
|
2347 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
|
2348 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
|
2349 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
|
2350 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
|
2351 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
|
2352 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
|
2353 } |
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 return null; |
18 | 2355 } |
2356 | |
26 | 2357 private static extern(C) int idleProcFunc (void* data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2358 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 2359 auto dbdata = cast(CallbackData*)data; |
2360 return dbdata.display.idleProc(); | |
26 | 2361 } |
27 | 2362 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
|
2363 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
|
2364 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
|
2365 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
|
2366 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
|
2367 } |
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 } |
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 return result ? 1 : 0; |
26 | 2370 return 0; |
18 | 2371 } |
27 | 2372 |
2373 /** | |
2374 * Initializes any internal resources needed by the | |
2375 * device. | |
2376 * <p> | |
2377 * This method is called after <code>create</code>. | |
2378 * </p> | |
2379 * | |
2380 * @see #create | |
2381 */ | |
218 | 2382 protected override void init_ () { |
2383 super.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
|
2384 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
|
2385 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
|
2386 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
|
2387 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
|
2388 initializeWindowManager (); |
27 | 2389 } |
2390 | |
2391 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
|
2392 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
|
2393 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
|
2394 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2395 /* 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
|
2396 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
|
2397 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
|
2398 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
|
2399 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
|
2400 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
|
2401 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
|
2402 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
|
2403 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
|
2404 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
|
2405 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
|
2406 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
|
2407 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
|
2408 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
|
2409 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
|
2410 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
|
2411 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
|
2412 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
|
2413 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
|
2414 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
|
2415 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
|
2416 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
|
2417 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
|
2418 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
|
2419 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
|
2420 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
|
2421 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
|
2422 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
|
2423 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
|
2424 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
|
2425 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
|
2426 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
|
2427 signalIds [Widget.WINDOW_STATE_EVENT] = OS.g_signal_lookup (OS.window_state_event.ptr, OS.GTK_TYPE_WIDGET ()); |
27 | 2428 |
2429 GClosure* do_cclosure_new( GCallback cb, int value, int notify ){ | |
2430 CallbackData* res= new CallbackData; | |
2431 res.display = this; | |
2432 res.data = cast(void*)value; | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2433 windowProcCallbackDatas[ value ] = res; |
27 | 2434 return OS.g_cclosure_new( cb, cast(void*)res, cast(GClosureNotify)notify ); |
2435 } | |
2436 | |
2437 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
|
2438 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
|
2439 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
|
2440 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
|
2441 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
|
2442 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
|
2443 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
|
2444 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
|
2445 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
|
2446 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
|
2447 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
|
2448 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
|
2449 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
|
2450 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
|
2451 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
|
2452 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
|
2453 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
|
2454 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
|
2455 closures [Widget.UNREALIZE] = do_cclosure_new (windowProc2, Widget.UNREALIZE, 0); |
27 | 2456 |
2457 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
|
2458 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
|
2459 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
|
2460 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
|
2461 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
|
2462 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
|
2463 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
|
2464 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
|
2465 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
|
2466 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
|
2467 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
|
2468 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
|
2469 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
|
2470 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
|
2471 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
|
2472 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
|
2473 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
|
2474 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
|
2475 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
|
2476 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
|
2477 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
|
2478 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
|
2479 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
|
2480 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
|
2481 closures [Widget.MOVE_FOCUS] = do_cclosure_new (windowProc3, Widget.MOVE_FOCUS, 0); |
240 | 2482 closures [Widget.POPULATE_POPUP] = do_cclosure_new (windowProc3, Widget.POPULATE_POPUP, 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
|
2483 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
|
2484 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
|
2485 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
|
2486 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
|
2487 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
|
2488 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
|
2489 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
|
2490 closures [Widget.WINDOW_STATE_EVENT] = do_cclosure_new (windowProc3, Widget.WINDOW_STATE_EVENT, 0); |
27 | 2491 |
2492 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
|
2493 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
|
2494 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
|
2495 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
|
2496 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
|
2497 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
|
2498 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
|
2499 closures [Widget.TEST_EXPAND_ROW] = do_cclosure_new (windowProc4, Widget.TEST_EXPAND_ROW, 0); |
27 | 2500 |
2501 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
|
2502 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
|
2503 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
|
2504 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
|
2505 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
|
2506 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2507 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
|
2508 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
|
2509 } |
27 | 2510 shellMapProcCallbackData.display = this; |
2511 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
|
2512 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
|
2513 OS.g_closure_ref (shellMapProcClosure); |
27 | 2514 } |
2515 | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2516 void* getWindowProcUserData( int value ){ |
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2517 return windowProcCallbackDatas[ value ]; |
240 | 2518 |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2519 } |
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
2520 |
27 | 2521 void initializeSystemSettings () { |
2522 styleSetProcCallbackData.display = this; | |
2523 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
|
2524 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
|
2525 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2526 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2527 * 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
|
2528 * 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
|
2529 * 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
|
2530 * 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
|
2531 * 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
|
2532 * 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
|
2533 * 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
|
2534 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2535 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
|
2536 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
|
2537 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
|
2538 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
|
2539 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
|
2540 entrySelectOnFocus = buffer2 !is 0; |
27 | 2541 } |
2542 | |
2543 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
|
2544 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
|
2545 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
|
2546 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
|
2547 indexTable [GROW_SIZE - 1] = -1; |
27 | 2548 } |
2549 | |
2550 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
|
2551 /* Get the window manager name */ |
240 | 2552 windowManager = ""; //$NON-NLS-1$ |
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
|
2553 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
|
2554 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
|
2555 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
|
2556 auto ptr2 = OS.gdk_x11_screen_get_window_manager_name (screen); |
158
de2578a843a7
Tango update to rev 3158, TracedException>Exception, fromUtf8z>fromStringz,Fix Bug in MenuItem Thanx to nascent for the report.
Frank Benoit <benoit@tionex.de>
parents:
156
diff
changeset
|
2557 windowManager = fromStringz( 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
|
2558 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2559 } |
27 | 2560 } |
2561 | |
2562 /** | |
2563 * Invokes platform specific functionality to dispose a GC handle. | |
2564 * <p> | |
2565 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public | |
2566 * API for <code>Display</code>. It is marked public only so that it | |
71 | 2567 * can be shared within the packages provided by DWT. It is not |
27 | 2568 * available on all platforms, and should never be called from |
2569 * application code. | |
2570 * </p> | |
2571 * | |
2572 * @param hDC the platform specific GC handle | |
2573 * @param data the platform specific GC data | |
2574 */ | |
150
f2e04420fd6c
reworked overrides and superclass aliases
Frank Benoit <benoit@tionex.de>
parents:
124
diff
changeset
|
2575 public override 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
|
2576 OS.g_object_unref (gdkGC); |
26 | 2577 } |
27 | 2578 |
2579 /** | |
2580 * Invokes platform specific functionality to allocate a new GC handle. | |
2581 * <p> | |
2582 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public | |
2583 * API for <code>Display</code>. It is marked public only so that it | |
71 | 2584 * can be shared within the packages provided by DWT. It is not |
27 | 2585 * available on all platforms, and should never be called from |
2586 * application code. | |
2587 * </p> | |
2588 * | |
2589 * @param data the platform specific GC data | |
2590 * @return the platform specific GC handle | |
2591 * | |
71 | 2592 * @exception DWTException <ul> |
27 | 2593 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> |
2594 * </ul> | |
71 | 2595 * @exception DWTError <ul> |
27 | 2596 * <li>ERROR_NO_HANDLES if a handle could not be obtained for gc creation</li> |
2597 * </ul> | |
2598 */ | |
150
f2e04420fd6c
reworked overrides and superclass aliases
Frank Benoit <benoit@tionex.de>
parents:
124
diff
changeset
|
2599 public override GdkGC* internal_new_GC (GCData data) { |
71 | 2600 if (isDisposed()) DWT.error(DWT.ERROR_DEVICE_DISPOSED); |
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
|
2601 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
|
2602 auto gdkGC = OS.gdk_gc_new (root); |
71 | 2603 if (gdkGC is null) DWT.error (DWT.ERROR_NO_HANDLES); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2604 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
|
2605 if (data !is null) { |
71 | 2606 int mask = DWT.LEFT_TO_RIGHT | DWT.RIGHT_TO_LEFT; |
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
|
2607 if ((data.style & mask) is 0) { |
71 | 2608 data.style |= DWT.LEFT_TO_RIGHT; |
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
|
2609 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2610 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
|
2611 data.drawable = root; |
71 | 2612 data.background = getSystemColor (DWT.COLOR_WHITE).handle; |
2613 data.foreground = getSystemColor (DWT.COLOR_BLACK).handle; | |
240 | 2614 data.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
|
2615 } |
27 | 2616 return gdkGC; |
26 | 2617 return null; |
2618 } | |
27 | 2619 |
26 | 2620 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
|
2621 return thread is Thread.getThis (); |
18 | 2622 } |
27 | 2623 |
2624 /** | |
2625 * Maps a point from one coordinate system to another. | |
2626 * When the control is null, coordinates are mapped to | |
2627 * the display. | |
2628 * <p> | |
2629 * NOTE: On right-to-left platforms where the coordinate | |
2630 * systems are mirrored, special care needs to be taken | |
2631 * when mapping coordinates from one control to another | |
2632 * to ensure the result is correctly mirrored. | |
2633 * | |
2634 * Mapping a point that is the origin of a rectangle and | |
2635 * then adding the width and height is not equivalent to | |
2636 * mapping the rectangle. When one control is mirrored | |
2637 * and the other is not, adding the width and height to a | |
2638 * point that was mapped causes the rectangle to extend | |
2639 * in the wrong direction. Mapping the entire rectangle | |
2640 * instead of just one point causes both the origin and | |
2641 * the corner of the rectangle to be mapped. | |
2642 * </p> | |
2643 * | |
2644 * @param from the source <code>Control</code> or <code>null</code> | |
2645 * @param to the destination <code>Control</code> or <code>null</code> | |
2646 * @param point to be mapped | |
2647 * @return point with mapped coordinates | |
2648 * | |
2649 * @exception IllegalArgumentException <ul> | |
2650 * <li>ERROR_NULL_ARGUMENT - if the point is null</li> | |
2651 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> | |
2652 * </ul> | |
71 | 2653 * @exception DWTException <ul> |
27 | 2654 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
2655 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2656 * </ul> | |
2657 * | |
2658 * @since 2.1.2 | |
2659 */ | |
2660 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
|
2661 checkDevice (); |
71 | 2662 if (point is null) error (DWT.ERROR_NULL_ARGUMENT); |
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
|
2663 return map (from, to, point.x, point.y); |
27 | 2664 } |
2665 | |
2666 /** | |
2667 * Maps a point from one coordinate system to another. | |
2668 * When the control is null, coordinates are mapped to | |
2669 * the display. | |
2670 * <p> | |
2671 * NOTE: On right-to-left platforms where the coordinate | |
2672 * systems are mirrored, special care needs to be taken | |
2673 * when mapping coordinates from one control to another | |
2674 * to ensure the result is correctly mirrored. | |
2675 * | |
2676 * Mapping a point that is the origin of a rectangle and | |
2677 * then adding the width and height is not equivalent to | |
2678 * mapping the rectangle. When one control is mirrored | |
2679 * and the other is not, adding the width and height to a | |
2680 * point that was mapped causes the rectangle to extend | |
2681 * in the wrong direction. Mapping the entire rectangle | |
2682 * instead of just one point causes both the origin and | |
2683 * the corner of the rectangle to be mapped. | |
2684 * </p> | |
2685 * | |
2686 * @param from the source <code>Control</code> or <code>null</code> | |
2687 * @param to the destination <code>Control</code> or <code>null</code> | |
2688 * @param x coordinates to be mapped | |
2689 * @param y coordinates to be mapped | |
2690 * @return point with mapped coordinates | |
2691 * | |
2692 * @exception IllegalArgumentException <ul> | |
2693 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> | |
2694 * </ul> | |
71 | 2695 * @exception DWTException <ul> |
27 | 2696 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
2697 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2698 * </ul> | |
2699 * | |
2700 * @since 2.1.2 | |
2701 */ | |
2702 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
|
2703 checkDevice (); |
71 | 2704 if (from !is null && from.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT); |
2705 if (to !is null && to.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT); | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2706 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
|
2707 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
|
2708 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
|
2709 auto window = from.eventWindow (); |
27 | 2710 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
|
2711 OS.gdk_window_get_origin (window, &origin_x, &origin_y); |
240 | 2712 if ((from.style & DWT.MIRRORED) !is 0) point.x = from.getClientWidth () - point.x; |
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
|
2713 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
|
2714 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
|
2715 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2716 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
|
2717 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
|
2718 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
|
2719 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
|
2720 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
|
2721 point.y -= origin_y; |
240 | 2722 if ((to.style & DWT.MIRRORED) !is 0) point.x = to.getClientWidth () - point.x; |
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
|
2723 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2724 return point; |
27 | 2725 } |
2726 | |
2727 /** | |
2728 * Maps a point from one coordinate system to another. | |
2729 * When the control is null, coordinates are mapped to | |
2730 * the display. | |
2731 * <p> | |
2732 * NOTE: On right-to-left platforms where the coordinate | |
2733 * systems are mirrored, special care needs to be taken | |
2734 * when mapping coordinates from one control to another | |
2735 * to ensure the result is correctly mirrored. | |
2736 * | |
2737 * Mapping a point that is the origin of a rectangle and | |
2738 * then adding the width and height is not equivalent to | |
2739 * mapping the rectangle. When one control is mirrored | |
2740 * and the other is not, adding the width and height to a | |
2741 * point that was mapped causes the rectangle to extend | |
2742 * in the wrong direction. Mapping the entire rectangle | |
2743 * instead of just one point causes both the origin and | |
2744 * the corner of the rectangle to be mapped. | |
2745 * </p> | |
2746 * | |
2747 * @param from the source <code>Control</code> or <code>null</code> | |
2748 * @param to the destination <code>Control</code> or <code>null</code> | |
2749 * @param rectangle to be mapped | |
2750 * @return rectangle with mapped coordinates | |
2751 * | |
2752 * @exception IllegalArgumentException <ul> | |
2753 * <li>ERROR_NULL_ARGUMENT - if the rectangle is null</li> | |
2754 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> | |
2755 * </ul> | |
71 | 2756 * @exception DWTException <ul> |
27 | 2757 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
2758 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2759 * </ul> | |
2760 * | |
2761 * @since 2.1.2 | |
2762 */ | |
2763 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
|
2764 checkDevice(); |
71 | 2765 if (rectangle is null) error (DWT.ERROR_NULL_ARGUMENT); |
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
|
2766 return map (from, to, rectangle.x, rectangle.y, rectangle.width, rectangle.height); |
27 | 2767 } |
2768 | |
2769 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
|
2770 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
|
2771 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
|
2772 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
|
2773 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
|
2774 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
|
2775 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
|
2776 } 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
|
2777 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
|
2778 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
|
2779 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
|
2780 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2781 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
|
2782 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
|
2783 return result [0]; |
27 | 2784 } |
2785 | |
48 | 2786 |
2787 package void doMenuPositionProc( GtkMenu* window, bool hasLocation ){ | |
2788 /* | |
2789 * Bug in GTK. The timestamp passed into gtk_menu_popup is used | |
2790 * to perform an X pointer grab. It cannot be zero, else the grab | |
2791 * will fail. The fix is to ensure that the timestamp of the last | |
2792 * event processed is used. | |
2793 */ | |
2794 OS.gtk_menu_popup (window, null, null, | |
2795 hasLocation ? &menuPositionProcFunc : null, | |
2796 cast(void*)this, 0, getLastEventTime() ); | |
2797 } | |
2798 | |
2799 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
|
2800 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
48 | 2801 auto display = cast(Display)user_data; |
2802 display.menuPositionProc( menu, x, y, push_in, null ); | |
2803 } | |
2804 | |
2805 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
|
2806 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
|
2807 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
|
2808 widget.menuPositionProc (menu, x, y, push_in, user_data); |
18 | 2809 } |
2810 | |
27 | 2811 /** |
2812 * Maps a point from one coordinate system to another. | |
2813 * When the control is null, coordinates are mapped to | |
2814 * the display. | |
2815 * <p> | |
2816 * NOTE: On right-to-left platforms where the coordinate | |
2817 * systems are mirrored, special care needs to be taken | |
2818 * when mapping coordinates from one control to another | |
2819 * to ensure the result is correctly mirrored. | |
2820 * | |
2821 * Mapping a point that is the origin of a rectangle and | |
2822 * then adding the width and height is not equivalent to | |
2823 * mapping the rectangle. When one control is mirrored | |
2824 * and the other is not, adding the width and height to a | |
2825 * point that was mapped causes the rectangle to extend | |
2826 * in the wrong direction. Mapping the entire rectangle | |
2827 * instead of just one point causes both the origin and | |
2828 * the corner of the rectangle to be mapped. | |
2829 * </p> | |
2830 * | |
2831 * @param from the source <code>Control</code> or <code>null</code> | |
2832 * @param to the destination <code>Control</code> or <code>null</code> | |
2833 * @param x coordinates to be mapped | |
2834 * @param y coordinates to be mapped | |
2835 * @param width coordinates to be mapped | |
2836 * @param height coordinates to be mapped | |
2837 * @return rectangle with mapped coordinates | |
2838 * | |
2839 * @exception IllegalArgumentException <ul> | |
2840 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li> | |
2841 * </ul> | |
71 | 2842 * @exception DWTException <ul> |
27 | 2843 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
2844 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
2845 * </ul> | |
2846 * | |
2847 * @since 2.1.2 | |
2848 */ | |
2849 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
|
2850 checkDevice(); |
71 | 2851 if (from !is null && from.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT); |
2852 if (to !is null && to.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT); | |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2853 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
|
2854 if (from is to) return rect; |
240 | 2855 bool fromRTL = false, toRTL = false; |
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
|
2856 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
|
2857 auto window = from.eventWindow (); |
27 | 2858 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
|
2859 OS.gdk_window_get_origin (window, &origin_x, &origin_y); |
240 | 2860 fromRTL = (from.style & DWT.MIRRORED) !is 0; |
2861 if (fromRTL) rect.x = from.getClientWidth() - rect.x; | |
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
|
2862 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
|
2863 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
|
2864 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
2865 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
|
2866 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
|
2867 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
|
2868 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
|
2869 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
|
2870 rect.y -= origin_y; |
240 | 2871 toRTL = (to.style & DWT.MIRRORED) !is 0; |
2872 if (toRTL) rect.x = to.getClientWidth () - rect.x; | |
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
|
2873 } |
240 | 2874 if (fromRTL !is toRTL) rect.x -= rect.width; |
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
|
2875 return rect; |
27 | 2876 } |
2877 | |
30 | 2878 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
|
2879 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
30 | 2880 CallbackData* cbdata = cast(CallbackData*)user_data; |
2881 return cbdata.display.mouseHoverProc( cast(GtkWidget*)cbdata.data ); | |
27 | 2882 } |
30 | 2883 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
|
2884 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
|
2885 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
|
2886 return widget.hoverProc (handle); |
27 | 2887 } |
2888 | |
2889 /** | |
2890 * Generate a low level system event. | |
2891 * | |
2892 * <code>post</code> is used to generate low level keyboard | |
2893 * and mouse events. The intent is to enable automated UI | |
2894 * testing by simulating the input from the user. Most | |
71 | 2895 * DWT applications should never need to call this method. |
27 | 2896 * <p> |
2897 * Note that this operation can fail when the operating system | |
2898 * fails to generate the event for any reason. For example, | |
2899 * this can happen when there is no such key or mouse button | |
2900 * or when the system event queue is full. | |
2901 * </p> | |
2902 * <p> | |
2903 * <b>Event Types:</b> | |
2904 * <p>KeyDown, KeyUp | |
2905 * <p>The following fields in the <code>Event</code> apply: | |
2906 * <ul> | |
2907 * <li>(in) type KeyDown or KeyUp</li> | |
2908 * <p> Either one of: | |
2909 * <li>(in) character a character that corresponds to a keyboard key</li> | |
2910 * <li>(in) keyCode the key code of the key that was typed, | |
71 | 2911 * as defined by the key code constants in class <code>DWT</code></li> |
27 | 2912 * </ul> |
2913 * <p>MouseDown, MouseUp</p> | |
2914 * <p>The following fields in the <code>Event</code> apply: | |
2915 * <ul> | |
2916 * <li>(in) type MouseDown or MouseUp | |
2917 * <li>(in) button the button that is pressed or released | |
2918 * </ul> | |
2919 * <p>MouseMove</p> | |
2920 * <p>The following fields in the <code>Event</code> apply: | |
2921 * <ul> | |
2922 * <li>(in) type MouseMove | |
2923 * <li>(in) x the x coordinate to move the mouse pointer to in screen coordinates | |
2924 * <li>(in) y the y coordinate to move the mouse pointer to in screen coordinates | |
2925 * </ul> | |
2926 * </dl> | |
2927 * | |
2928 * @param event the event to be generated | |
2929 * | |
2930 * @return true if the event was generated or false otherwise | |
2931 * | |
2932 * @exception IllegalArgumentException <ul> | |
2933 * <li>ERROR_NULL_ARGUMENT - if the event is null</li> | |
2934 * </ul> | |
71 | 2935 * @exception DWTException <ul> |
27 | 2936 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> |
2937 * </ul> | |
2938 * | |
2939 * @since 3.0 | |
2940 * | |
2941 */ | |
2942 public bool post (Event event) { | |
240 | 2943 synchronized (Device.classinfo) { |
2944 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED); | |
2945 if (event is null) error (DWT.ERROR_NULL_ARGUMENT); | |
2946 if (!OS.GDK_WINDOWING_X11()) return false; | |
2947 auto xDisplay = OS.GDK_DISPLAY (); | |
2948 int type = event.type; | |
2949 switch (type) { | |
2950 case DWT.KeyDown: | |
2951 case DWT.KeyUp: { | |
2952 int keyCode = 0; | |
2953 auto keysym = untranslateKey (event.keyCode); | |
2954 if (keysym !is 0) keyCode = OS.XKeysymToKeycode (xDisplay, keysym); | |
2955 if (keyCode is 0) { | |
2956 char key = event.character; | |
2957 switch (key) { | |
2958 case DWT.BS: keysym = OS.GDK_BackSpace; break; | |
2959 case DWT.CR: keysym = OS.GDK_Return; break; | |
2960 case DWT.DEL: keysym = OS.GDK_Delete; break; | |
2961 case DWT.ESC: keysym = OS.GDK_Escape; break; | |
2962 case DWT.TAB: keysym = OS.GDK_Tab; break; | |
2963 case DWT.LF: keysym = OS.GDK_Linefeed; break; | |
2964 default: | |
2965 keysym = key; | |
2966 } | |
2967 keyCode = OS.XKeysymToKeycode (xDisplay, keysym); | |
2968 if (keyCode is 0) return false; | |
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
|
2969 } |
240 | 2970 OS.XTestFakeKeyEvent (xDisplay, keyCode, type is DWT.KeyDown, 0); |
2971 return true; | |
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
|
2972 } |
240 | 2973 case DWT.MouseDown: |
2974 case DWT.MouseMove: | |
2975 case DWT.MouseUp: { | |
2976 if (type is DWT.MouseMove) { | |
2977 OS.XTestFakeMotionEvent (xDisplay, -1, event.x, event.y, 0); | |
2978 } else { | |
2979 int button = event.button; | |
2980 switch (button) { | |
2981 case 1: | |
2982 case 2: | |
2983 case 3: break; | |
2984 case 4: button = 6; break; | |
2985 case 5: button = 7; break; | |
2986 default: return false; | |
2987 } | |
2988 OS.XTestFakeButtonEvent (xDisplay, button, type is DWT.MouseDown, 0); | |
2989 } | |
2990 return true; | |
2991 default: | |
2992 } | |
2993 /* | |
2994 * This code is intentionally commented. After posting a | |
2995 * mouse wheel event the system may respond unpredictably | |
2996 * to subsequent mouse actions. | |
2997 */ | |
2998 // case DWT.MouseWheel: { | |
2999 // if (event.count is 0) return false; | |
3000 // int button = event.count < 0 ? 5 : 4; | |
3001 // OS.XTestFakeButtonEvent (xDisplay, button, type is DWT.MouseWheel, 0); | |
3002 // } | |
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
|
3003 } |
240 | 3004 return false; |
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
|
3005 } |
27 | 3006 } |
3007 | |
3008 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
|
3009 /* |
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 * 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
|
3011 * 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
|
3012 * 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
|
3013 * 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
|
3014 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3015 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
|
3016 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
|
3017 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
|
3018 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
|
3019 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
|
3020 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
|
3021 } |
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 (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
|
3023 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
|
3024 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
|
3025 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
|
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 eventQueue [index] = event; |
27 | 3028 } |
3029 | |
3030 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
|
3031 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
|
3032 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
|
3033 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
|
3034 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
|
3035 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
|
3036 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
|
3037 } |
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 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
|
3039 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
|
3040 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
|
3041 } |
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 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
|
3043 } |
27 | 3044 } |
3045 | |
3046 /** | |
3047 * Reads an event from the operating system's event queue, | |
3048 * dispatches it appropriately, and returns <code>true</code> | |
3049 * if there is potentially more work to do, or <code>false</code> | |
3050 * if the caller can sleep until another event is placed on | |
3051 * the event queue. | |
3052 * <p> | |
3053 * In addition to checking the system event queue, this method also | |
3054 * checks if any inter-thread messages (created by <code>syncExec()</code> | |
3055 * or <code>asyncExec()</code>) are waiting to be processed, and if | |
3056 * so handles them before returning. | |
3057 * </p> | |
3058 * | |
3059 * @return <code>false</code> if the caller can sleep upon return from this method | |
3060 * | |
71 | 3061 * @exception DWTException <ul> |
27 | 3062 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
3063 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3064 * <li>ERROR_FAILED_EXEC - if an exception occurred while running an inter-thread message</li> | |
3065 * </ul> | |
3066 * | |
3067 * @see #sleep | |
3068 * @see #wake | |
3069 */ | |
3070 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
|
3071 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
|
3072 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
|
3073 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
|
3074 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
|
3075 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
|
3076 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
|
3077 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
|
3078 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
|
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 return runAsyncMessages (false); |
27 | 3081 } |
3082 | |
240 | 3083 static void register (Display display) { |
3084 synchronized (Device.classinfo) { | |
3085 for (int i=0; i<Displays.length; i++) { | |
3086 if (Displays [i] is null) { | |
3087 Displays [i] = display; | |
3088 return; | |
3089 } | |
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
|
3090 } |
240 | 3091 Display [] newDisplays = new Display [Displays.length + 4]; |
3092 System.arraycopy (Displays, 0, newDisplays, 0, Displays.length); | |
3093 newDisplays [Displays.length] = display; | |
3094 Displays = newDisplays; | |
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
|
3095 } |
18 | 3096 } |
3097 | |
27 | 3098 /** |
3099 * Releases any internal resources back to the operating | |
3100 * system and clears all fields except the device handle. | |
3101 * <p> | |
3102 * Disposes all shells which are currently open on the display. | |
3103 * After this method has been invoked, all related related shells | |
3104 * will answer <code>true</code> when sent the message | |
3105 * <code>isDisposed()</code>. | |
3106 * </p><p> | |
3107 * When a device is destroyed, resources that were acquired | |
3108 * on behalf of the programmer need to be returned to the | |
3109 * operating system. For example, if the device allocated a | |
3110 * font to be used as the system font, this font would be | |
3111 * freed in <code>release</code>. Also,to assist the garbage | |
3112 * collector and minimize the amount of memory that is not | |
3113 * reclaimed when the programmer keeps a reference to a | |
3114 * disposed device, all fields except the handle are zero'd. | |
3115 * The handle is needed by <code>destroy</code>. | |
3116 * </p> | |
3117 * This method is called before <code>destroy</code>. | |
3118 * | |
3119 * @see Device#dispose | |
3120 * @see #destroy | |
3121 */ | |
152
17f8449522fd
overloads second walkthrough
Frank Benoit <benoit@tionex.de>
parents:
150
diff
changeset
|
3122 protected override void release () { |
71 | 3123 sendEvent (DWT.Dispose, new 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
|
3124 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
|
3125 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
|
3126 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
|
3127 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
|
3128 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3129 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
|
3130 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
|
3131 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
|
3132 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
|
3133 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
|
3134 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
|
3135 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3136 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3137 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
|
3138 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
|
3139 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
|
3140 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
|
3141 super.release (); |
27 | 3142 } |
3143 | |
3144 void releaseDisplay () { | |
3145 | |
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
|
3146 /* Dispose xfilter callback */ |
240 | 3147 OS.gdk_window_remove_filter(null, &filterProcFunc, 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
|
3148 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3149 /* 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
|
3150 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3151 /* 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
|
3152 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
|
3153 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
|
3154 |
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 /* 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
|
3156 |
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 /* 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
|
3158 |
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 /* 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
|
3160 |
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 /* 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
|
3162 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
|
3163 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
|
3164 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3165 /* 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
|
3166 |
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 /* 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
|
3168 |
240 | 3169 /* Dispose the emission proc callback */ |
3170 | |
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
|
3171 /* 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
|
3172 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3173 /* 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
|
3174 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
|
3175 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
|
3176 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3177 /* 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
|
3178 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
|
3179 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
|
3180 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3181 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
|
3182 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3183 /* 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
|
3184 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
|
3185 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
|
3186 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
|
3187 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3188 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3189 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
|
3190 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
|
3191 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3192 /* 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
|
3193 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
|
3194 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
|
3195 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
|
3196 |
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 /* 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
|
3198 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
|
3199 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
|
3200 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3201 /* 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
|
3202 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
|
3203 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
|
3204 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
|
3205 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
|
3206 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
|
3207 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3208 /* 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
|
3209 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
|
3210 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
|
3211 } |
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 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
|
3213 |
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 /* 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
|
3215 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
|
3216 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
|
3217 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
|
3218 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3219 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
|
3220 } |
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 |
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 /* 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
|
3223 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
|
3224 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
|
3225 COLOR_LIST_FOREGROUND = COLOR_LIST_BACKGROUND = COLOR_LIST_SELECTION = COLOR_LIST_SELECTION_TEXT = |
240 | 3226 COLOR_WIDGET_FOREGROUND = COLOR_TITLE_FOREGROUND = COLOR_TITLE_BACKGROUND = COLOR_TITLE_BACKGROUND_GRADIENT = |
3227 COLOR_TITLE_INACTIVE_FOREGROUND = COLOR_TITLE_INACTIVE_BACKGROUND = COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT = | |
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
|
3228 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
|
3229 |
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 /* 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
|
3231 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
|
3232 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3233 /* 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
|
3234 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
|
3235 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
|
3236 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3237 /* 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
|
3238 |
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 /* 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
|
3240 max_priority = 0; |
27 | 3241 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
|
3242 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
|
3243 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
|
3244 |
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 /* 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
|
3246 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
|
3247 thread = null; |
240 | 3248 lastWidget = activeShell = null; |
3249 //flushData = null; | |
3250 closures = null; | |
3251 indexTable = signalIds = treeSelection = null; | |
3252 widgetTable = modalShells = null; | |
3253 data = null; | |
3254 values = null; | |
3255 keys = null; | |
3256 windowManager = null; | |
3257 eventTable = filterTable = null; | |
3258 modalDialog = null; | |
3259 flushRect = null; | |
3260 exposeEvent = null; | |
3261 visibilityEvent = null; | |
3262 idleLock = null; | |
27 | 3263 } |
3264 | |
3265 /** | |
3266 * Removes the listener from the collection of listeners who will | |
3267 * be notified when an event of the given type occurs anywhere in | |
3268 * a widget. The event type is one of the event constants defined | |
71 | 3269 * in class <code>DWT</code>. |
27 | 3270 * |
3271 * @param eventType the type of event to listen for | |
3272 * @param listener the listener which should no longer be notified when the event occurs | |
3273 * | |
3274 * @exception IllegalArgumentException <ul> | |
3275 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li> | |
3276 * </ul> | |
71 | 3277 * @exception DWTException <ul> |
27 | 3278 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
3279 * </ul> | |
3280 * | |
3281 * @see Listener | |
71 | 3282 * @see DWT |
27 | 3283 * @see #addFilter |
3284 * @see #addListener | |
3285 * | |
3286 * @since 3.0 | |
3287 */ | |
3288 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
|
3289 checkDevice (); |
71 | 3290 if (listener is null) error (DWT.ERROR_NULL_ARGUMENT); |
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
|
3291 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
|
3292 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
|
3293 if (filterTable.size () is 0) filterTable = null; |
27 | 3294 } |
3295 | |
3296 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
|
3297 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
|
3298 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
|
3299 --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
|
3300 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
|
3301 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
|
3302 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
|
3303 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
|
3304 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
|
3305 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
|
3306 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
|
3307 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3308 return event; |
27 | 3309 } |
3310 | |
3311 void removeIdleProc () { | |
240 | 3312 synchronized (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
|
3313 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
|
3314 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
|
3315 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
|
3316 } |
27 | 3317 } |
3318 /** | |
3319 * Removes the listener from the collection of listeners who will | |
3320 * be notified when an event of the given type occurs. The event type | |
71 | 3321 * is one of the event constants defined in class <code>DWT</code>. |
27 | 3322 * |
3323 * @param eventType the type of event to listen for | |
259 | 3324 * @param listener the listener which should no longer be notified |
27 | 3325 * |
3326 * @exception IllegalArgumentException <ul> | |
3327 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li> | |
3328 * </ul> | |
71 | 3329 * @exception DWTException <ul> |
27 | 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 * @see Listener | |
71 | 3335 * @see DWT |
27 | 3336 * @see #addListener |
3337 * | |
3338 * @since 2.0 | |
3339 */ | |
3340 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
|
3341 checkDevice (); |
71 | 3342 if (listener is null) error (DWT.ERROR_NULL_ARGUMENT); |
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
|
3343 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
|
3344 eventTable.unhook (eventType, listener); |
27 | 3345 } |
3346 | |
3347 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
|
3348 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
|
3349 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
|
3350 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
|
3351 mouseHoverHandle = null; |
27 | 3352 } |
3353 | |
3354 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
|
3355 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
|
3356 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
|
3357 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
|
3358 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
|
3359 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
|
3360 } |
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 } |
27 | 3362 } |
3363 | |
3364 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
|
3365 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
|
3366 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
|
3367 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
|
3368 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
|
3369 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
|
3370 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
|
3371 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
|
3372 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
|
3373 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
|
3374 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
|
3375 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3376 return widget; |
27 | 3377 } |
3378 | |
3379 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
|
3380 return synchronizer.runAsyncMessages (all); |
27 | 3381 } |
3382 | |
3383 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
|
3384 /* |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3385 * 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
|
3386 * 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
|
3387 * 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
|
3388 */ |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3389 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
|
3390 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3391 /* 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
|
3392 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
|
3393 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
|
3394 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
|
3395 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
|
3396 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
|
3397 |
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 /* 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
|
3399 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
|
3400 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
|
3401 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
|
3402 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
|
3403 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
|
3404 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3405 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3406 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3407 /* |
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 * 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
|
3409 * 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
|
3410 * 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
|
3411 */ |
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 } |
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 |
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 /* 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
|
3415 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
|
3416 return true; |
27 | 3417 } |
3418 | |
3419 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
|
3420 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
|
3421 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
|
3422 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
|
3423 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
|
3424 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
|
3425 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
|
3426 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
|
3427 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
|
3428 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
|
3429 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
|
3430 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
|
3431 } |
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 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
|
3433 return result; |
27 | 3434 } |
3435 | |
3436 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
|
3437 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
|
3438 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
|
3439 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
|
3440 initializeSystemColors (); |
71 | 3441 sendEvent (DWT.Settings, 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
|
3442 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
|
3443 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
|
3444 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
|
3445 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
|
3446 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
|
3447 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
|
3448 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
|
3449 } |
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 } |
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 return true; |
27 | 3452 } |
3453 | |
3454 /** | |
3455 * On platforms which support it, sets the application name | |
3456 * to be the argument. On Motif, for example, this can be used | |
3457 * to set the name used for resource lookup. Specifying | |
3458 * <code>null</code> for the name clears it. | |
3459 * | |
3460 * @param name the new app name or <code>null</code> | |
3461 */ | |
238 | 3462 public static void setAppName (String 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
|
3463 APP_NAME = name; |
27 | 3464 } |
3465 | |
3466 /** | |
3467 * Sets the location of the on-screen pointer relative to the top left corner | |
3468 * of the screen. <b>Note: It is typically considered bad practice for a | |
3469 * program to move the on-screen pointer location.</b> | |
3470 * | |
3471 * @param x the new x coordinate for the cursor | |
3472 * @param y the new y coordinate for the cursor | |
3473 * | |
71 | 3474 * @exception DWTException <ul> |
27 | 3475 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
3476 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3477 * </ul> | |
3478 * | |
3479 * @since 2.1 | |
3480 */ | |
3481 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
|
3482 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
|
3483 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
|
3484 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
|
3485 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
|
3486 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
|
3487 } |
27 | 3488 } |
3489 | |
3490 /** | |
3491 * Sets the location of the on-screen pointer relative to the top left corner | |
3492 * of the screen. <b>Note: It is typically considered bad practice for a | |
3493 * program to move the on-screen pointer location.</b> | |
3494 * | |
3495 * @param point new position | |
3496 * | |
71 | 3497 * @exception DWTException <ul> |
27 | 3498 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
3499 * <li>ERROR_NULL_ARGUMENT - if the point is null | |
3500 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3501 * </ul> | |
3502 * | |
3503 * @since 2.0 | |
3504 */ | |
3505 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
|
3506 checkDevice (); |
71 | 3507 if (point is null) error (DWT.ERROR_NULL_ARGUMENT); |
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
|
3508 setCursorLocation (point.x, point.y); |
27 | 3509 } |
3510 | |
3511 /** | |
3512 * Sets the application defined property of the receiver | |
3513 * with the specified name to the given argument. | |
3514 * <p> | |
3515 * Applications may have associated arbitrary objects with the | |
3516 * receiver in this fashion. If the objects stored in the | |
3517 * properties need to be notified when the display is disposed | |
3518 * of, it is the application's responsibility provide a | |
3519 * <code>disposeExec()</code> handler which does so. | |
3520 * </p> | |
3521 * | |
3522 * @param key the name of the property | |
3523 * @param value the new value for the property | |
3524 * | |
71 | 3525 * @exception DWTException <ul> |
27 | 3526 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
3527 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3528 * </ul> | |
3529 * | |
3530 * @see #getData(String) | |
3531 * @see #disposeExec(Runnable) | |
3532 */ | |
238 | 3533 public void setData (String 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
|
3534 checkDevice (); |
255
5a30aa9820f3
removed tango.stdc.stringz imports and allow null for arrays and string arguments.
Frank Benoit <benoit@tionex.de>
parents:
254
diff
changeset
|
3535 // DWT extension: allow null for zero length string |
5a30aa9820f3
removed tango.stdc.stringz imports and allow null for arrays and string arguments.
Frank Benoit <benoit@tionex.de>
parents:
254
diff
changeset
|
3536 //if (key is null) error (DWT.ERROR_NULL_ARGUMENT); |
5a30aa9820f3
removed tango.stdc.stringz imports and allow null for arrays and string arguments.
Frank Benoit <benoit@tionex.de>
parents:
254
diff
changeset
|
3537 |
5a30aa9820f3
removed tango.stdc.stringz imports and allow null for arrays and string arguments.
Frank Benoit <benoit@tionex.de>
parents:
254
diff
changeset
|
3538 if (key.equals (DISPATCH_EVENT_KEY)) { |
27 | 3539 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
|
3540 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
|
3541 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
|
3542 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
|
3543 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
|
3544 } |
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 } |
240 | 3546 if (key.equals (SET_MODAL_DIALOG)) { |
3547 setModalDialog (cast(Dialog) data); | |
3548 return; | |
3549 } | |
3550 | |
3551 if (key.equals (ADD_WIDGET_KEY)) { | |
27 | 3552 auto wrap = cast(ArrayWrapperObject) value; |
71 | 3553 if( wrap is null ) DWT.error(DWT.ERROR_INVALID_ARGUMENT, null, " []"); |
27 | 3554 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
|
3555 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
|
3556 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
|
3557 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
|
3558 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
|
3559 } 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
|
3560 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
|
3561 } |
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 } |
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 |
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 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
|
3565 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
|
3566 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
|
3567 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3568 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
|
3569 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
|
3570 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
|
3571 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3572 |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3573 /* 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
|
3574 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
|
3575 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
|
3576 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
|
3577 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
|
3578 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
|
3579 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
|
3580 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
|
3581 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
|
3582 } else { |
238 | 3583 String [] newKeys = new String [keys.length - 1]; |
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 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
|
3585 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
|
3586 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
|
3587 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
|
3588 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
|
3589 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
|
3590 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
|
3591 } |
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; |
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 |
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 /* 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
|
3596 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
|
3597 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
|
3598 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
|
3599 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
|
3600 } |
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 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
|
3602 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
|
3603 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
|
3604 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
|
3605 } |
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 } |
238 | 3607 String [] newKeys = new String [keys.length + 1]; |
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
|
3608 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
|
3609 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
|
3610 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
|
3611 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
|
3612 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
|
3613 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
|
3614 values = newValues; |
27 | 3615 } |
3616 | |
3617 /** | |
3618 * Sets the application defined, display specific data | |
3619 * associated with the receiver, to the argument. | |
3620 * The <em>display specific data</em> is a single, | |
3621 * unnamed field that is stored with every display. | |
3622 * <p> | |
3623 * Applications may put arbitrary objects in this field. If | |
3624 * the object stored in the display specific data needs to | |
3625 * be notified when the display is disposed of, it is the | |
3626 * application's responsibility provide a | |
3627 * <code>disposeExec()</code> handler which does so. | |
3628 * </p> | |
3629 * | |
3630 * @param data the new display specific data | |
3631 * | |
71 | 3632 * @exception DWTException <ul> |
27 | 3633 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
3634 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3635 * </ul> | |
3636 * | |
3637 * @see #getData() | |
3638 * @see #disposeExec(Runnable) | |
3639 */ | |
3640 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
|
3641 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
|
3642 this.data = data; |
27 | 3643 } |
3644 | |
89
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3645 |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3646 void doSetDirectionProc( GtkWidget* widget, int direction ){ |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3647 setDirectionProcCallbackData.display = this; |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3648 setDirectionProcCallbackData.data = cast(void*)direction; |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3649 OS.gtk_container_forall (cast(GtkContainer*)widget, cast(GtkCallback)&setDirectionProcFunc, &setDirectionProcCallbackData); |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3650 } |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3651 |
321 | 3652 package static extern(C) int /*long*/ setDirectionProcFunc (GtkWidget* widget, void* data) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3653 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
89
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3654 CallbackData* cbdata = cast(CallbackData*)data; |
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3655 return cbdata.display.setDirectionProc( widget, cast(int)cbdata.data ); |
27 | 3656 } |
89
9f6c2c92be2b
Table, TableColumn and TableItem
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
3657 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
|
3658 OS.gtk_widget_set_direction (widget, direction); |
240 | 3659 if (OS.GTK_IS_MENU_ITEM (widget)) { |
3660 auto submenu = OS.gtk_menu_item_get_submenu (widget); | |
3661 if (submenu !is null) { | |
3662 OS.gtk_widget_set_direction (submenu, cast(int)/*64*/ direction); | |
3663 OS.gtk_container_forall (cast(GtkContainer*)submenu, cast(GtkCallback)&setDirectionProcFunc, cast(void*)direction); | |
3664 } | |
3665 } | |
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
|
3666 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
|
3667 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
|
3668 } |
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 return 0; |
27 | 3670 } |
3671 | |
240 | 3672 void setModalDialog (Dialog modalDailog) { |
3673 this.modalDialog = modalDailog; | |
3674 Shell [] shells = getShells (); | |
3675 for (int i=0; i<shells.length; i++) shells [i].updateModal (); | |
3676 } | |
3677 | |
3678 void setModalShell (Shell shell) { | |
3679 if (modalShells is null) modalShells = new Shell [4]; | |
3680 int index = 0, length = modalShells.length; | |
3681 while (index < length) { | |
3682 if (modalShells [index] is shell) return; | |
3683 if (modalShells [index] is null) break; | |
3684 index++; | |
3685 } | |
3686 if (index is length) { | |
3687 Shell [] newModalShells = new Shell [length + 4]; | |
3688 System.arraycopy (modalShells, 0, newModalShells, 0, length); | |
3689 modalShells = newModalShells; | |
3690 } | |
3691 modalShells [index] = shell; | |
3692 Shell [] shells = getShells (); | |
3693 for (int i=0; i<shells.length; i++) shells [i].updateModal (); | |
3694 } | |
3695 | |
27 | 3696 /** |
3697 * Sets the synchronizer used by the display to be | |
3698 * the argument, which can not be null. | |
3699 * | |
3700 * @param synchronizer the new synchronizer for the display (must not be null) | |
3701 * | |
3702 * @exception IllegalArgumentException <ul> | |
3703 * <li>ERROR_NULL_ARGUMENT - if the synchronizer is null</li> | |
3704 * </ul> | |
71 | 3705 * @exception DWTException <ul> |
27 | 3706 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
3707 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3708 * <li>ERROR_FAILED_EXEC - if an exception occurred while running an inter-thread message</li> | |
3709 * </ul> | |
3710 */ | |
3711 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
|
3712 checkDevice (); |
71 | 3713 if (synchronizer is null) error (DWT.ERROR_NULL_ARGUMENT); |
240 | 3714 if (synchronizer is this.synchronizer) return; |
3715 Synchronizer oldSynchronizer; | |
3716 synchronized (Device.classinfo) { | |
3717 oldSynchronizer = this.synchronizer; | |
3718 this.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
|
3719 } |
240 | 3720 if (oldSynchronizer !is null) { |
3721 oldSynchronizer.runAsyncMessages(true); | |
3722 } | |
27 | 3723 } |
3724 | |
3725 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
|
3726 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
|
3727 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
|
3728 preeditWindow = cast(GtkWindow*)OS.gtk_window_new (OS.GTK_WINDOW_POPUP); |
71 | 3729 if (preeditWindow is null) error (DWT.ERROR_NO_HANDLES); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3730 preeditLabel = cast(GtkLabel*) OS.gtk_label_new (null); |
71 | 3731 if (preeditLabel is null) error (DWT.ERROR_NO_HANDLES); |
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3732 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
|
3733 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
|
3734 } |
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 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
|
3736 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
|
3737 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
|
3738 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
|
3739 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
|
3740 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
|
3741 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
|
3742 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
|
3743 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
|
3744 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
|
3745 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
|
3746 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
|
3747 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
|
3748 OS.gtk_window_move (preeditWindow, point.x, point.y); |
124
11b0a1324732
Fix various stack access from anon-class
Frank Benoit <benoit@tionex.de>
parents:
107
diff
changeset
|
3749 GtkRequisition requisition; |
11b0a1324732
Fix various stack access from anon-class
Frank Benoit <benoit@tionex.de>
parents:
107
diff
changeset
|
3750 OS.gtk_widget_size_request (cast(GtkWidget*)preeditLabel, &requisition); |
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
|
3751 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
|
3752 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
|
3753 } 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
|
3754 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
|
3755 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3756 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
|
3757 if (pangoAttrs !is null) OS.pango_attr_list_unref (pangoAttrs); |
27 | 3758 } |
3759 | |
3760 /** | |
3761 * Causes the user-interface thread to <em>sleep</em> (that is, | |
3762 * to be put in a state where it does not consume CPU cycles) | |
3763 * until an event is received or it is otherwise awakened. | |
3764 * | |
3765 * @return <code>true</code> if an event requiring dispatching was placed on the queue. | |
3766 * | |
71 | 3767 * @exception DWTException <ul> |
27 | 3768 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
3769 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3770 * </ul> | |
3771 * | |
3772 * @see #wake | |
3773 */ | |
3774 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
|
3775 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
|
3776 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
|
3777 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
|
3778 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
|
3779 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3780 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
|
3781 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
|
3782 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
|
3783 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
|
3784 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3785 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
|
3786 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
|
3787 allocated_nfds = 2; |
107
5ac0a5d00e19
Fix: GPollFD should be allocated via malloc
Frank Benoit <benoit@tionex.de>
parents:
104
diff
changeset
|
3788 GPollFD* ptr = cast(GPollFD*) OS.g_malloc( GPollFD.sizeof * allocated_nfds ); |
5ac0a5d00e19
Fix: GPollFD should be allocated via malloc
Frank Benoit <benoit@tionex.de>
parents:
104
diff
changeset
|
3789 fds = ptr[ 0 .. allocated_nfds ]; |
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
|
3790 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3791 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
|
3792 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
|
3793 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
|
3794 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
|
3795 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
|
3796 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
|
3797 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
|
3798 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
|
3799 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
|
3800 allocated_nfds = nfds; |
107
5ac0a5d00e19
Fix: GPollFD should be allocated via malloc
Frank Benoit <benoit@tionex.de>
parents:
104
diff
changeset
|
3801 GPollFD* ptr = cast(GPollFD*) OS.g_malloc( GPollFD.sizeof * allocated_nfds ); |
5ac0a5d00e19
Fix: GPollFD should be allocated via malloc
Frank Benoit <benoit@tionex.de>
parents:
104
diff
changeset
|
3802 fds = ptr[ 0 .. allocated_nfds ]; |
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
|
3803 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3804 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
|
3805 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
|
3806 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
|
3807 /* |
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 * 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
|
3809 * 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
|
3810 * 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
|
3811 */ |
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 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
|
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 /* 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
|
3815 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
|
3816 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
|
3817 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
|
3818 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
|
3819 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
|
3820 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
|
3821 } 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
|
3822 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
|
3823 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
|
3824 } |
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 } |
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 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
|
3828 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
|
3829 } |
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 } 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
|
3831 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
|
3832 return true; |
27 | 3833 } |
3834 | |
3835 /** | |
3836 * Causes the <code>run()</code> method of the runnable to | |
3837 * be invoked by the user-interface thread after the specified | |
3838 * number of milliseconds have elapsed. If milliseconds is less | |
3839 * than zero, the runnable is not executed. | |
3840 * <p> | |
3841 * Note that at the time the runnable is invoked, widgets | |
3842 * that have the receiver as their display may have been | |
3843 * disposed. Therefore, it is necessary to check for this | |
3844 * case inside the runnable before accessing the widget. | |
3845 * </p> | |
3846 * | |
3847 * @param milliseconds the delay before running the runnable | |
3848 * @param runnable code to run on the user-interface thread | |
3849 * | |
3850 * @exception IllegalArgumentException <ul> | |
3851 * <li>ERROR_NULL_ARGUMENT - if the runnable is null</li> | |
3852 * </ul> | |
71 | 3853 * @exception DWTException <ul> |
27 | 3854 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
3855 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
3856 * </ul> | |
3857 * | |
3858 * @see #asyncExec | |
3859 */ | |
3860 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
|
3861 checkDevice (); |
71 | 3862 if (runnable is null) error (DWT.ERROR_NULL_ARGUMENT); |
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
|
3863 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
|
3864 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
|
3865 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
|
3866 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
|
3867 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
|
3868 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
|
3869 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3870 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
|
3871 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
|
3872 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
|
3873 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
|
3874 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
|
3875 } 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
|
3876 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
|
3877 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
|
3878 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
|
3879 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
|
3880 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
|
3881 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3882 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
|
3883 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
|
3884 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
|
3885 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
|
3886 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
|
3887 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
|
3888 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
|
3889 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3890 } |
27 | 3891 timerProcCallbackData.display = this; |
3892 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
|
3893 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
|
3894 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
|
3895 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
|
3896 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
|
3897 } |
27 | 3898 } |
3899 | |
47
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
3900 |
27 | 3901 private static extern(C) int timerProcFunc ( void * data ) { |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3902 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 3903 CallbackData* cbdata = cast( CallbackData* ) data; |
3904 return cbdata.display.timerProc( cast(int) cbdata.data ); | |
3905 } | |
3906 | |
3907 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
|
3908 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
|
3909 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
|
3910 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
|
3911 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
|
3912 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
|
3913 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
|
3914 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
|
3915 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3916 return 0; |
27 | 3917 } |
3918 | |
3919 private static extern(C) int caretProcFunc ( void * data ) { | |
66
bb2217c09e61
Fixed signal blocking/unblocking:
Frank Benoit <benoit@tionex.de>
parents:
59
diff
changeset
|
3920 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 3921 CallbackData* cbdata = cast( CallbackData* ) data; |
3922 return cbdata.display.caretProc( cast(int) cbdata.data ); | |
3923 } | |
3924 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
|
3925 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
|
3926 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
|
3927 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
|
3928 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3929 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
|
3930 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
|
3931 if (blinkRate is 0) return 0; |
27 | 3932 caretProcCallbackData.display = this; |
3933 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
|
3934 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
|
3935 } 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
|
3936 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
|
3937 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
3938 return 0; |
27 | 3939 } |
3940 | |
54 | 3941 |
3942 package int doSizeAllocateConnect( CallbackData* cbdata, GtkWidget* window, GtkWidget* widget ){ | |
3943 cbdata.display = this; | |
3944 cbdata.data = cast(void*)widget; | |
3945 return OS.g_signal_connect (cast(void*)window, OS.size_allocate.ptr, cast(GCallback)&sizeAllocateProcFunc, cast(void*)&cbdata); | |
3946 } | |
3947 | |
3948 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
|
3949 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
54 | 3950 auto cbdata = cast(CallbackData*)user_data; |
3951 cbdata.display.sizeAllocateProc( cast(GtkWidget*)handle, arg0, cast(int)cbdata.data ); | |
3952 } | |
3953 | |
3954 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
|
3955 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
|
3956 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
|
3957 widget.sizeAllocateProc (handle, arg0, user_data); |
27 | 3958 } |
3959 | |
38 | 3960 |
54 | 3961 package int doSizeRequestConnect( CallbackData* cbdata, GtkWidget* window, GtkWidget* widget ){ |
3962 cbdata.display = this; | |
3963 cbdata.data = cast(void*)widget; | |
3964 return OS.g_signal_connect (cast(void*)window, OS.size_request.ptr, cast(GCallback)&sizeRequestProcFunc, cast(void*)&cbdata ); | |
3965 } | |
3966 | |
3967 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
|
3968 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
54 | 3969 auto cbdata = cast(CallbackData*)user_data; |
3970 cbdata.display.sizeRequestProcMeth( cast(GtkWidget*)handle, arg0, cast(int)cbdata.data ); | |
3971 } | |
3972 | |
38 | 3973 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
|
3974 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
|
3975 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
|
3976 return widget.sizeRequestProc (handle, arg0, user_data); |
27 | 3977 } |
3978 | |
67 | 3979 package void doTreeSelectionProcConnect( CallbackData* cbdata, GtkWidget* widget, GtkTreeSelection* selection ){ |
3980 cbdata.display = this; | |
3981 cbdata.data = cast(void*)widget; | |
3982 OS.gtk_tree_selection_selected_foreach (selection, &treeSelectionProcFunc, widget); | |
3983 } | |
3984 | |
3985 private static extern(C) void treeSelectionProcFunc (GtkTreeModel *model, GtkTreePath *path, GtkTreeIter *iter, void* data) { | |
3986 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; | |
3987 auto cbdata = cast(CallbackData*)data; | |
3988 cbdata.display.treeSelectionProcMeth( model, path, iter, cbdata.data ); | |
3989 } | |
3990 | |
3991 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
|
3992 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
|
3993 if (widget is null) return 0; |
67 | 3994 widget.treeSelectionProc (model, path, iter, treeSelection, treeSelectionLength++); |
27 | 3995 } |
3996 | |
3997 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
|
3998 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
|
3999 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
|
4000 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
|
4001 } 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
|
4002 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
|
4003 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
|
4004 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
|
4005 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
|
4006 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4007 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
|
4008 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
|
4009 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
|
4010 } |
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 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
|
4012 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
|
4013 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
|
4014 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
|
4015 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
|
4016 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
|
4017 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
|
4018 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
|
4019 } |
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 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
|
4021 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
|
4022 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
|
4023 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
|
4024 } |
27 | 4025 } |
4026 | |
26 | 4027 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
|
4028 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
|
4029 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
|
4030 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4031 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
|
4032 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
|
4033 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
|
4034 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
|
4035 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
|
4036 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
|
4037 } |
27 | 4038 } |
4039 | |
4040 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
|
4041 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
|
4042 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
|
4043 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
|
4044 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
|
4045 int blinkRate = currentCaret.blinkRate; |
27 | 4046 caretProcCallbackData.display = this; |
4047 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
|
4048 caretId = OS.gtk_timeout_add (blinkRate, &caretProcFunc, &caretProcCallbackData); |
27 | 4049 } |
4050 | |
4051 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
|
4052 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 4053 auto cbdata = cast(CallbackData*)user_data; |
38 | 4054 return cbdata.display.shellMapProc( cast(GtkWidget*)handle, arg0, cast(int)cbdata.data ); |
27 | 4055 } |
4056 | |
38 | 4057 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
|
4058 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
|
4059 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
|
4060 return widget.shellMapProc (handle, arg0, user_data); |
27 | 4061 } |
4062 | |
4063 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
|
4064 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 4065 auto cbdata = cast(CallbackData*)user_data; |
4066 return cbdata.display.styleSetProcMeth( gobject, arg1, cast(int)cbdata.data ); | |
4067 } | |
4068 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
|
4069 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
|
4070 return 0; |
27 | 4071 } |
4072 | |
4073 /** | |
4074 * Causes the <code>run()</code> method of the runnable to | |
4075 * be invoked by the user-interface thread at the next | |
4076 * reasonable opportunity. The thread which calls this method | |
4077 * is suspended until the runnable completes. Specifying <code>null</code> | |
4078 * as the runnable simply wakes the user-interface thread. | |
4079 * <p> | |
4080 * Note that at the time the runnable is invoked, widgets | |
4081 * that have the receiver as their display may have been | |
4082 * disposed. Therefore, it is necessary to check for this | |
4083 * case inside the runnable before accessing the widget. | |
4084 * </p> | |
4085 * | |
4086 * @param runnable code to run on the user-interface thread or <code>null</code> | |
4087 * | |
71 | 4088 * @exception DWTException <ul> |
27 | 4089 * <li>ERROR_FAILED_EXEC - if an exception occurred when executing the runnable</li> |
4090 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
4091 * </ul> | |
4092 * | |
4093 * @see #asyncExec | |
4094 */ | |
4095 public void syncExec (Runnable runnable) { | |
240 | 4096 Synchronizer synchronizer; |
4097 synchronized (Device.classinfo) { | |
4098 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED); | |
4099 synchronizer = this.synchronizer; | |
4100 synchronized (idleLock) { | |
4101 if (idleNeeded && idleHandle is 0) { | |
4102 //NOTE: calling unlocked function in OS | |
27 | 4103 idleProcCallbackData.display = this; |
4104 idleProcCallbackData.data = cast(void*)0; | |
4105 //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
|
4106 idleHandle = OS.g_idle_add (&idleProcFunc, &idleProcCallbackData); |
240 | 4107 } |
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
|
4108 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4109 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4110 synchronizer.syncExec (runnable); |
27 | 4111 } |
4112 | |
4113 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
|
4114 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
|
4115 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
|
4116 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4117 return 0; |
27 | 4118 } |
4119 | |
4120 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
|
4121 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
|
4122 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
|
4123 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4124 return 0; |
18 | 4125 } |
27 | 4126 |
4127 /** | |
4128 * Forces all outstanding paint requests for the display | |
4129 * to be processed before this method returns. | |
4130 * | |
71 | 4131 * @exception DWTException <ul> |
27 | 4132 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li> |
4133 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> | |
4134 * </ul> | |
4135 * | |
4136 * @see Control#update() | |
4137 */ | |
4138 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
|
4139 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
|
4140 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
|
4141 OS.gdk_window_process_all_updates (); |
27 | 4142 } |
4143 | |
4144 /** | |
4145 * If the receiver's user-interface thread was <code>sleep</code>ing, | |
4146 * causes it to be awakened and start running again. Note that this | |
4147 * method may be called from any thread. | |
4148 * | |
71 | 4149 * @exception DWTException <ul> |
27 | 4150 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li> |
4151 * </ul> | |
4152 * | |
4153 * @see #sleep | |
4154 */ | |
4155 public void wake () { | |
240 | 4156 synchronized (Device.classinfo) { |
4157 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED); | |
4158 if (thread is Thread.getThis ()) return; | |
4159 wakeThread (); | |
4160 } | |
27 | 4161 } |
4162 | |
4163 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
|
4164 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
|
4165 wake_state = true; |
27 | 4166 } |
4167 | |
4168 static dchar wcsToMbcs (char ch) { | |
4169 //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
|
4170 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
|
4171 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
|
4172 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
|
4173 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
|
4174 if (buffer.length is 2) { |
27 | 4175 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
|
4176 } |
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
54
diff
changeset
|
4177 return '\0'; |
27 | 4178 } |
18 | 4179 |
27 | 4180 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
|
4181 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 4182 CallbackData* cbdata = cast(CallbackData*)user_data; |
4183 return cbdata.display.windowProc( handle, cast(int)cbdata.data ); | |
4184 } | |
4185 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
|
4186 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
|
4187 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
|
4188 return widget.windowProc (handle, user_data); |
27 | 4189 } |
4190 | |
4191 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
|
4192 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 4193 CallbackData* cbdata = cast(CallbackData*)user_data; |
4194 return cbdata.display.windowProc( cast(GtkWidget*)handle, arg0, cast(int)cbdata.data ); | |
4195 } | |
4196 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
|
4197 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
|
4198 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
|
4199 return widget.windowProc (handle, arg0, user_data); |
27 | 4200 } |
4201 | |
4202 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
|
4203 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 4204 CallbackData* cbdata = cast(CallbackData*)user_data; |
4205 return cbdata.display.windowProc( cast(GtkWidget*)handle, arg0, arg1, cast(int)cbdata.data ); | |
4206 } | |
4207 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
|
4208 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
|
4209 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
|
4210 return widget.windowProc (handle, arg0, arg1, user_data); |
27 | 4211 } |
4212 | |
4213 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
|
4214 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
27 | 4215 CallbackData* cbdata = cast(CallbackData*)user_data; |
4216 return cbdata.display.windowProc( cast(GtkWidget*)handle, arg0, arg1, arg2, cast(int)cbdata.data ); | |
4217 } | |
4218 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
|
4219 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
|
4220 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
|
4221 return widget.windowProc (handle, arg0, arg1, arg2, user_data); |
27 | 4222 } |
4223 | |
47
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4224 package int doWindowTimerAdd( CallbackData* cbdata, int delay, GtkWidget* widget ){ |
221
dc5328912f3d
Fix: Display timer if multiple instances in use.
Frank Benoit <benoit@tionex.de>
parents:
218
diff
changeset
|
4225 OS.g_object_set_data(cast(GObject*)widget, Display.classinfo.name.ptr, cast(void*)this); |
dc5328912f3d
Fix: Display timer if multiple instances in use.
Frank Benoit <benoit@tionex.de>
parents:
218
diff
changeset
|
4226 return OS.gtk_timeout_add (delay, &windowTimerProcFunc, widget); |
27 | 4227 } |
47
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4228 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
|
4229 version(LOG) Stderr.formatln( "Display {}:", __LINE__ ).flush; |
221
dc5328912f3d
Fix: Display timer if multiple instances in use.
Frank Benoit <benoit@tionex.de>
parents:
218
diff
changeset
|
4230 Display d = cast(Display) OS.g_object_get_data(cast(GObject*)user_data, Display.classinfo.name.ptr ); |
dc5328912f3d
Fix: Display timer if multiple instances in use.
Frank Benoit <benoit@tionex.de>
parents:
218
diff
changeset
|
4231 return d.windowTimerProc( cast(GtkWidget*)user_data ); |
47
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4232 } |
f646579f309c
Tray, Tooltip, TrayItem, Item
Frank Benoit <benoit@tionex.de>
parents:
46
diff
changeset
|
4233 |
27 | 4234 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
|
4235 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
|
4236 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
|
4237 return widget.timerProc (handle); |
27 | 4238 } |
18 | 4239 |
4240 } | |
42 | 4241 |
4242 package struct CallbackData { | |
4243 Display display; | |
4244 void* data; | |
4245 } | |
4246 |