projects/dwt-win: dwt/widgets/Group.d annotate

annotate dwt/widgets/Group.d @ 249:b3dbd786541a

Fix: compile errors

author	Frank Benoit <benoit@tionex.de>
date	Sun, 06 Jul 2008 17:23:35 +0200
parents	fd9c62a2998e
children

rev	line source
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1 /*******************************************************************************
246 fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	2 * Copyright (c) 2000, 2008 IBM Corporation and others.
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	3 * All rights reserved. This program and the accompanying materials
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	4 * are made available under the terms of the Eclipse Public License v1.0
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	5 * which accompanies this distribution, and is available at
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	6 * http://www.eclipse.org/legal/epl-v10.html
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	7 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	8 * Contributors:
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	9 * IBM Corporation - initial API and implementation
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	10 * Port to the D programming language:
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	11 * Frank Benoit <benoit@tionex.de>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	12 *******************************************************************************/
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	13 module dwt.widgets.Group;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	14
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	15
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	16 import dwt.DWT;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	17 import dwt.DWTException;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	18 import dwt.graphics.Font;
246 fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	19 import dwt.graphics.GC;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	20 import dwt.graphics.Point;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	21 import dwt.graphics.Rectangle;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	22 import dwt.internal.win32.OS;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	23 import dwt.widgets.Composite;
249 b3dbd786541a Fix: compile errors Frank Benoit <benoit@tionex.de> parents: 246 diff changeset	24 import dwt.widgets.Control;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	25
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	26 import dwt.dwthelper.utils;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	27
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	28 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	29 * Instances of this class provide an etched border
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	30 * with an optional title.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	31 * <p>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	32 * Shadow styles are hints and may not be honoured
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	33 * by the platform. To create a group with the
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	34 * default shadow style for the platform, do not
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	35 * specify a shadow style.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	36 * <dl>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	37 * <dt><b>Styles:</b></dt>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	38 * <dd>SHADOW_ETCHED_IN, SHADOW_ETCHED_OUT, SHADOW_IN, SHADOW_OUT, SHADOW_NONE</dd>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	39 * <dt><b>Events:</b></dt>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	40 * <dd>(none)</dd>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	41 * </dl>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	42 * <p>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	43 * Note: Only one of the above styles may be specified.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	44 * </p><p>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	45 * IMPORTANT: This class is <em>not</em> intended to be subclassed.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	46 * </p>
246 fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	47 *
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	48 * @see <a href="http://www.eclipse.org/swt/examples.php">DWT Example: ControlExample</a>
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	49 * @see <a href="http://www.eclipse.org/swt/">Sample code and further information</a>
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	50 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	51
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	52 public class Group : Composite {
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	53
0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	54 alias Composite.computeSize computeSize;
0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	55 alias Composite.windowProc windowProc;
0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	56
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	57 String text = "";
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	58 static const int CLIENT_INSET = 3;
80 1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	59 private static /+const+/ WNDPROC GroupProc;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	60 static if( OS.IsWinCE ){
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	61 static const TCHAR[] GroupClass = "BUTTON\0";
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	62 }
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	63 else{
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	64 static const TCHAR[] GroupClass = "SWT_GROUP\0";
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	65 }
80 1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	66
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	67 private static bool static_this_completed = false;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	68 private static void static_this() {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	69 if( static_this_completed ){
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	70 return;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	71 }
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	72 synchronized {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	73 if( static_this_completed ){
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	74 return;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	75 }
80 1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	76 /*
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	77 * Feature in Windows. The group box window class
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	78 * uses the CS_HREDRAW and CS_VREDRAW style bits to
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	79 * force a full redraw of the control and all children
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	80 * when resized. This causes flashing. The fix is to
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	81 * register a new window class without these bits and
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	82 * implement special code that damages only the control.
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	83 *
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	84 * Feature in WinCE. On certain devices, defining
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	85 * a new window class which looks like BUTTON causes
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	86 * CreateWindowEx() to crash. The workaround is to use
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	87 * the class Button directly.
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	88 */
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	89 WNDCLASS lpWndClass;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	90 static if (OS.IsWinCE) {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	91 OS.GetClassInfo (null, GroupClass.ptr, &lpWndClass);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	92 GroupProc = lpWndClass.lpfnWndProc;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	93 } else {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	94 TCHAR[] WC_BUTTON = "BUTTON\0";
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	95 OS.GetClassInfo (null, WC_BUTTON.ptr, &lpWndClass);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	96 GroupProc = lpWndClass.lpfnWndProc;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	97 auto hInstance = OS.GetModuleHandle (null);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	98 if (!OS.GetClassInfo (hInstance, GroupClass.ptr, &lpWndClass)) {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	99 auto hHeap = OS.GetProcessHeap ();
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	100 lpWndClass.hInstance = hInstance;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	101 lpWndClass.style &= ~(OS.CS_HREDRAW \| OS.CS_VREDRAW);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	102 int byteCount = GroupClass.length * TCHAR.sizeof;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	103 auto lpszClassName = cast(TCHAR*)OS.HeapAlloc (hHeap, OS.HEAP_ZERO_MEMORY, byteCount);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	104 OS.MoveMemory (lpszClassName, GroupClass.ptr, byteCount);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	105 lpWndClass.lpszClassName = lpszClassName;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	106 OS.RegisterClass (&lpWndClass);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	107 OS.HeapFree (hHeap, 0, lpszClassName);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	108 }
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	109 }
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	110 static_this_completed = true;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	111 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	112 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	113
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	114 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	115 * Constructs a new instance of this class given its parent
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	116 * and a style value describing its behavior and appearance.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	117 * <p>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	118 * The style value is either one of the style constants defined in
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	119 * class <code>DWT</code> which is applicable to instances of this
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	120 * class, or must be built by <em>bitwise OR</em>'ing together
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	121 * (that is, using the <code>int</code> "\|" operator) two or more
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	122 * of those <code>DWT</code> style constants. The class description
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	123 * lists the style constants that are applicable to the class.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	124 * Style bits are also inherited from superclasses.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	125 * </p>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	126 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	127 * @param parent a composite control which will be the parent of the new instance (cannot be null)
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	128 * @param style the style of control to construct
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	129 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	130 * @exception IllegalArgumentException <ul>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	131 * <li>ERROR_NULL_ARGUMENT - if the parent is null</li>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	132 * </ul>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	133 * @exception DWTException <ul>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	134 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the parent</li>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	135 * <li>ERROR_INVALID_SUBCLASS - if this class is not an allowed subclass</li>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	136 * </ul>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	137 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	138 * @see DWT#SHADOW_ETCHED_IN
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	139 * @see DWT#SHADOW_ETCHED_OUT
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	140 * @see DWT#SHADOW_IN
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	141 * @see DWT#SHADOW_OUT
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	142 * @see DWT#SHADOW_NONE
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	143 * @see Widget#checkSubclass
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	144 * @see Widget#getStyle
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	145 */
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	146 public this (Composite parent, int style) {
80 1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	147 static_this();
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	148 super (parent, checkStyle (style));
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	149 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	150
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	151 override int callWindowProc (HWND hwnd, int msg, int wParam, int lParam) {
6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	152 if (handle is null) return 0;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	153 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	154 * Feature in Windows. When the user clicks on the group
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	155 * box label, the group box takes focus. This is unwanted.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	156 * The fix is to avoid calling the group box window proc.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	157 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	158 switch (msg) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	159 case OS.WM_LBUTTONDOWN:
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	160 case OS.WM_LBUTTONDBLCLK:
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	161 return OS.DefWindowProc (hwnd, msg, wParam, lParam);
82 43c42c637c9c First simple example works Frank Benoit <benoit@tionex.de> parents: 80 diff changeset	162 default:
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	163 }
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	164 return OS.CallWindowProc (GroupProc, hwnd, msg, wParam, lParam);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	165 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	166
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	167 static int checkStyle (int style) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	168 style \|= DWT.NO_FOCUS;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	169 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	170 * Even though it is legal to create this widget
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	171 * with scroll bars, they serve no useful purpose
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	172 * because they do not automatically scroll the
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	173 * widget's client area. The fix is to clear
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	174 * the DWT style.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	175 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	176 return style & ~(DWT.H_SCROLL \| DWT.V_SCROLL);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	177 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	178
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	179 override protected void checkSubclass () {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	180 if (!isValidSubclass ()) error (DWT.ERROR_INVALID_SUBCLASS);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	181 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	182
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	183 override public Point computeSize (int wHint, int hHint, bool changed) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	184 checkWidget ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	185 Point size = super.computeSize (wHint, hHint, changed);
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	186 int length = text.length;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	187 if (length !is 0) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	188 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	189 * Bug in Windows. When a group control is right-to-left and
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	190 * is disabled, the first pixel of the text is clipped. The
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	191 * fix is to add a space to both sides of the text. Note that
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	192 * the work around must run all the time to stop the preferred
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	193 * size from changing when a group is enabled and disabled.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	194 */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	195 String string = text;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	196 if ((style & DWT.RIGHT_TO_LEFT) !is 0) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	197 if (OS.COMCTL32_MAJOR < 6 \|\| !OS.IsAppThemed ()) {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	198 string = " " ~ string ~ " ";
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	199 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	200 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	201 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	202 * If the group has text, and the text is wider than the
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	203 * client area, pad the width so the text is not clipped.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	204 */
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	205 TCHAR* buffer = StrToTCHARz (/+getCodePage (),+/ string);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	206 HFONT newFont, oldFont;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	207 auto hDC = OS.GetDC (handle);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	208 newFont = cast(HFONT) OS.SendMessage (handle, OS.WM_GETFONT, 0, 0);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	209 if (newFont !is null) oldFont = OS.SelectObject (hDC, newFont);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	210 RECT rect;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	211 int flags = OS.DT_CALCRECT \| OS.DT_SINGLELINE;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	212 OS.DrawText (hDC, buffer, -1, &rect, flags);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	213 if (newFont !is null) OS.SelectObject (hDC, oldFont);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	214 OS.ReleaseDC (handle, hDC);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	215 int offsetY = OS.COMCTL32_MAJOR >= 6 && OS.IsAppThemed () ? 0 : 1;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	216 size.x = Math.max (size.x, rect.right - rect.left + CLIENT_INSET * 6 + offsetY);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	217 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	218 return size;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	219 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	220
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	221 override public Rectangle computeTrim (int x, int y, int width, int height) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	222 checkWidget ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	223 Rectangle trim = super.computeTrim (x, y, width, height);
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	224 HFONT newFont, oldFont;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	225 auto hDC = OS.GetDC (handle);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	226 newFont = cast(HFONT) OS.SendMessage (handle, OS.WM_GETFONT, 0, 0);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	227 if (newFont !is null) oldFont = OS.SelectObject (hDC, newFont);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	228 TEXTMETRIC tm;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	229 OS.GetTextMetrics (hDC, &tm);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	230 if (newFont !is null) OS.SelectObject (hDC, oldFont);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	231 OS.ReleaseDC (handle, hDC);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	232 int offsetY = OS.COMCTL32_MAJOR >= 6 && OS.IsAppThemed () ? 0 : 1;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	233 trim.x -= CLIENT_INSET;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	234 trim.y -= tm.tmHeight + offsetY;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	235 trim.width += CLIENT_INSET * 2;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	236 trim.height += tm.tmHeight + CLIENT_INSET;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	237 return trim;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	238 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	239
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	240 override void createHandle () {
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	241 /*
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	242 * Feature in Windows. When a button is created,
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	243 * it clears the UI state for all controls in the
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	244 * shell by sending WM_CHANGEUISTATE with UIS_SET,
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	245 * UISF_HIDEACCEL and UISF_HIDEFOCUS to the parent.
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	246 * This is undocumented and unexpected. The fix
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	247 * is to ignore the WM_CHANGEUISTATE, when sent
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	248 * from CreateWindowEx().
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	249 */
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	250 parent.state \|= IGNORE_WM_CHANGEUISTATE;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	251 super.createHandle ();
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	252 parent.state &= ~IGNORE_WM_CHANGEUISTATE;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	253 state \|= DRAW_BACKGROUND;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	254 state &= ~CANVAS;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	255 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	256
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	257 override void enableWidget (bool enabled) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	258 super.enableWidget (enabled);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	259 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	260 * Bug in Windows. When a group control is right-to-left and
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	261 * is disabled, the first pixel of the text is clipped. The
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	262 * fix is to add a space to both sides of the text.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	263 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	264 if ((style & DWT.RIGHT_TO_LEFT) !is 0) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	265 if (OS.COMCTL32_MAJOR < 6 \|\| !OS.IsAppThemed ()) {
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	266 String string = enabled \|\| text.length is 0 ? text : " " ~ text ~ " ";
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	267 TCHAR* buffer = StrToTCHARz (/+getCodePage (),+/ string);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	268 OS.SetWindowText (handle, buffer);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	269 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	270 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	271 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	272
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	273 override public Rectangle getClientArea () {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	274 checkWidget ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	275 forceResize ();
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	276 RECT rect;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	277 OS.GetClientRect (handle, &rect);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	278 HFONT newFont, oldFont;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	279 auto hDC = OS.GetDC (handle);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	280 newFont = cast(HFONT) OS.SendMessage (handle, OS.WM_GETFONT, 0, 0);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	281 if (newFont !is null) oldFont = OS.SelectObject (hDC, newFont);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	282 TEXTMETRIC tm;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	283 OS.GetTextMetrics (hDC, &tm);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	284 if (newFont !is null) OS.SelectObject (hDC, oldFont);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	285 OS.ReleaseDC (handle, hDC);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	286 int offsetY = OS.COMCTL32_MAJOR >= 6 && OS.IsAppThemed () ? 0 : 1;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	287 int x = CLIENT_INSET, y = tm.tmHeight + offsetY;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	288 int width = Math.max (0, rect.right - CLIENT_INSET * 2);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	289 int height = Math.max (0, rect.bottom - y - CLIENT_INSET);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	290 return new Rectangle (x, y, width, height);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	291 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	292
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	293 override String getNameText () {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	294 return getText ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	295 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	296
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	297 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	298 * Returns the receiver's text, which is the string that the
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	299 * is used as the <em>title</em>. If the text has not previously
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	300 * been set, returns an empty string.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	301 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	302 * @return the text
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	303 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	304 * @exception DWTException <ul>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	305 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	306 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	307 * </ul>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	308 */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	309 public String getText () {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	310 checkWidget ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	311 return text;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	312 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	313
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	314 override bool mnemonicHit (wchar key) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	315 return setFocus ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	316 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	317
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	318 override bool mnemonicMatch (wchar key) {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	319 wchar mnemonic = findMnemonic (getText ());
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	320 if (mnemonic is '\0') return false;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	321 return CharacterToUpper (key) is CharacterToUpper (mnemonic);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	322 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	323
249 b3dbd786541a Fix: compile errors Frank Benoit <benoit@tionex.de> parents: 246 diff changeset	324 void printWidget (HWND hwnd, GC gc) {
246 fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	325 /*
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	326 * Bug in Windows. For some reason, PrintWindow() fails
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	327 * when it is called on a push button. The fix is to
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	328 * detect the failure and use WM_PRINT instead. Note
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	329 * that WM_PRINT cannot be used all the time because it
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	330 * fails for browser controls when the browser has focus.
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	331 */
249 b3dbd786541a Fix: compile errors Frank Benoit <benoit@tionex.de> parents: 246 diff changeset	332 auto hDC = gc.handle;
246 fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	333 if (!OS.PrintWindow (hwnd, hDC, 0)) {
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	334 /*
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	335 * Bug in Windows. For some reason, WM_PRINT when called
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	336 * with PRF_CHILDREN will not draw the tool bar divider
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	337 * for tool bar children that do not have CCS_NODIVIDER.
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	338 * The fix is to draw the group box and iterate through
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	339 * the children, drawing each one.
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	340 */
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	341 int flags = OS.PRF_CLIENT \| OS.PRF_NONCLIENT \| OS.PRF_ERASEBKGND;
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	342 OS.SendMessage (hwnd, OS.WM_PRINT, hDC, flags);
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	343 int nSavedDC = OS.SaveDC (hDC);
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	344 Control [] children = _getChildren ();
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	345 Rectangle rect = getBounds ();
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	346 OS.IntersectClipRect (hDC, 0, 0, rect.width, rect.height);
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	347 for (int i=children.length - 1; i>=0; --i) {
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	348 Point location = children [i].getLocation ();
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	349 OS.SetWindowOrgEx (hDC, -location.x, -location.y, null);
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	350 children [i].print (gc);
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	351 }
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	352 OS.RestoreDC (hDC, nSavedDC);
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	353 }
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	354 }
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 241 diff changeset	355
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	356 override void releaseWidget () {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	357 super.releaseWidget ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	358 text = null;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	359 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	360
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	361 override public void setFont (Font font) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	362 checkWidget ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	363 Rectangle oldRect = getClientArea ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	364 super.setFont (font);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	365 Rectangle newRect = getClientArea ();
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	366 if (oldRect!=newRect) sendResize ();
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	367 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	368
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	369 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	370 * Sets the receiver's text, which is the string that will
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	371 * be displayed as the receiver's <em>title</em>, to the argument,
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	372 * which may not be null. The string may include the mnemonic character.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	373 * </p>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	374 * Mnemonics are indicated by an '&' that causes the next
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	375 * character to be the mnemonic. When the user presses a
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	376 * key sequence that matches the mnemonic, focus is assigned
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	377 * to the first child of the group. On most platforms, the
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	378 * mnemonic appears underlined but may be emphasised in a
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	379 * platform specific manner. The mnemonic indicator character
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	380 * '&' can be escaped by doubling it in the string, causing
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	381 * a single '&' to be displayed.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	382 * </p>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	383 * @param string the new text
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	384 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	385 * @exception DWTException <ul>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	386 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	387 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	388 * </ul>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	389 */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	390 public void setText (String string) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	391 checkWidget ();
241 b4846fd3437a work on allow null strings and arrays Frank Benoit <benoit@tionex.de> parents: 213 diff changeset	392 // DWT extension: allow null string
b4846fd3437a work on allow null strings and arrays Frank Benoit <benoit@tionex.de> parents: 213 diff changeset	393 //if (string is null) error (DWT.ERROR_NULL_ARGUMENT);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	394 text = string;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	395 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	396 * Bug in Windows. When a group control is right-to-left and
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	397 * is disabled, the first pixel of the text is clipped. The
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	398 * fix is to add a space to both sides of the text.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	399 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	400 if ((style & DWT.RIGHT_TO_LEFT) !is 0) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	401 if (OS.COMCTL32_MAJOR < 6 \|\| !OS.IsAppThemed ()) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	402 if (!OS.IsWindowEnabled (handle)) {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	403 if (string.length !is 0) string = " " ~ string ~ " ";
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	404 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	405 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	406 }
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	407 TCHAR* buffer = StrToTCHARz(/+getCodePage (),+/ string);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	408 OS.SetWindowText (handle, buffer);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	409 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	410
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	411 override int widgetStyle () {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	412 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	413 * Bug in Windows. When GetDCEx() is called with DCX_INTERSECTUPDATE,
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	414 * the HDC that is returned does not include the current update region.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	415 * This was confirmed under DEBUG Windows when GetDCEx() complained about
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	416 * invalid flags. Therefore, it is not easily possible to get an HDC from
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	417 * outside of WM_PAINT that includes the current damage and clips children.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	418 * Because the receiver has children and draws a frame and label, it is
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	419 * necessary that the receiver always draw clipped, in the current damaged
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	420 * area. The fix is to force the receiver to be fully clipped by including
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	421 * WS_CLIPCHILDREN and WS_CLIPSIBLINGS in the default style bits.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	422 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	423 return super.widgetStyle () \| OS.BS_GROUPBOX \| OS.WS_CLIPCHILDREN \| OS.WS_CLIPSIBLINGS;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	424 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	425
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	426 override String windowClass () {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	427 return TCHARsToStr( GroupClass );
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	428 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	429
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	430 override int windowProc () {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	431 return cast(int) GroupProc;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	432 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	433
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	434 override LRESULT WM_ERASEBKGND (int wParam, int lParam) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	435 LRESULT result = super.WM_ERASEBKGND (wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	436 if (result !is null) return result;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	437 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	438 * Feature in Windows. Group boxes do not erase
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	439 * the background before drawing. The fix is to
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	440 * fill the background.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	441 */
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	442 drawBackground (cast(HANDLE) wParam);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	443 return LRESULT.ONE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	444 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	445
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	446 override LRESULT WM_NCHITTEST (int wParam, int lParam) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	447 LRESULT result = super.WM_NCHITTEST (wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	448 if (result !is null) return result;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	449 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	450 * Feature in Windows. The window proc for the group box
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	451 * returns HTTRANSPARENT indicating that mouse messages
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	452 * should not be delivered to the receiver and any children.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	453 * Normally, group boxes in Windows do not have children and
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	454 * this is the correct behavior for this case. Because we
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	455 * allow children, answer HTCLIENT to allow mouse messages
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	456 * to be delivered to the children.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	457 */
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	458 int /long/ code = callWindowProc (handle, OS.WM_NCHITTEST, wParam, lParam);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	459 if (code is OS.HTTRANSPARENT) code = OS.HTCLIENT;
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	460 return new LRESULT (code);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	461 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	462
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	463 override LRESULT WM_MOUSEMOVE (int wParam, int lParam) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	464 LRESULT result = super.WM_MOUSEMOVE (wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	465 if (result !is null) return result;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	466 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	467 * Feature in Windows. In version 6.00 of COMCTL32.DLL,
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	468 * every time the mouse moves, the group title redraws.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	469 * This only happens when WM_NCHITTEST returns HTCLIENT.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	470 * The fix is to avoid calling the group window proc.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	471 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	472 return LRESULT.ZERO;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	473 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	474
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	475 override LRESULT WM_PRINTCLIENT (int wParam, int lParam) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	476 LRESULT result = super.WM_PRINTCLIENT (wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	477 if (result !is null) return result;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	478 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	479 * Feature in Windows. In version 6.00 of COMCTL32.DLL,
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	480 * when WM_PRINTCLIENT is sent from a child BS_GROUP
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	481 * control to a parent BS_GROUP, the parent BS_GROUP
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	482 * clears the font from the HDC. Normally, group boxes
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	483 * in Windows do not have children so this behavior is
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	484 * undefined. When the parent of a BS_GROUP is not a
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	485 * BS_GROUP, there is no problem. The fix is to save
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	486 * and restore the current font.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	487 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	488 if (OS.COMCTL32_MAJOR >= 6 && OS.IsAppThemed ()) {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	489 auto nSavedDC = OS.SaveDC (cast(HDC)wParam);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	490 int /long/ code = callWindowProc (handle, OS.WM_PRINTCLIENT, wParam, lParam);
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	491 OS.RestoreDC (cast(HDC)wParam, nSavedDC);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	492 return new LRESULT (code);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	493 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	494 return result;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	495 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	496
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	497 override LRESULT WM_UPDATEUISTATE (int wParam, int lParam) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	498 LRESULT result = super.WM_UPDATEUISTATE (wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	499 if (result !is null) return result;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	500 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	501 * Feature in Windows. When WM_UPDATEUISTATE is sent to
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	502 * a group, it sends WM_CTLCOLORBTN to get the foreground
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	503 * and background. If drawing happens in WM_CTLCOLORBTN,
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	504 * it will overwrite the contents of the control. The
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	505 * fix is draw the group without drawing the background
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	506 * and avoid the group window proc.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	507 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	508 bool redraw = findImageControl () !is null;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	509 if (!redraw) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	510 if ((state & THEME_BACKGROUND) !is 0) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	511 if (OS.COMCTL32_MAJOR >= 6 && OS.IsAppThemed ()) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	512 redraw = findThemeControl () !is null;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	513 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	514 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	515 if (!redraw) redraw = findBackgroundControl () !is null;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	516 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	517 if (redraw) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	518 OS.InvalidateRect (handle, null, false);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	519 int /long/ code = OS.DefWindowProc (handle, OS.WM_UPDATEUISTATE, wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	520 return new LRESULT (code);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	521 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	522 return result;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	523 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	524
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 50 diff changeset	525 override LRESULT WM_WINDOWPOSCHANGING (int wParam, int lParam) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	526 LRESULT result = super.WM_WINDOWPOSCHANGING (wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	527 if (result !is null) return result;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	528 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	529 * Invalidate the portion of the group widget that needs to
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	530 * be redrawn. Note that for some reason, invalidating the
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	531 * group from inside WM_SIZE causes pixel corruption for
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	532 * radio button children.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	533 */
117 25f88bf5a6df Only one file was damaged Frank Benoit <benoit@tionex.de> parents: 115 diff changeset	534 static if (OS.IsWinCE) return result;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	535 if (!OS.IsWindowVisible (handle)) return result;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	536 WINDOWPOS* lpwp = cast(WINDOWPOS*)lParam;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	537 //OS.MoveMemory (lpwp, lParam, WINDOWPOS.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	538 if ((lpwp.flags & (OS.SWP_NOSIZE \| OS.SWP_NOREDRAW)) !is 0) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	539 return result;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	540 }
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	541 RECT rect;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	542 OS.SetRect (&rect, 0, 0, lpwp.cx, lpwp.cy);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	543 OS.SendMessage (handle, OS.WM_NCCALCSIZE, 0, &rect);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	544 int newWidth = rect.right - rect.left;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	545 int newHeight = rect.bottom - rect.top;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	546 OS.GetClientRect (handle, &rect);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	547 int oldWidth = rect.right - rect.left;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	548 int oldHeight = rect.bottom - rect.top;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	549 if (newWidth is oldWidth && newHeight is oldHeight) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	550 return result;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	551 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	552 if (newWidth !is oldWidth) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	553 int left = oldWidth;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	554 if (newWidth < oldWidth) left = newWidth;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	555 OS.SetRect (&rect, left - CLIENT_INSET, 0, newWidth, newHeight);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	556 OS.InvalidateRect (handle, &rect, true);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	557 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	558 if (newHeight !is oldHeight) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	559 int bottom = oldHeight;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	560 if (newHeight < oldHeight) bottom = newHeight;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	561 if (newWidth < oldWidth) oldWidth -= CLIENT_INSET;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	562 OS.SetRect (&rect, 0, bottom - CLIENT_INSET, oldWidth, newHeight);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	563 OS.InvalidateRect (handle, &rect, true);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	564 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	565 return result;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	566 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	567 }

Mercurial > projects > dwt-win

annotate dwt/widgets/Group.d @ 249:b3dbd786541a