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