Mercurial > projects > dwt-linux
annotate dwt/graphics/Cursor.d @ 240:ce446666f5a2
Update to SWT 3.4M7
| author | Frank Benoit <benoit@tionex.de> |
|---|---|
| date | Mon, 12 May 2008 19:13:01 +0200 |
| parents | 380bad9f6852 |
| children | c0d810de7093 |
| rev | line source |
|---|---|
| 72 | 1 /******************************************************************************* |
| 18 | 2 * Copyright (c) 2000, 2007 IBM Corporation and others. |
| 3 * All rights reserved. This program and the accompanying materials | |
| 4 * are made available under the terms of the Eclipse Public License v1.0 | |
| 5 * which accompanies this distribution, and is available at | |
| 6 * http://www.eclipse.org/legal/epl-v10.html | |
| 7 * | |
| 8 * Contributors: | |
| 9 * IBM Corporation - initial API and implementation | |
| 72 | 10 * Port to the D programming language: |
| 11 * Frank Benoit <benoit@tionex.de> | |
| 18 | 12 *******************************************************************************/ |
| 13 module dwt.graphics.Cursor; | |
| 14 | |
| 238 | 15 import dwt.dwthelper.utils; |
| 16 | |
| 18 | 17 |
| 71 | 18 import dwt.DWT; |
| 20 | 19 import dwt.graphics.Resource; |
| 20 import dwt.graphics.Device; | |
| 21 import dwt.graphics.ImageData; | |
| 22 import dwt.graphics.RGB; | |
| 23 import dwt.graphics.PaletteData; | |
| 24 | |
| 25 import dwt.internal.gtk.OS; | |
| 26 | |
| 27 import tango.text.convert.Format; | |
| 28 import tango.stdc.string; | |
| 18 | 29 |
| 30 /** | |
| 31 * Instances of this class manage operating system resources that | |
| 32 * specify the appearance of the on-screen pointer. To create a | |
| 33 * cursor you specify the device and either a simple cursor style | |
| 34 * describing one of the standard operating system provided cursors | |
| 35 * or the image and mask data for the desired appearance. | |
| 36 * <p> | |
| 37 * Application code must explicitly invoke the <code>Cursor.dispose()</code> | |
| 38 * method to release the operating system resources managed by each instance | |
| 39 * when those instances are no longer required. | |
| 40 * </p> | |
| 41 * <dl> | |
| 42 * <dt><b>Styles:</b></dt> | |
| 43 * <dd> | |
| 44 * CURSOR_ARROW, CURSOR_WAIT, CURSOR_CROSS, CURSOR_APPSTARTING, CURSOR_HELP, | |
| 45 * CURSOR_SIZEALL, CURSOR_SIZENESW, CURSOR_SIZENS, CURSOR_SIZENWSE, CURSOR_SIZEWE, | |
| 46 * CURSOR_SIZEN, CURSOR_SIZES, CURSOR_SIZEE, CURSOR_SIZEW, CURSOR_SIZENE, CURSOR_SIZESE, | |
| 47 * CURSOR_SIZESW, CURSOR_SIZENW, CURSOR_UPARROW, CURSOR_IBEAM, CURSOR_NO, CURSOR_HAND | |
| 48 * </dd> | |
| 49 * </dl> | |
| 50 * <p> | |
| 51 * Note: Only one of the above styles may be specified. | |
| 52 * </p> | |
| 53 */ | |
| 20 | 54 public final class Cursor : Resource { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
55 /** |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
56 * the handle to the OS cursor resource |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
57 * (Warning: This field is platform dependent) |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
58 * <p> |
| 71 | 59 * <b>IMPORTANT:</b> This field is <em>not</em> part of the DWT |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
60 * public API. It is marked public only so that it can be shared |
| 71 | 61 * within the packages provided by DWT. It is not available on all |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
62 * platforms and should never be accessed from application code. |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
63 * </p> |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
64 */ |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
65 public GdkCursor* handle; |
| 18 | 66 |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
67 static const byte[] APPSTARTING_SRC = [ cast(byte) |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
68 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x04, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
69 0x0c, 0x00, 0x00, 0x00, 0x1c, 0x00, 0x00, 0x00, 0x3c, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
70 0x7c, 0x00, 0x00, 0x00, cast(byte)0xfc, 0x00, 0x00, 0x00, cast(byte)0xfc, 0x01, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
71 cast(byte)0xfc, 0x3b, 0x00, 0x00, 0x7c, 0x38, 0x00, 0x00, 0x6c, 0x54, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
72 cast(byte)0xc4, cast(byte)0xdc, 0x00, 0x00, cast(byte)0xc0, 0x44, 0x00, 0x00, cast(byte)0x80, 0x39, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
73 cast(byte)0x80, 0x39, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
74 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
75 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
76 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
77 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
78 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00]; |
| 18 | 79 |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
80 static const byte[] APPSTARTING_MASK = [ cast(byte) |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
81 0x00, 0x00, 0x00, 0x00, 0x06, 0x00, 0x00, 0x00, 0x0e, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
82 0x1e, 0x00, 0x00, 0x00, 0x3e, 0x00, 0x00, 0x00, 0x7e, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
83 cast(byte)0xfe, 0x00, 0x00, 0x00, cast(byte)0xfe, 0x01, 0x00, 0x00, cast(byte)0xfe, 0x3b, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
84 cast(byte)0xfe, 0x7f, 0x00, 0x00, cast(byte)0xfe, 0x7f, 0x00, 0x00, cast(byte)0xfe, cast(byte)0xfe, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
85 cast(byte)0xee, cast(byte)0xff, 0x01, 0x00, cast(byte)0xe4, cast(byte)0xff, 0x00, 0x00, cast(byte)0xc0, 0x7f, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
86 cast(byte)0xc0, 0x7f, 0x00, 0x00, cast(byte)0x80, 0x39, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
87 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
88 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
89 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
90 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
91 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00]; |
| 18 | 92 |
| 240 | 93 this (Device device) { |
| 94 super(device); | |
| 18 | 95 } |
| 96 | |
| 97 /** | |
| 98 * Constructs a new cursor given a device and a style | |
| 99 * constant describing the desired cursor appearance. | |
| 100 * <p> | |
| 101 * You must dispose the cursor when it is no longer required. | |
| 102 * </p> | |
| 103 * | |
| 104 * @param device the device on which to allocate the cursor | |
| 105 * @param style the style of cursor to allocate | |
| 106 * | |
| 107 * @exception IllegalArgumentException <ul> | |
| 108 * <li>ERROR_NULL_ARGUMENT - if device is null and there is no current device</li> | |
| 109 * <li>ERROR_INVALID_ARGUMENT - when an unknown style is specified</li> | |
| 110 * </ul> | |
| 71 | 111 * @exception DWTError <ul> |
| 18 | 112 * <li>ERROR_NO_HANDLES - if a handle could not be obtained for cursor creation</li> |
| 113 * </ul> | |
| 114 * | |
| 71 | 115 * @see DWT#CURSOR_ARROW |
| 116 * @see DWT#CURSOR_WAIT | |
| 117 * @see DWT#CURSOR_CROSS | |
| 118 * @see DWT#CURSOR_APPSTARTING | |
| 119 * @see DWT#CURSOR_HELP | |
| 120 * @see DWT#CURSOR_SIZEALL | |
| 121 * @see DWT#CURSOR_SIZENESW | |
| 122 * @see DWT#CURSOR_SIZENS | |
| 123 * @see DWT#CURSOR_SIZENWSE | |
| 124 * @see DWT#CURSOR_SIZEWE | |
| 125 * @see DWT#CURSOR_SIZEN | |
| 126 * @see DWT#CURSOR_SIZES | |
| 127 * @see DWT#CURSOR_SIZEE | |
| 128 * @see DWT#CURSOR_SIZEW | |
| 129 * @see DWT#CURSOR_SIZENE | |
| 130 * @see DWT#CURSOR_SIZESE | |
| 131 * @see DWT#CURSOR_SIZESW | |
| 132 * @see DWT#CURSOR_SIZENW | |
| 133 * @see DWT#CURSOR_UPARROW | |
| 134 * @see DWT#CURSOR_IBEAM | |
| 135 * @see DWT#CURSOR_NO | |
| 136 * @see DWT#CURSOR_HAND | |
| 18 | 137 */ |
| 20 | 138 public this(Device device, int style) { |
| 240 | 139 super(device); |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
140 int shape = 0; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
141 switch (style) { |
| 71 | 142 case DWT.CURSOR_APPSTARTING: break; |
| 143 case DWT.CURSOR_ARROW: shape = OS.GDK_LEFT_PTR; break; | |
| 144 case DWT.CURSOR_WAIT: shape = OS.GDK_WATCH; break; | |
| 145 case DWT.CURSOR_CROSS: shape = OS.GDK_CROSS; break; | |
| 146 case DWT.CURSOR_HAND: shape = OS.GDK_HAND2; break; | |
| 147 case DWT.CURSOR_HELP: shape = OS.GDK_QUESTION_ARROW; break; | |
| 148 case DWT.CURSOR_SIZEALL: shape = OS.GDK_FLEUR; break; | |
| 149 case DWT.CURSOR_SIZENESW: shape = OS.GDK_SIZING; break; | |
| 150 case DWT.CURSOR_SIZENS: shape = OS.GDK_DOUBLE_ARROW; break; | |
| 151 case DWT.CURSOR_SIZENWSE: shape = OS.GDK_SIZING; break; | |
| 152 case DWT.CURSOR_SIZEWE: shape = OS.GDK_SB_H_DOUBLE_ARROW; break; | |
| 153 case DWT.CURSOR_SIZEN: shape = OS.GDK_TOP_SIDE; break; | |
| 154 case DWT.CURSOR_SIZES: shape = OS.GDK_BOTTOM_SIDE; break; | |
| 155 case DWT.CURSOR_SIZEE: shape = OS.GDK_RIGHT_SIDE; break; | |
| 156 case DWT.CURSOR_SIZEW: shape = OS.GDK_LEFT_SIDE; break; | |
| 157 case DWT.CURSOR_SIZENE: shape = OS.GDK_TOP_RIGHT_CORNER; break; | |
| 158 case DWT.CURSOR_SIZESE: shape = OS.GDK_BOTTOM_RIGHT_CORNER; break; | |
| 159 case DWT.CURSOR_SIZESW: shape = OS.GDK_BOTTOM_LEFT_CORNER; break; | |
| 160 case DWT.CURSOR_SIZENW: shape = OS.GDK_TOP_LEFT_CORNER; break; | |
| 161 case DWT.CURSOR_UPARROW: shape = OS.GDK_SB_UP_ARROW; break; | |
| 162 case DWT.CURSOR_IBEAM: shape = OS.GDK_XTERM; break; | |
| 163 case DWT.CURSOR_NO: shape = OS.GDK_X_CURSOR; break; | |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
164 default: |
| 71 | 165 DWT.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:
33
diff
changeset
|
166 } |
| 194 | 167 if (shape is 0 && style is DWT.CURSOR_APPSTARTING) { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
168 handle = createCursor(APPSTARTING_SRC, APPSTARTING_MASK, 32, 32, 2, 2, true); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
169 } else { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
170 handle = OS.gdk_cursor_new(shape); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
171 } |
| 71 | 172 if (handle is null) DWT.error(DWT.ERROR_NO_HANDLES); |
| 240 | 173 init_(); |
| 18 | 174 } |
| 175 | |
| 176 /** | |
| 177 * Constructs a new cursor given a device, image and mask | |
| 178 * data describing the desired cursor appearance, and the x | |
| 179 * and y coordinates of the <em>hotspot</em> (that is, the point | |
| 180 * within the area covered by the cursor which is considered | |
| 181 * to be where the on-screen pointer is "pointing"). | |
| 182 * <p> | |
| 183 * The mask data is allowed to be null, but in this case the source | |
| 184 * must be an ImageData representing an icon that specifies both | |
| 185 * color data and mask data. | |
| 186 * <p> | |
| 187 * You must dispose the cursor when it is no longer required. | |
| 188 * </p> | |
| 189 * | |
| 190 * @param device the device on which to allocate the cursor | |
| 191 * @param source the color data for the cursor | |
| 192 * @param mask the mask data for the cursor (or null) | |
| 193 * @param hotspotX the x coordinate of the cursor's hotspot | |
| 194 * @param hotspotY the y coordinate of the cursor's hotspot | |
| 195 * | |
| 196 * @exception IllegalArgumentException <ul> | |
| 197 * <li>ERROR_NULL_ARGUMENT - if device is null and there is no current device</li> | |
| 198 * <li>ERROR_NULL_ARGUMENT - if the source is null</li> | |
| 199 * <li>ERROR_NULL_ARGUMENT - if the mask is null and the source does not have a mask</li> | |
| 200 * <li>ERROR_INVALID_ARGUMENT - if the source and the mask are not the same | |
| 201 * size, or if the hotspot is outside the bounds of the image</li> | |
| 202 * </ul> | |
| 71 | 203 * @exception DWTError <ul> |
| 18 | 204 * <li>ERROR_NO_HANDLES - if a handle could not be obtained for cursor creation</li> |
| 205 * </ul> | |
| 206 */ | |
| 20 | 207 public this(Device device, ImageData source, ImageData mask, int hotspotX, int hotspotY) { |
| 240 | 208 super(device); |
| 194 | 209 if (source is null) DWT.error(DWT.ERROR_NULL_ARGUMENT); |
| 210 if (mask is null) { | |
| 211 if (!(source.getTransparencyType() is DWT.TRANSPARENCY_MASK)) DWT.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:
33
diff
changeset
|
212 mask = source.getTransparencyMask(); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
213 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
214 /* Check the bounds. Mask must be the same size as source */ |
| 194 | 215 if (mask.width !is source.width || mask.height !is source.height) { |
| 71 | 216 DWT.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:
33
diff
changeset
|
217 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
218 /* Check the hotspots */ |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
219 if (hotspotX >= source.width || hotspotX < 0 || |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
220 hotspotY >= source.height || hotspotY < 0) { |
| 71 | 221 DWT.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:
33
diff
changeset
|
222 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
223 /* Convert depth to 1 */ |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
224 source = ImageData.convertMask(source); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
225 mask = ImageData.convertMask(mask); |
| 18 | 226 |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
227 /* Swap the bits in each byte and convert to appropriate scanline pad */ |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
228 byte[] sourceData = new byte[source.data.length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
229 byte[] maskData = new byte[mask.data.length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
230 byte[] data = source.data; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
231 for (int i = 0; i < data.length; i++) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
232 byte s = data[i]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
233 sourceData[i] = cast(byte)(((s & 0x80) >> 7) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
234 ((s & 0x40) >> 5) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
235 ((s & 0x20) >> 3) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
236 ((s & 0x10) >> 1) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
237 ((s & 0x08) << 1) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
238 ((s & 0x04) << 3) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
239 ((s & 0x02) << 5) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
240 ((s & 0x01) << 7)); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
241 sourceData[i] = cast(byte) ~sourceData[i]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
242 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
243 sourceData = ImageData.convertPad(sourceData, source.width, source.height, source.depth, source.scanlinePad, 1); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
244 data = mask.data; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
245 for (int i = 0; i < data.length; i++) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
246 byte s = data[i]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
247 maskData[i] = cast(byte)(((s & 0x80) >> 7) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
248 ((s & 0x40) >> 5) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
249 ((s & 0x20) >> 3) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
250 ((s & 0x10) >> 1) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
251 ((s & 0x08) << 1) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
252 ((s & 0x04) << 3) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
253 ((s & 0x02) << 5) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
254 ((s & 0x01) << 7)); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
255 maskData[i] = cast(byte) ~maskData[i]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
256 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
257 maskData = ImageData.convertPad(maskData, mask.width, mask.height, mask.depth, mask.scanlinePad, 1); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
258 handle = createCursor(maskData, sourceData, source.width, source.height, hotspotX, hotspotY, true); |
| 71 | 259 if (handle is null) DWT.error(DWT.ERROR_NO_HANDLES); |
| 240 | 260 init_(); |
| 18 | 261 } |
| 262 | |
| 263 /** | |
| 264 * Constructs a new cursor given a device, image data describing | |
| 265 * the desired cursor appearance, and the x and y coordinates of | |
| 266 * the <em>hotspot</em> (that is, the point within the area | |
| 267 * covered by the cursor which is considered to be where the | |
| 268 * on-screen pointer is "pointing"). | |
| 269 * <p> | |
| 270 * You must dispose the cursor when it is no longer required. | |
| 271 * </p> | |
| 272 * | |
| 273 * @param device the device on which to allocate the cursor | |
| 274 * @param source the image data for the cursor | |
| 275 * @param hotspotX the x coordinate of the cursor's hotspot | |
| 276 * @param hotspotY the y coordinate of the cursor's hotspot | |
| 277 * | |
| 278 * @exception IllegalArgumentException <ul> | |
| 279 * <li>ERROR_NULL_ARGUMENT - if device is null and there is no current device</li> | |
| 280 * <li>ERROR_NULL_ARGUMENT - if the image is null</li> | |
| 281 * <li>ERROR_INVALID_ARGUMENT - if the hotspot is outside the bounds of the | |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
282 * image</li> |
| 18 | 283 * </ul> |
| 71 | 284 * @exception DWTError <ul> |
| 18 | 285 * <li>ERROR_NO_HANDLES - if a handle could not be obtained for cursor creation</li> |
| 286 * </ul> | |
| 287 * | |
| 288 * @since 3.0 | |
| 289 */ | |
| 20 | 290 public this(Device device, ImageData source, int hotspotX, int hotspotY) { |
| 240 | 291 super(device); |
| 194 | 292 if (source is null) DWT.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:
33
diff
changeset
|
293 if (hotspotX >= source.width || hotspotX < 0 || |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
294 hotspotY >= source.height || hotspotY < 0) { |
| 71 | 295 DWT.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:
33
diff
changeset
|
296 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
297 GdkDisplay* display; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
298 if (OS.GTK_VERSION >= OS.buildVERSION(2, 4, 0) && OS.gdk_display_supports_cursor_color(display = OS.gdk_display_get_default ())) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
299 int width = source.width; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
300 int height = source.height; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
301 PaletteData palette = source.palette; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
302 auto pixbuf = OS.gdk_pixbuf_new(OS.GDK_COLORSPACE_RGB, true, 8, width, height); |
| 71 | 303 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:
33
diff
changeset
|
304 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:
33
diff
changeset
|
305 auto data = 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:
33
diff
changeset
|
306 byte[] buffer = source.data; |
| 194 | 307 if (!palette.isDirect || source.depth !is 24 || stride !is source.bytesPerLine || palette.redMask !is 0xFF000000 || palette.greenMask !is 0xFF0000 || palette.blueMask !is 0xFF00) { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
308 buffer = new byte[source.width * source.height * 4]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
309 if (palette.isDirect) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
310 ImageData.blit(ImageData.BLIT_SRC, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
311 source.data, source.depth, source.bytesPerLine, source.getByteOrder(), 0, 0, source.width, source.height, palette.redMask, palette.greenMask, palette.blueMask, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
312 ImageData.ALPHA_OPAQUE, null, 0, 0, 0, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
313 buffer, 32, source.width * 4, ImageData.MSB_FIRST, 0, 0, source.width, source.height, 0xFF000000, 0xFF0000, 0xFF00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
314 false, false); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
315 } else { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
316 RGB[] rgbs = palette.getRGBs(); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
317 int length = rgbs.length; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
318 byte[] srcReds = new byte[length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
319 byte[] srcGreens = new byte[length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
320 byte[] srcBlues = new byte[length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
321 for (int i = 0; i < rgbs.length; i++) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
322 RGB rgb = rgbs[i]; |
| 194 | 323 if (rgb is null) continue; |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
324 srcReds[i] = cast(byte)rgb.red; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
325 srcGreens[i] = cast(byte)rgb.green; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
326 srcBlues[i] = cast(byte)rgb.blue; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
327 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
328 ImageData.blit(ImageData.BLIT_SRC, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
329 source.data, source.depth, source.bytesPerLine, source.getByteOrder(), 0, 0, source.width, source.height, srcReds, srcGreens, srcBlues, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
330 ImageData.ALPHA_OPAQUE, null, 0, 0, 0, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
331 buffer, 32, source.width * 4, ImageData.MSB_FIRST, 0, 0, source.width, source.height, 0xFF000000, 0xFF0000, 0xFF00, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
332 false, false); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
333 } |
| 194 | 334 if (source.maskData !is null || source.transparentPixel !is -1) { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
335 ImageData mask = source.getTransparencyMask(); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
336 byte[] maskData = mask.data; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
337 int maskBpl = mask.bytesPerLine; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
338 int offset = 3, maskOffset = 0; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
339 for (int y = 0; y<source.height; y++) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
340 for (int x = 0; x<source.width; x++) { |
| 194 | 341 buffer[offset] = ((maskData[maskOffset + (x >> 3)]) & (1 << (7 - (x & 0x7)))) !is 0 ? cast(byte)0xff : 0; |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
342 offset += 4; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
343 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
344 maskOffset += maskBpl; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
345 } |
| 194 | 346 } else if (source.alpha !is -1) { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
347 byte alpha = cast(byte)source.alpha; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
348 for (int i=3; i<buffer.length; i+=4) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
349 buffer[i] = alpha; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
350 } |
| 194 | 351 } else if (source.alphaData !is null) { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
352 byte[] alphaData = source.alphaData; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
353 for (int i=3; i<buffer.length; i+=4) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
354 buffer[i] = alphaData[i/4]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
355 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
356 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
357 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
358 memmove(data, buffer.ptr, stride * height); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
359 handle = OS.gdk_cursor_new_from_pixbuf(display, pixbuf, hotspotX, hotspotY); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
360 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:
33
diff
changeset
|
361 } else { |
| 18 | 362 |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
363 ImageData mask = source.getTransparencyMask(); |
| 18 | 364 |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
365 /* Ensure depth is equal to 1 */ |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
366 if (source.depth > 1) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
367 /* Create a destination image with no data */ |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
368 ImageData newSource = new ImageData( |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
369 source.width, source.height, 1, ImageData.bwPalette(), |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
370 1, null, 0, null, null, -1, -1, 0, 0, 0, 0, 0); |
| 18 | 371 |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
372 byte[] newReds = [ cast(byte)0, cast(byte)255 ], newGreens = newReds, newBlues = newReds; |
| 18 | 373 |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
374 /* Convert the source to a black and white image of depth 1 */ |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
375 PaletteData palette = source.palette; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
376 if (palette.isDirect) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
377 ImageData.blit(ImageData.BLIT_SRC, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
378 source.data, source.depth, source.bytesPerLine, source.getByteOrder(), 0, 0, source.width, source.height, palette.redMask, palette.greenMask, palette.blueMask, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
379 ImageData.ALPHA_OPAQUE, null, 0, 0, 0, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
380 newSource.data, newSource.depth, newSource.bytesPerLine, newSource.getByteOrder(), 0, 0, newSource.width, newSource.height, newReds, newGreens, newBlues, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
381 false, false); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
382 } else { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
383 RGB[] rgbs = palette.getRGBs(); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
384 int length = rgbs.length; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
385 byte[] srcReds = new byte[length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
386 byte[] srcGreens = new byte[length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
387 byte[] srcBlues = new byte[length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
388 for (int i = 0; i < rgbs.length; i++) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
389 RGB rgb = rgbs[i]; |
| 194 | 390 if (rgb is null) continue; |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
391 srcReds[i] = cast(byte)rgb.red; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
392 srcGreens[i] = cast(byte)rgb.green; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
393 srcBlues[i] = cast(byte)rgb.blue; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
394 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
395 ImageData.blit(ImageData.BLIT_SRC, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
396 source.data, source.depth, source.bytesPerLine, source.getByteOrder(), 0, 0, source.width, source.height, srcReds, srcGreens, srcBlues, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
397 ImageData.ALPHA_OPAQUE, null, 0, 0, 0, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
398 newSource.data, newSource.depth, newSource.bytesPerLine, newSource.getByteOrder(), 0, 0, newSource.width, newSource.height, newReds, newGreens, newBlues, |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
399 false, false); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
400 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
401 source = newSource; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
402 } |
| 18 | 403 |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
404 /* Swap the bits in each byte and convert to appropriate scanline pad */ |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
405 byte[] sourceData = new byte[source.data.length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
406 byte[] maskData = new byte[mask.data.length]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
407 byte[] data = source.data; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
408 for (int i = 0; i < data.length; i++) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
409 byte s = data[i]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
410 sourceData[i] = cast(byte)(((s & 0x80) >> 7) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
411 ((s & 0x40) >> 5) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
412 ((s & 0x20) >> 3) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
413 ((s & 0x10) >> 1) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
414 ((s & 0x08) << 1) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
415 ((s & 0x04) << 3) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
416 ((s & 0x02) << 5) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
417 ((s & 0x01) << 7)); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
418 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
419 sourceData = ImageData.convertPad(sourceData, source.width, source.height, source.depth, source.scanlinePad, 1); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
420 data = mask.data; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
421 for (int i = 0; i < data.length; i++) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
422 byte s = data[i]; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
423 maskData[i] = cast(byte)(((s & 0x80) >> 7) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
424 ((s & 0x40) >> 5) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
425 ((s & 0x20) >> 3) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
426 ((s & 0x10) >> 1) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
427 ((s & 0x08) << 1) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
428 ((s & 0x04) << 3) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
429 ((s & 0x02) << 5) | |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
430 ((s & 0x01) << 7)); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
431 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
432 maskData = ImageData.convertPad(maskData, mask.width, mask.height, mask.depth, mask.scanlinePad, 1); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
433 handle = createCursor(sourceData, maskData, source.width, source.height, hotspotX, hotspotY, false); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
434 } |
| 71 | 435 if (handle is null) DWT.error(DWT.ERROR_NO_HANDLES); |
| 240 | 436 init_(); |
| 18 | 437 } |
| 438 | |
| 20 | 439 GdkCursor* createCursor(byte[] sourceData, byte[] maskData, int width, int height, int hotspotX, int hotspotY, bool reverse) { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
440 auto sourcePixmap = OS.gdk_bitmap_create_from_data(null, cast(char*)sourceData.ptr, width, height); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
441 auto maskPixmap = OS.gdk_bitmap_create_from_data(null, cast(char*)maskData.ptr, width, height); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
442 GdkCursor* cursor = null; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
443 if (sourcePixmap !is null && maskPixmap !is null) { |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
444 GdkColor* foreground = new GdkColor(); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
445 if (!reverse) foreground.red = foreground.green = foreground.blue = 0xFFFF; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
446 GdkColor* background = new GdkColor(); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
447 if (reverse) background.red = background.green = background.blue = 0xFFFF; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
448 cursor = OS.gdk_cursor_new_from_pixmap (cast(GdkPixmap*)sourcePixmap, cast(GdkPixmap*)maskPixmap, foreground, background, hotspotX, hotspotY); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
449 } |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
450 if (sourcePixmap !is null) OS.g_object_unref (sourcePixmap); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
451 if (maskPixmap !is null) OS.g_object_unref (maskPixmap); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
452 return cursor; |
| 18 | 453 } |
| 454 | |
| 240 | 455 void destroy() { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
456 OS.gdk_cursor_destroy(handle); |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
457 handle = null; |
| 18 | 458 } |
| 459 | |
| 460 /** | |
| 461 * Compares the argument to the receiver, and returns true | |
| 462 * if they represent the <em>same</em> object using a class | |
| 463 * specific comparison. | |
| 464 * | |
| 465 * @param object the object to compare with this object | |
| 466 * @return <code>true</code> if the object is the same as this object and <code>false</code> otherwise | |
| 467 * | |
| 468 * @see #hashCode | |
| 469 */ | |
| 20 | 470 public override int opEquals(Object object) { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
471 if (object is this) return true; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
472 if ( auto cursor = cast(Cursor)object ){ |
| 20 | 473 return device is cursor.device && handle is cursor.handle; |
| 474 } | |
| 475 return false; | |
| 18 | 476 } |
| 477 | |
| 478 /** | |
| 479 * Invokes platform specific functionality to allocate a new cursor. | |
| 480 * <p> | |
| 481 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public | |
| 482 * API for <code>Cursor</code>. It is marked public only so that it | |
| 71 | 483 * can be shared within the packages provided by DWT. It is not |
| 18 | 484 * available on all platforms, and should never be called from |
| 485 * application code. | |
| 486 * </p> | |
| 487 * | |
| 488 * @param device the device on which to allocate the color | |
| 489 * @param handle the handle for the cursor | |
| 490 * | |
| 491 * @private | |
| 492 */ | |
| 20 | 493 public static Cursor gtk_new(Device device, GdkCursor* handle) { |
| 240 | 494 Cursor cursor = new Cursor(device); |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
495 cursor.handle = handle; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
496 return cursor; |
| 18 | 497 } |
| 498 | |
| 499 /** | |
| 500 * Returns an integer hash code for the receiver. Any two | |
| 501 * objects that return <code>true</code> when passed to | |
| 502 * <code>equals</code> must return the same value for this | |
| 503 * method. | |
| 504 * | |
| 505 * @return the receiver's hash | |
| 506 * | |
| 507 * @see #equals | |
| 508 */ | |
| 20 | 509 public override hash_t toHash() { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
510 return cast(hash_t)handle; |
| 18 | 511 } |
| 512 | |
| 513 /** | |
| 514 * Returns <code>true</code> if the cursor has been disposed, | |
| 515 * and <code>false</code> otherwise. | |
| 516 * <p> | |
| 517 * This method gets the dispose state for the cursor. | |
| 518 * When a cursor has been disposed, it is an error to | |
| 519 * invoke any other method using the cursor. | |
| 520 * | |
| 521 * @return <code>true</code> when the cursor is disposed and <code>false</code> otherwise | |
| 522 */ | |
|
150
f2e04420fd6c
reworked overrides and superclass aliases
Frank Benoit <benoit@tionex.de>
parents:
72
diff
changeset
|
523 public override bool isDisposed() { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
524 return handle is null; |
| 18 | 525 } |
| 526 | |
| 527 /** | |
| 528 * Returns a string containing a concise, human-readable | |
| 529 * description of the receiver. | |
| 530 * | |
| 531 * @return a string representation of the receiver | |
| 532 */ | |
| 238 | 533 public override String toString () { |
|
59
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
534 if (isDisposed()) return "Cursor {*DISPOSED*}"; |
|
8cec8f536af3
All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents:
33
diff
changeset
|
535 return Format( "Cursor {{{}}", handle ); |
| 18 | 536 } |
| 537 | |
| 538 } |