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

annotate dwt/widgets/Scrollable.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	8efa9bb96c53

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
77 205350493476 Accessible linkable dummy. Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	10 * Port to the D programming language:
205350493476 Accessible linkable dummy. Frank Benoit <benoit@tionex.de> parents: 54 diff changeset	11 * Frank Benoit <benoit@tionex.de>
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	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.Scrollable;
92c102dd64a3 Added all 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
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	15 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	16 import dwt.DWTException;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	17
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	18 import dwt.graphics.Rectangle;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	19
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	20 import dwt.internal.win32.OS;
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	21
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	22 import dwt.widgets.Composite;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	23 import dwt.widgets.Control;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	24 import dwt.widgets.Decorations;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	25 import dwt.widgets.Event;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	26 import dwt.widgets.ScrollBar;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	27 import dwt.widgets.Widget;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	28
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	29 import dwt.dwthelper.utils;
104 3926f6c95d6f Fix: Scrollbar events Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	30 import tango.util.log.Trace;
3926f6c95d6f Fix: Scrollbar events Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	31 void trc( long line ){
3926f6c95d6f Fix: Scrollbar events Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	32 //Trace.formatln( "Scrollable {}", line );
3926f6c95d6f Fix: Scrollbar events Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	33 }
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	34
92c102dd64a3 Added all 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 /**
92c102dd64a3 Added all 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 * This class is the abstract superclass of all classes which
92c102dd64a3 Added all 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 * represent controls that have standard scroll bars.
92c102dd64a3 Added all 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 * <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	39 * <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	40 * <dd>H_SCROLL, V_SCROLL</dd>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	41 * <dt><b>Events:</b>
92c102dd64a3 Added all 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 * <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	43 * </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	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 * IMPORTANT: This class is intended to be subclassed <em>only</em>
92c102dd64a3 Added all 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 * within the DWT 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	47 * </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	48 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	49
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	50 public abstract class Scrollable : Control {
38 4d6511d2441f Canvas Frank Benoit <benoit@tionex.de> parents: 36 diff changeset	51
4d6511d2441f Canvas Frank Benoit <benoit@tionex.de> parents: 36 diff changeset	52 alias Control.windowProc windowProc;
4d6511d2441f Canvas Frank Benoit <benoit@tionex.de> parents: 36 diff changeset	53
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	54 ScrollBar horizontalBar, verticalBar;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	55
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	56 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	57 * Prevents uninitialized instances from being created outside the package.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	58 */
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	59 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	60 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	61
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	62 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	63 * 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	64 * 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	65 * <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	66 * 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	67 * 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	68 * 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	69 * (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	70 * 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	71 * 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	72 * 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	73 * </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	74 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	75 * @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	76 * @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	77 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	78 * @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	79 * <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	80 * </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	81 * @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	82 * <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	83 * <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	84 * </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	85 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	86 * @see DWT#H_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	87 * @see 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	88 * @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	89 * @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	90 */
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	91 public this (Composite parent, int style) {
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	92 super (parent, 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	93 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	94
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	95 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: 104 diff changeset	96 if (handle is null) return 0;
6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	97 return OS.DefWindowProc (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	98 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	99
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	100 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	101 * Given a desired <em>client area</em> for the receiver
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	102 * (as described by the arguments), returns the bounding
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	103 * rectangle which would be required to produce that client
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	104 * area.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	105 * <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	106 * In other words, it returns a rectangle such that, if 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	107 * receiver's bounds were set to that rectangle, the area
92c102dd64a3 Added all 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 * of the receiver which is capable of displaying data
92c102dd64a3 Added all 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 * (that is, not covered by the "trimmings") would be 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	110 * rectangle described by the arguments (relative to 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	111 * receiver's 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	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 *
92c102dd64a3 Added all 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 * @param x the desired x coordinate of the client area
92c102dd64a3 Added all 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 * @param y the desired y coordinate of the client area
92c102dd64a3 Added all 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 * @param width the desired width of the client area
92c102dd64a3 Added all 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 * @param height the desired height of the client area
92c102dd64a3 Added all 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 * @return the required bounds to produce the given client area
92c102dd64a3 Added all 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 *
92c102dd64a3 Added all 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 * @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	121 * <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	122 * <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	123 * </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	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 * @see #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	126 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	127 public Rectangle computeTrim (int x, int y, int width, int 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	128 checkWidget ();
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	129 auto scrolledHandle_ = scrolledHandle ();
ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	130 RECT rect;
ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	131 OS.SetRect (&rect, x, y, x + width, y + height);
ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	132 int bits1 = OS.GetWindowLong (scrolledHandle_, OS.GWL_STYLE);
ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	133 int bits2 = OS.GetWindowLong (scrolledHandle_, OS.GWL_EXSTYLE);
ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	134 OS.AdjustWindowRectEx (&rect, bits1, false, bits2);
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	135 if (horizontalBar !is null) rect.bottom += OS.GetSystemMetrics (OS.SM_CYHSCROLL);
92c102dd64a3 Added all 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 if (verticalBar !is null) rect.right += OS.GetSystemMetrics (OS.SM_CXVSCROLL);
92c102dd64a3 Added all 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 int nWidth = rect.right - rect.left, nHeight = 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	138 return new Rectangle (rect.left, rect.top, nWidth, nHeight);
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all 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
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	141 ScrollBar createScrollBar (int type) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	142 ScrollBar bar = new ScrollBar (this, type);
92c102dd64a3 Added all 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 if ((state & CANVAS) !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	144 bar.setMaximum (100);
92c102dd64a3 Added all 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 bar.setThumb (10);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	146 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	147 return bar;
92c102dd64a3 Added all 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
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 38 diff changeset	150 override void createWidget () {
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	151 super.createWidget ();
92c102dd64a3 Added all 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 if ((style & DWT.H_SCROLL) !is 0) horizontalBar = createScrollBar (DWT.H_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	153 if ((style & DWT.V_SCROLL) !is 0) verticalBar = createScrollBar (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	154 }
92c102dd64a3 Added all 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
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	156 void destroyScrollBar (int type) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	157 auto hwnd = scrolledHandle ();
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	158 int bits = OS.GetWindowLong (hwnd, OS.GWL_STYLE);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	159 if ((type & DWT.HORIZONTAL) !is 0) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	160 style &= ~DWT.H_SCROLL;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	161 bits &= ~OS.WS_HSCROLL;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	162 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	163 if ((type & DWT.VERTICAL) !is 0) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	164 style &= ~DWT.V_SCROLL;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	165 bits &= ~OS.WS_VSCROLL;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	166 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	167 OS.SetWindowLong (hwnd, OS.GWL_STYLE, bits);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	168 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	169
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	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 * Returns a rectangle which describes the area of 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	172 * receiver which is capable of displaying data (that 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	173 * not covered by the "trimmings").
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	174 *
92c102dd64a3 Added all 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 * @return the client area
92c102dd64a3 Added all 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 * @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	178 * <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	179 * <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	180 * </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	181 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	182 * @see #computeTrim
92c102dd64a3 Added all 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 public Rectangle 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	185 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	186 forceResize ();
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	187 RECT rect;
ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	188 auto scrolledHandle_ = scrolledHandle ();
ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	189 OS.GetClientRect (scrolledHandle_, &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	190 int x = rect.left, y = 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	191 int width = 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	192 int height = rect.bottom - rect.top;
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	193 if (scrolledHandle_ !is handle) {
ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	194 OS.GetClientRect (handle, &rect);
ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	195 OS.MapWindowPoints(handle, scrolledHandle_, cast(POINT*)&rect, 2);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	196 x = -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	197 y = -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	198 }
92c102dd64a3 Added all 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 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	200 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	201
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	202 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	203 * Returns the receiver's horizontal scroll bar if it has
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	204 * one, and null if it does 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	205 *
92c102dd64a3 Added all 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 * @return the horizontal scroll bar (or 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	207 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	208 * @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	209 * <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	210 * <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	211 * </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	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 public ScrollBar getHorizontalBar () {
92c102dd64a3 Added all 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 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	215 return horizontalBar;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	216 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	217
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	218 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	219 * Returns the receiver's vertical scroll bar if it has
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	220 * one, and null if it does 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	221 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	222 * @return the vertical scroll bar (or 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	223 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	224 * @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	225 * <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	226 * <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	227 * </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	228 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	229 public ScrollBar getVerticalBar () {
92c102dd64a3 Added all 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 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	231 return verticalBar;
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all 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
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 38 diff changeset	234 override void releaseChildren (bool destroy) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	235 if (horizontalBar !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	236 horizontalBar.release (false);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	237 horizontalBar = 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	238 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	239 if (verticalBar !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	240 verticalBar.release (false);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	241 verticalBar = 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	242 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	243 super.releaseChildren (destroy);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	244 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	245
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	246 HANDLE scrolledHandle () {
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	247 return handle;
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all 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
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 38 diff changeset	250 override int widgetExtStyle () {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	251 return super.widgetExtStyle ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	252 /*
92c102dd64a3 Added all 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 * This code is intentionally commented. In future,
92c102dd64a3 Added all 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 * we may wish to support different standard Windows
92c102dd64a3 Added all 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 * edge styles. The issue here is that not all of
92c102dd64a3 Added all 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 * these styles are available on the other platforms
92c102dd64a3 Added all 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 * this would need to be a hint.
92c102dd64a3 Added all 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.BORDER) !is 0) return OS.WS_EX_CLIENTEDGE;
92c102dd64a3 Added all 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 ((style & DWT.SHADOW_IN) !is 0) return OS.WS_EX_STATICEDGE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	261 // return super.widgetExtStyle ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	262 }
92c102dd64a3 Added all 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
54 0f25be5cbe6f Added aliases and overrides from generated file, remaining widgets. Thanks torhu for doing this job. Frank Benoit <benoit@tionex.de> parents: 38 diff changeset	264 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	265 int bits = super.widgetStyle () \| OS.WS_TABSTOP;
92c102dd64a3 Added all 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 if ((style & DWT.H_SCROLL) !is 0) bits \|= OS.WS_HSCROLL;
92c102dd64a3 Added all 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 if ((style & DWT.V_SCROLL) !is 0) bits \|= OS.WS_VSCROLL;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	268 return 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	269 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	270
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 108 diff changeset	271 override String windowClass () {
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	272 return display.windowClass();
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	273 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	274
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	275 override int windowProc () {
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	276 return display.windowProc;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	277 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	278
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	279 override LRESULT WM_HSCROLL (int wParam, int lParam) {
104 3926f6c95d6f Fix: Scrollbar events Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	280 trc(__LINE__);
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	281 LRESULT result = super.WM_HSCROLL (wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	282 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	283
92c102dd64a3 Added all 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 /*
92c102dd64a3 Added all 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 * Bug on WinCE. lParam should be NULL when the message is not sent
92c102dd64a3 Added all 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 * by a scroll bar control, but it contains the handle to the window.
92c102dd64a3 Added all 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 * When the message is sent by a scroll bar control, it correctly
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	288 * contains the handle to the scroll bar. The fix is to check 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	289 * both.
92c102dd64a3 Added all 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 */
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	291 if (horizontalBar !is null && (lParam is 0 \|\| lParam is cast(int)handle)) {
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	292 return wmScroll (horizontalBar, (state & CANVAS) !is 0, handle, OS.WM_HSCROLL, wParam, lParam);
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	294 return 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	295 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	296
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	297 override LRESULT WM_MOUSEWHEEL (int wParam, int lParam) {
104 3926f6c95d6f Fix: Scrollbar events Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	298 trc(__LINE__);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	299 int scrollRemainder = display.scrollRemainder;
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	300 LRESULT result = super.WM_MOUSEWHEEL (wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	301 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	302 /*
92c102dd64a3 Added all 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 * Translate WM_MOUSEWHEEL to WM_VSCROLL or WM_HSCROLL.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	304 */
92c102dd64a3 Added all 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 if ((state & CANVAS) !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	306 if ((wParam & (OS.MK_SHIFT \| OS.MK_CONTROL)) !is 0) 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	307 bool vertical = verticalBar !is null && verticalBar.getEnabled ();
92c102dd64a3 Added all 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 bool horizontal = horizontalBar !is null && horizontalBar.getEnabled ();
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	309 int msg = vertical ? OS.WM_VSCROLL : horizontal ? OS.WM_HSCROLL : 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	310 if (msg is 0) return result;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	311 int linesToScroll;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	312 OS.SystemParametersInfo (OS.SPI_GETWHEELSCROLLLINES, 0, &linesToScroll, 0);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	313 int delta = OS.GET_WHEEL_DELTA_WPARAM (wParam);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	314 bool pageScroll = linesToScroll is OS.WHEEL_PAGESCROLL;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	315 if (!OS.IsWinCE && OS.WIN32_VERSION >= OS.VERSION (6, 0)) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	316 ScrollBar bar = vertical ? verticalBar : horizontalBar;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	317 SCROLLINFO info;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	318 info.cbSize = SCROLLINFO.sizeof;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	319 info.fMask = OS.SIF_POS;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	320 OS.GetScrollInfo (handle, bar.scrollBarType (), &info);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	321 if (vertical && !pageScroll) delta *= linesToScroll;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	322 int increment = pageScroll ? bar.getPageIncrement () : bar.getIncrement ();
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	323 info.nPos -= increment * delta / OS.WHEEL_DELTA;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	324 OS.SetScrollInfo (handle, bar.scrollBarType (), &info, true);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	325 OS.SendMessage (handle, msg, OS.SB_THUMBPOSITION, 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	326 } else {
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	327 int code = 0;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	328 if (pageScroll) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	329 code = delta < 0 ? OS.SB_PAGEDOWN : OS.SB_PAGEUP;
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 } else {
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	331 code = delta < 0 ? OS.SB_LINEDOWN : OS.SB_LINEUP;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	332 if (msg is OS.WM_VSCROLL) delta *= linesToScroll;
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	333 }
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	334 /* Check if the delta and the remainder have the same direction (sign) */
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	335 if ((delta ^ scrollRemainder) >= 0) delta += scrollRemainder;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	336 int count = Math.abs (delta) / OS.WHEEL_DELTA;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	337 for (int i=0; i<count; i++) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	338 OS.SendMessage (handle, msg, code, 0);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	339 }
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	340 }
92c102dd64a3 Added all 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 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	342 }
92c102dd64a3 Added all 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
92c102dd64a3 Added all 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 /*
92c102dd64a3 Added all 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 * When the native widget scrolls inside WM_MOUSEWHEEL, it
92c102dd64a3 Added all 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 * may or may not send a WM_VSCROLL or WM_HSCROLL to do 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	347 * actual scrolling. This depends on the implementation of
92c102dd64a3 Added all 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 * each native widget. In order to ensure that application
92c102dd64a3 Added all 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 * code is notified when the scroll bar moves, compare 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	350 * scroll bar position before and after the WM_MOUSEWHEEL.
92c102dd64a3 Added all 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 * If the native control sends a WM_VSCROLL or WM_HSCROLL,
92c102dd64a3 Added all 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 * then the application has already been notified. If 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	353 * explicitly send the event.
92c102dd64a3 Added all 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 */
92c102dd64a3 Added all 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 int vPosition = verticalBar is null ? 0 : verticalBar.getSelection ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	356 int hPosition = horizontalBar is null ? 0 : horizontalBar.getSelection ();
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	357 int /long/ code = callWindowProc (handle, OS.WM_MOUSEWHEEL, 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	358 if (verticalBar !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	359 int position = verticalBar.getSelection ();
92c102dd64a3 Added all 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 if (position !is vPosition) {
92c102dd64a3 Added all 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 Event event = new Event ();
92c102dd64a3 Added all 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 event.detail = position < vPosition ? DWT.PAGE_UP : DWT.PAGE_DOWN;
92c102dd64a3 Added all 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 verticalBar.sendEvent (DWT.Selection, event);
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all 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 (horizontalBar !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	367 int position = horizontalBar.getSelection ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	368 if (position !is hPosition) {
92c102dd64a3 Added all 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 Event event = new Event ();
92c102dd64a3 Added all 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 event.detail = position < hPosition ? DWT.PAGE_UP : DWT.PAGE_DOWN;
92c102dd64a3 Added all 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 horizontalBar.sendEvent (DWT.Selection, event);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	372 }
92c102dd64a3 Added all 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 }
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	374 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	375 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	376
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	377 override LRESULT WM_SIZE (int wParam, int lParam) {
104 3926f6c95d6f Fix: Scrollbar events Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	378 trc(__LINE__);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	379 int /long/ code = callWindowProc (handle, OS.WM_SIZE, 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	380 super.WM_SIZE (wParam, lParam);
92c102dd64a3 Added all 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 // widget may be disposed at this 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	382 if (code is 0) return LRESULT.ZERO;
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	383 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	384 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	385
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	386 override LRESULT WM_VSCROLL (int wParam, int lParam) {
104 3926f6c95d6f Fix: Scrollbar events Frank Benoit <benoit@tionex.de> parents: 82 diff changeset	387 trc(__LINE__);
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	388 LRESULT result = super.WM_VSCROLL (wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	389 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	390 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	391 * Bug on WinCE. lParam should be NULL when the message is not sent
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	392 * by a scroll bar control, but it contains the handle to the window.
92c102dd64a3 Added all 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 * When the message is sent by a scroll bar control, it correctly
92c102dd64a3 Added all 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 * contains the handle to the scroll bar. The fix is to check 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	395 * both.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	396 */
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	397 if (verticalBar !is null && (lParam is 0 \|\| lParam is cast(int)handle)) {
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	398 return wmScroll (verticalBar, (state & CANVAS) !is 0, handle, OS.WM_VSCROLL, wParam, lParam);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	399 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	400 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	401 }
92c102dd64a3 Added all 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
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	403 LRESULT wmNCPaint (HWND hwnd, int /long/ wParam, int /long/ lParam) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	404 LRESULT result = super.wmNCPaint (hwnd, wParam, lParam);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	405 if (result !is null) return result;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	406 /*
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	407 * Bug in Windows. On XP only (not Vista), Windows sometimes
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	408 * does not redraw the bottom right corner of a window that
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	409 * has scroll bars, causing pixel corruption. The fix is to
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	410 * always draw the corner.
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	411 */
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	412 if (OS.COMCTL32_MAJOR >= 6 && OS.IsAppThemed ()) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	413 if (!OS.IsWinCE && OS.WIN32_VERSION < OS.VERSION (6, 0)) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	414 int bits1 = OS.GetWindowLong (hwnd, OS.GWL_STYLE);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	415 if ((bits1 & (OS.WS_HSCROLL \| OS.WS_VSCROLL)) !is 0) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	416 RECT windowRect;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	417 OS.GetWindowRect (hwnd, &windowRect);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	418 RECT trimRect;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	419 int bits2 = OS.GetWindowLong (hwnd, OS.GWL_EXSTYLE);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	420 OS.AdjustWindowRectEx (&trimRect, bits1, false, bits2);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	421 bool hVisible = false, vVisible = false;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	422 SCROLLBARINFO psbi;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	423 psbi.cbSize = SCROLLBARINFO.sizeof;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	424 if (OS.GetScrollBarInfo (hwnd, OS.OBJID_HSCROLL, &psbi)) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	425 hVisible = (psbi.rgstate [0] & OS.STATE_SYSTEM_INVISIBLE) is 0;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	426 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	427 if (OS.GetScrollBarInfo (hwnd, OS.OBJID_VSCROLL, &psbi)) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	428 vVisible = (psbi.rgstate [0] & OS.STATE_SYSTEM_INVISIBLE) is 0;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	429 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	430 RECT cornerRect;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	431 cornerRect.right = windowRect.right - windowRect.left - trimRect.right;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	432 cornerRect.bottom = windowRect.bottom - windowRect.top - trimRect.bottom;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	433 cornerRect.left = cornerRect.right - (hVisible ? OS.GetSystemMetrics (OS.SM_CXVSCROLL) : 0);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	434 cornerRect.top = cornerRect.bottom - (vVisible ? OS.GetSystemMetrics (OS.SM_CYHSCROLL) : 0);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	435 if (cornerRect.left !is cornerRect.right && cornerRect.top !is cornerRect.bottom) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	436 auto hDC = OS.GetWindowDC (hwnd);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	437 OS.FillRect (hDC, &cornerRect, cast(HANDLE)( OS.COLOR_BTNFACE + 1));
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	438 Decorations shell = menuShell ();
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	439 if ((shell.style & DWT.RESIZE) !is 0) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	440 auto hwndScroll = shell.scrolledHandle ();
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	441 bool drawGripper = hwnd is hwndScroll;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	442 if (!drawGripper) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	443 RECT shellRect;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	444 OS.GetClientRect (hwndScroll, &shellRect);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	445 OS.MapWindowPoints (hwndScroll, null, cast(POINT*)&shellRect, 2);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	446 drawGripper = shellRect.right is windowRect.right && shellRect.bottom is windowRect.bottom;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	447 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	448 if (drawGripper) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	449 OS.DrawThemeBackground (display.hScrollBarTheme(), hDC, OS.SBP_SIZEBOX, 0, &cornerRect, null);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	450 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	451 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	452 OS.ReleaseDC (hwnd, hDC);
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	453 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	454 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	455 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	456 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	457 return result;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	458 }
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	459
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	460 LRESULT wmScroll (ScrollBar bar, bool update, HWND hwnd, int msg, int /long/ wParam, int /long/ lParam) {
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	461 LRESULT result = null;
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	462 if (update) {
92c102dd64a3 Added all 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 int type = msg is OS.WM_HSCROLL ? OS.SB_HORZ : OS.SB_VERT;
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	464 SCROLLINFO info;
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 info.cbSize = SCROLLINFO.sizeof;
92c102dd64a3 Added all 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 info.fMask = OS.SIF_TRACKPOS \| OS.SIF_POS \| OS.SIF_RANGE;
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	467 OS.GetScrollInfo (hwnd, type, &info);
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	468 info.fMask = OS.SIF_POS;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	469 int code = OS.LOWORD (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	470 switch (code) {
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	471 case OS.SB_ENDSCROLL: return null;
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	472 case OS.SB_THUMBPOSITION:
92c102dd64a3 Added all 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 case OS.SB_THUMBTRACK:
92c102dd64a3 Added all 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 /*
92c102dd64a3 Added all 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 * Note: On WinCE, the value in SB_THUMBPOSITION is relative to nMin.
92c102dd64a3 Added all 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 * Same for SB_THUMBPOSITION 'except' for the very first thumb track
92c102dd64a3 Added all 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 * message which has the actual value of nMin. This is a problem when
92c102dd64a3 Added all 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 * nMin is not 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	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 info.nPos = info.nTrackPos;
92c102dd64a3 Added all 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 break;
92c102dd64a3 Added all 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 case OS.SB_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	483 info.nPos = info.nMin;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	484 break;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	485 case OS.SB_BOTTOM:
92c102dd64a3 Added all 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 info.nPos = info.nMax;
92c102dd64a3 Added all 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 break;
92c102dd64a3 Added all 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 case OS.SB_LINEDOWN:
92c102dd64a3 Added all 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 info.nPos += bar.getIncrement ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	490 break;
92c102dd64a3 Added all 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 case OS.SB_LINEUP:
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	492 int increment = bar.getIncrement ();
92c102dd64a3 Added all 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 info.nPos = Math.max (info.nMin, info.nPos - increment);
92c102dd64a3 Added all 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 break;
92c102dd64a3 Added all 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 case OS.SB_PAGEDOWN:
92c102dd64a3 Added all 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 info.nPos += bar.getPageIncrement ();
92c102dd64a3 Added all 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 break;
92c102dd64a3 Added all 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 case OS.SB_PAGEUP:
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	499 int pageIncrement = bar.getPageIncrement ();
92c102dd64a3 Added all 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 info.nPos = Math.max (info.nMin, info.nPos - pageIncrement);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	501 break;
82 43c42c637c9c First simple example works Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	502 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	503 }
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	504 OS.SetScrollInfo (hwnd, type, &info, 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	505 } else {
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	506 int /long/ code = callWindowProc (hwnd, msg, wParam, lParam);
108 6f75fdfa1bcd Change LRESULT to class, like done in the old DWT. Frank Benoit <benoit@tionex.de> parents: 104 diff changeset	507 result = code is 0 ? LRESULT.ZERO : 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	508 }
92c102dd64a3 Added all 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 bar.wmScrollChild (wParam, lParam);
92c102dd64a3 Added all 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 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	511 }
92c102dd64a3 Added all 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
92c102dd64a3 Added all 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 }
36 ceb20ad6c0f8 Scrollable Frank Benoit <benoit@tionex.de> parents: 31 diff changeset	514

Mercurial > projects > dwt-win

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