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

annotate dwt/widgets/Group.d @ 213:36f5cb12e1a2

Update to SWT 3.4M7

author	Frank Benoit <benoit@tionex.de>
date	Sat, 17 May 2008 17:34:28 +0200
parents	ab60f3309436
children	b4846fd3437a

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 /*******************************************************************************
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	2 * Copyright (c) 2000, 2007 IBM Corporation and others.
92c102dd64a3 Added all 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;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	19 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	20 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	21 import dwt.internal.win32.OS;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	22 import dwt.widgets.Composite;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	23
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	24 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	25
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	26 /**
92c102dd64a3 Added all 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 * 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	28 * 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	29 * <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	30 * 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	31 * 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	32 * 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	33 * 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	34 * <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	35 * <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	36 * <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	37 * <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	38 * <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	39 * </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	40 * <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	41 * 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	42 * </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	43 * 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	44 * </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 */
92c102dd64a3 Added all 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
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	47 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	48
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	49 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	50 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	51
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	52 String text = "";
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	53 static const int CLIENT_INSET = 3;
80 1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	54 private static /+const+/ WNDPROC GroupProc;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	55 static if( OS.IsWinCE ){
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	56 static const TCHAR[] GroupClass = "BUTTON\0";
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	57 }
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	58 else{
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	59 static const TCHAR[] GroupClass = "SWT_GROUP\0";
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	60 }
80 1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	61
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	62 private static bool static_this_completed = false;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	63 private static void static_this() {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	64 if( static_this_completed ){
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	65 return;
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 synchronized {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	68 if( static_this_completed ){
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	69 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	70 }
80 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 * Feature in Windows. The group box window class
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	73 * uses the CS_HREDRAW and CS_VREDRAW style bits to
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	74 * force a full redraw of the control and all children
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	75 * when resized. This causes flashing. The fix is to
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	76 * register a new window class without these bits and
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	77 * implement special code that damages only the control.
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	78 *
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	79 * Feature in WinCE. On certain devices, defining
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	80 * a new window class which looks like BUTTON causes
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	81 * CreateWindowEx() to crash. The workaround is to use
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	82 * the class Button directly.
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 WNDCLASS lpWndClass;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	85 static if (OS.IsWinCE) {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	86 OS.GetClassInfo (null, GroupClass.ptr, &lpWndClass);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	87 GroupProc = lpWndClass.lpfnWndProc;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	88 } else {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	89 TCHAR[] WC_BUTTON = "BUTTON\0";
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	90 OS.GetClassInfo (null, WC_BUTTON.ptr, &lpWndClass);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	91 GroupProc = lpWndClass.lpfnWndProc;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	92 auto hInstance = OS.GetModuleHandle (null);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	93 if (!OS.GetClassInfo (hInstance, GroupClass.ptr, &lpWndClass)) {
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	94 auto hHeap = OS.GetProcessHeap ();
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	95 lpWndClass.hInstance = hInstance;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	96 lpWndClass.style &= ~(OS.CS_HREDRAW \| OS.CS_VREDRAW);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	97 int byteCount = GroupClass.length * TCHAR.sizeof;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	98 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	99 OS.MoveMemory (lpszClassName, GroupClass.ptr, byteCount);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	100 lpWndClass.lpszClassName = lpszClassName;
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	101 OS.RegisterClass (&lpWndClass);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	102 OS.HeapFree (hHeap, 0, lpszClassName);
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	103 }
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	104 }
1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	105 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	106 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	107 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	108
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	109 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	110 * 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	111 * 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	112 * <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	113 * 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	114 * 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	115 * 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	116 * (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	117 * 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	118 * 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	119 * 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	120 * </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	121 *
92c102dd64a3 Added all 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 * @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	123 * @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	124 *
92c102dd64a3 Added all 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 * @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	126 * <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	127 * </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	128 * @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	129 * <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	130 * <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	131 * </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	132 *
92c102dd64a3 Added all 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 * @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	134 * @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	135 * @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	136 * @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	137 * @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	138 * @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	139 * @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	140 */
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	141 public this (Composite parent, int style) {
80 1801ddeb8f32 removed static ctors Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	142 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	143 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	144 }
92c102dd64a3 Added all 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
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	146 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	147 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	148 /*
92c102dd64a3 Added all 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 * 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	150 * 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	151 * 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	152 */
92c102dd64a3 Added all 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 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	154 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	155 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	156 return OS.DefWindowProc (hwnd, msg, wParam, lParam);
82 43c42c637c9c First simple example works Frank Benoit <benoit@tionex.de> parents: 80 diff changeset	157 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	158 }
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	159 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	160 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	161
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	162 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	163 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	164 /*
92c102dd64a3 Added all 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 * 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	166 * 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	167 * 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	168 * 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	169 * 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	170 */
92c102dd64a3 Added all 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 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	172 }
92c102dd64a3 Added all 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
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	174 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	175 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	176 }
92c102dd64a3 Added all 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
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	178 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	179 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	180 Point size = super.computeSize (wHint, hHint, changed);
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	181 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	182 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	183 /*
92c102dd64a3 Added all 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 * 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	185 * 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	186 * 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	187 * 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	188 * 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	189 */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	190 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	191 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	192 if (OS.COMCTL32_MAJOR < 6 \|\| !OS.IsAppThemed ()) {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	193 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	194 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	195 }
92c102dd64a3 Added all 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 /*
92c102dd64a3 Added all 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 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	198 * 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	199 */
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	200 TCHAR* buffer = StrToTCHARz (/+getCodePage (),+/ string);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	201 HFONT newFont, oldFont;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	202 auto hDC = OS.GetDC (handle);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	203 newFont = cast(HFONT) OS.SendMessage (handle, OS.WM_GETFONT, 0, 0);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	204 if (newFont !is null) oldFont = OS.SelectObject (hDC, newFont);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	205 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	206 int flags = OS.DT_CALCRECT \| OS.DT_SINGLELINE;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	207 OS.DrawText (hDC, buffer, -1, &rect, flags);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	208 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	209 OS.ReleaseDC (handle, hDC);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	210 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	211 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	212 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	213 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	214 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	215
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	216 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	217 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	218 Rectangle trim = super.computeTrim (x, y, width, height);
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	219 HFONT newFont, oldFont;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	220 auto hDC = OS.GetDC (handle);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	221 newFont = cast(HFONT) OS.SendMessage (handle, OS.WM_GETFONT, 0, 0);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	222 if (newFont !is null) oldFont = OS.SelectObject (hDC, newFont);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	223 TEXTMETRIC tm;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	224 OS.GetTextMetrics (hDC, &tm);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	225 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	226 OS.ReleaseDC (handle, hDC);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	227 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	228 trim.x -= CLIENT_INSET;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	229 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	230 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	231 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	232 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	233 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	234
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	235 override void createHandle () {
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	236 /*
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	237 * Feature in Windows. When a button is created,
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	238 * 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	239 * shell by sending WM_CHANGEUISTATE with UIS_SET,
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	240 * UISF_HIDEACCEL and UISF_HIDEFOCUS to the parent.
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	241 * This is undocumented and unexpected. The fix
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	242 * is to ignore the WM_CHANGEUISTATE, when sent
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	243 * from CreateWindowEx().
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	244 */
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	245 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	246 super.createHandle ();
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	247 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	248 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	249 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	250 }
92c102dd64a3 Added all 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
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	252 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	253 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	254 /*
92c102dd64a3 Added all 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 * 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	256 * 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	257 * 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	258 */
92c102dd64a3 Added all 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 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	260 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	261 String string = enabled \|\| text.length is 0 ? text : " " ~ text ~ " ";
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	262 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	263 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	264 }
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	266 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	267
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	268 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	269 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	270 forceResize ();
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	271 RECT rect;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	272 OS.GetClientRect (handle, &rect);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	273 HFONT newFont, oldFont;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	274 auto hDC = OS.GetDC (handle);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	275 newFont = cast(HFONT) OS.SendMessage (handle, OS.WM_GETFONT, 0, 0);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	276 if (newFont !is null) oldFont = OS.SelectObject (hDC, newFont);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	277 TEXTMETRIC tm;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	278 OS.GetTextMetrics (hDC, &tm);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	279 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	280 OS.ReleaseDC (handle, hDC);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	281 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	282 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	283 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	284 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	285 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	286 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	287
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	288 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	289 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	290 }
92c102dd64a3 Added all 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 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	293 * 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	294 * 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	295 * 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	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 * @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	298 *
92c102dd64a3 Added all 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 * @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	300 * <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	301 * <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	302 * </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	303 */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	304 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	305 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	306 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	307 }
92c102dd64a3 Added all 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
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	309 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	310 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	311 }
92c102dd64a3 Added all 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
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	313 override bool mnemonicMatch (wchar key) {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	314 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	315 if (mnemonic is '\0') return false;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	316 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	317 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	318
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	319 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	320 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	321 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	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
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	324 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	325 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	326 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	327 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	328 Rectangle newRect = getClientArea ();
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	329 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	330 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	331
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	332 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	333 * 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	334 * 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	335 * 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	336 * </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	337 * 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	338 * 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	339 * 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	340 * 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	341 * 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	342 * 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	343 * '&' 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	344 * 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	345 * </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	346 * @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	347 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	348 * @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	349 * <li>ERROR_NULL_ARGUMENT - if the text 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	350 * </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	351 * @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	352 * <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	353 * <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	354 * </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	355 */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	356 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	357 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	358 if (string is null) error (DWT.ERROR_NULL_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	359 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	360 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	361 * 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	362 * 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	363 * 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	364 */
92c102dd64a3 Added all 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 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	366 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	367 if (!OS.IsWindowEnabled (handle)) {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	368 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	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 }
92c102dd64a3 Added all 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 }
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	372 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	373 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	374 }
92c102dd64a3 Added all 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
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	376 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	377 /*
92c102dd64a3 Added all 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 * 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	379 * 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	380 * 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	381 * 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	382 * 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	383 * 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	384 * 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	385 * 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	386 * 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	387 */
92c102dd64a3 Added all 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 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	389 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	390
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 117 diff changeset	391 override String windowClass () {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	392 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	393 }
92c102dd64a3 Added all 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
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	395 override int windowProc () {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	396 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	397 }
92c102dd64a3 Added all 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
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	399 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	400 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	401 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	402 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	403 * 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	404 * 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	405 * 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	406 */
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	407 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	408 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	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 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	412 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	413 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	414 /*
92c102dd64a3 Added all 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 * 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	416 * 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	417 * 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	418 * 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	419 * 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	420 * 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	421 * 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	422 */
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	423 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	424 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	425 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	426 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	427
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	428 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	429 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	430 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	431 /*
92c102dd64a3 Added all 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 * 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	433 * 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	434 * 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	435 * 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	436 */
92c102dd64a3 Added all 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 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	438 }
92c102dd64a3 Added all 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
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	440 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	441 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	442 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	443 /*
92c102dd64a3 Added all 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 * 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	445 * 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	446 * 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	447 * 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	448 * 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	449 * 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	450 * 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	451 * 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	452 */
92c102dd64a3 Added all 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 if (OS.COMCTL32_MAJOR >= 6 && OS.IsAppThemed ()) {
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	454 auto nSavedDC = OS.SaveDC (cast(HDC)wParam);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	455 int /long/ code = callWindowProc (handle, OS.WM_PRINTCLIENT, wParam, lParam);
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	456 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	457 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	458 }
92c102dd64a3 Added all 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 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	460 }
92c102dd64a3 Added all 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
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	462 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	463 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	464 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	465 /*
92c102dd64a3 Added all 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 * 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	467 * 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	468 * 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	469 * 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	470 * 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	471 * 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	472 */
92c102dd64a3 Added all 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 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	474 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	475 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	476 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	477 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	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 }
92c102dd64a3 Added all 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 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	481 }
92c102dd64a3 Added all 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 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	483 OS.InvalidateRect (handle, null, false);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	484 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	485 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	486 }
92c102dd64a3 Added all 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 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	488 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	489
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	490 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	491 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	492 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	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 * 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	495 * 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	496 * 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	497 * 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	498 */
117 25f88bf5a6df Only one file was damaged Frank Benoit <benoit@tionex.de> parents: 115 diff changeset	499 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	500 if (!OS.IsWindowVisible (handle)) return result;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	501 WINDOWPOS* lpwp = cast(WINDOWPOS*)lParam;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	502 //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	503 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	504 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	505 }
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	506 RECT rect;
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	507 OS.SetRect (&rect, 0, 0, lpwp.cx, lpwp.cy);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	508 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	509 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	510 int newHeight = rect.bottom - rect.top;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	511 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	512 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	513 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	514 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	515 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	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 (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	518 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	519 if (newWidth < oldWidth) left = newWidth;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	520 OS.SetRect (&rect, left - CLIENT_INSET, 0, newWidth, newHeight);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	521 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	522 }
92c102dd64a3 Added all 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 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	524 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	525 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	526 if (newWidth < oldWidth) oldWidth -= CLIENT_INSET;
50 2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	527 OS.SetRect (&rect, 0, bottom - CLIENT_INSET, oldWidth, newHeight);
2146ed8ff33c Group Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	528 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	529 }
92c102dd64a3 Added all 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 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	531 }
92c102dd64a3 Added all 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 }

Mercurial > projects > dwt-win

annotate dwt/widgets/Group.d @ 213:36f5cb12e1a2