projects/dwt-win: dwt/accessibility/Accessible.d annotate

annotate dwt/accessibility/Accessible.d @ 313:fcbee1f66cc3

Fix 2 typos

author	Frank Benoit <benoit@tionex.de>
date	Fri, 19 Sep 2008 22:43:25 +0200
parents	ebe343095cf1
children

rev	line source
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1 /*******************************************************************************
246 fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 237 diff changeset	2 * Copyright (c) 2000, 2008 IBM Corporation and others.
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	3 * All rights reserved. This program and the accompanying materials
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	4 * are made available under the terms of the Eclipse Public License v1.0
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	5 * which accompanies this distribution, and is available at
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	6 * http://www.eclipse.org/legal/epl-v10.html
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	7 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	8 * Contributors:
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	9 * IBM Corporation - initial API and implementation
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	10 * Port to the D programming language:
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	11 * Frank Benoit <benoit@tionex.de>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	12 *******************************************************************************/
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	13 module dwt.accessibility.Accessible;
92c102dd64a3 Added all 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;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	17 import dwt.internal.ole.win32.COM;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	18 import dwt.internal.ole.win32.OAIDL;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	19 import dwt.internal.ole.win32.ifs;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	20 import dwt.internal.ole.win32.extras;
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	21 import dwt.internal.win32.OS;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	22 import dwt.internal.DWTEventListener;
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	23 import dwt.ole.win32.OLE;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	24 import dwt.ole.win32.Variant;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	25 import dwt.widgets.Control;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	26 import dwt.widgets.Table;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	27 import dwt.widgets.TableItem;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	28 import dwt.widgets.Tree;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	29 import dwt.widgets.TreeItem;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	30 import dwt.widgets.Widget;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	31
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	32 import dwt.accessibility.ACC;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	33 import dwt.accessibility.AccessibleControlListener;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	34 import dwt.accessibility.AccessibleListener;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	35 import dwt.accessibility.AccessibleTextListener;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	36 import dwt.accessibility.AccessibleControlEvent;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	37 import dwt.accessibility.AccessibleEvent;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	38
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	39 import dwt.dwthelper.utils;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	40 import tango.core.Array;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	41 import tango.core.Thread;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	42
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	43 /**
92c102dd64a3 Added all 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 * Instances of this class provide a bridge between 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	45 * code and assistive technology clients. Many platforms provide
92c102dd64a3 Added all 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 * default accessible behavior for most widgets, and this 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	47 * allows that default behavior to be overridden. Applications
92c102dd64a3 Added all 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 * can get the default Accessible object for a control by sending
92c102dd64a3 Added all 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 * it <code>getAccessible</code>, and then add an accessible listener
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	50 * to override simple items like the name and help string, or they
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	51 * can add an accessible control listener to override complex items.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	52 * As a rule of thumb, an application would only want to use 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	53 * accessible control listener to implement accessibility for a
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	54 * custom control.
92c102dd64a3 Added all 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 * @see Control#getAccessible
92c102dd64a3 Added all 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 * @see AccessibleListener
92c102dd64a3 Added all 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 * @see AccessibleEvent
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	59 * @see AccessibleControlListener
92c102dd64a3 Added all 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 * @see AccessibleControlEvent
246 fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 237 diff changeset	61 * @see <a href="http://www.eclipse.org/swt/snippets/#accessibility">Accessibility snippets</a>
fd9c62a2998e Updater SWT 3.4M7 to 3.4 Frank Benoit <benoit@tionex.de> parents: 237 diff changeset	62 * @see <a href="http://www.eclipse.org/swt/">Sample code and further information</a>
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	63 *
92c102dd64a3 Added all 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 * @since 2.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	65 */
92c102dd64a3 Added all 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 public class Accessible {
92c102dd64a3 Added all 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 int refCount = 0, enumIndex = 0;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	68 _IAccessibleImpl objIAccessible;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	69 _IEnumVARIANTImpl objIEnumVARIANT;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	70 IAccessible iaccessible;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	71 DWTEventListener[] accessibleListeners;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	72 DWTEventListener[] accessibleControlListeners;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	73 DWTEventListener[] textListeners;
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	74 Object[] variants;
92c102dd64a3 Added all 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 Control control;
92c102dd64a3 Added all 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
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	77 this(Control control) {
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	78 this.control = control;
92c102dd64a3 Added all 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 int /long/[] ppvObject = new int /long/[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	80 /* CreateStdAccessibleObject([in] hwnd, [in] idObject, [in] riidInterface, [out] ppvObject).
92c102dd64a3 Added all 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 * AddRef has already been called on ppvObject by the callee and must be released by the caller.
92c102dd64a3 Added all 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 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	83 HRESULT result = COM.CreateStdAccessibleObject(control.handle, COM.OBJID_CLIENT, &COM.IIDIAccessible, cast(void**)&iaccessible);
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	84 /* The object needs to be checked, because if the CreateStdAccessibleObject()
92c102dd64a3 Added all 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 * symbol is not found, the return value is S_OK.
92c102dd64a3 Added all 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 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	87 if (iaccessible is null) return;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	88 if (result !is COM.S_OK) OLE.error(OLE.ERROR_CANNOT_CREATE_OBJECT, 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	89
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	90 objIAccessible = new _IAccessibleImpl(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	91
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	92 //PORTING_FIXME: i don't understand this...
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	93 /+
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	94 int /long/ ppVtable = objIAccessible.ppVtable;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	95 int /long/[] pVtable = new int /long/[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	96 COM.MoveMemory(pVtable, ppVtable, OS.PTR_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	97 int /long/[] funcs = new int /long/[28];
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	98 COM.MoveMemory(funcs, pVtable[0], OS.PTR_SIZEOF * funcs.length);
92c102dd64a3 Added all 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 funcs[9] = COM.get_accChild_CALLBACK(funcs[9]);
92c102dd64a3 Added all 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 funcs[10] = COM.get_accName_CALLBACK(funcs[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	101 funcs[11] = COM.get_accValue_CALLBACK(funcs[11]);
92c102dd64a3 Added all 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 funcs[12] = COM.get_accDescription_CALLBACK(funcs[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	103 funcs[13] = COM.get_accRole_CALLBACK(funcs[13]);
92c102dd64a3 Added all 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 funcs[14] = COM.get_accState_CALLBACK(funcs[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	105 funcs[15] = COM.get_accHelp_CALLBACK(funcs[15]);
92c102dd64a3 Added all 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 funcs[16] = COM.get_accHelpTopic_CALLBACK(funcs[16]);
92c102dd64a3 Added all 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 funcs[17] = COM.get_accKeyboardShortcut_CALLBACK(funcs[17]);
92c102dd64a3 Added all 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 funcs[20] = COM.get_accDefaultAction_CALLBACK(funcs[20]);
92c102dd64a3 Added all 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 funcs[21] = COM.accSelect_CALLBACK(funcs[21]);
92c102dd64a3 Added all 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 funcs[22] = COM.accLocation_CALLBACK(funcs[22]);
92c102dd64a3 Added all 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 funcs[23] = COM.accNavigate_CALLBACK(funcs[23]);
92c102dd64a3 Added all 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 funcs[25] = COM.accDoDefaultAction_CALLBACK(funcs[25]);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	113 funcs[26] = COM.put_accName_CALLBACK(funcs[26]);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	114 funcs[27] = COM.put_accValue_CALLBACK(funcs[27]);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	115 COM.MoveMemory(pVtable[0], funcs, OS.PTR_SIZEOF * funcs.length);
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	116 +/
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	117
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	118 objIEnumVARIANT = new _IEnumVARIANTImpl(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	119 AddRef();
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	121
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	122 /**
92c102dd64a3 Added all 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 * Invokes platform specific functionality to allocate a new accessible object.
92c102dd64a3 Added all 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 * <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	125 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public
92c102dd64a3 Added all 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 * API for <code>Accessible</code>. It is marked public only so that 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	127 * can be shared within the packages provided by DWT. It is 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	128 * available on all platforms, and should never be called from
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	129 * application code.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	130 * </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	131 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	132 * @param control the control to get the accessible object 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	133 * @return the platform specific accessible object
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	134 */
92c102dd64a3 Added all 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 public static Accessible internal_new_Accessible(Control control) {
92c102dd64a3 Added all 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 return new Accessible(control);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	137 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	138
92c102dd64a3 Added all 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 * Adds the listener to the collection of listeners who will
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	141 * be notified when an accessible client asks for certain strings,
92c102dd64a3 Added all 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 * such as name, description, help, or keyboard shortcut. 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	143 * listener is notified by sending it one of the messages defined
92c102dd64a3 Added all 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 * in the <code>AccessibleListener</code> interface.
92c102dd64a3 Added all 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 *
92c102dd64a3 Added all 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 * @param listener the listener that should be notified when 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	147 * is asked for a name, description, help, or keyboard shortcut string
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	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 * @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	150 * <li>ERROR_NULL_ARGUMENT - if the listener 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	151 * </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	152 * @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	153 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	154 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	155 * </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	156 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	157 * @see AccessibleListener
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	158 * @see #removeAccessibleListener
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	159 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	160 public void addAccessibleListener(AccessibleListener listener) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	161 checkWidget();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	162 if (listener is null) DWT.error(__FILE__, __LINE__, DWT.ERROR_NULL_ARGUMENT);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	163 accessibleListeners ~= listener;
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	164 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	165
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	166 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	167 * Adds the listener to the collection of listeners who will
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	168 * be notified when an accessible client asks for custom control
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	169 * specific information. The listener is notified by sending 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	170 * one of the messages defined in the <code>AccessibleControlListener</code>
92c102dd64a3 Added all 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 * interface.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	172 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	173 * @param listener the listener that should be notified when 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	174 * is asked for custom control specific information
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	175 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	176 * @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	177 * <li>ERROR_NULL_ARGUMENT - if the listener 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	178 * </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	179 * @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	180 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	181 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	182 * </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	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 * @see AccessibleControlListener
92c102dd64a3 Added all 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 * @see #removeAccessibleControlListener
92c102dd64a3 Added all 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 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	187 public void addAccessibleControlListener(AccessibleControlListener listener) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	188 checkWidget();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	189 if (listener is null) DWT.error(__FILE__, __LINE__, DWT.ERROR_NULL_ARGUMENT);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	190 accessibleControlListeners ~= listener;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	191 }
92c102dd64a3 Added all 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
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	193 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	194 * Adds the listener to the collection of listeners who will
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	195 * be notified when an accessible client asks for custom text control
92c102dd64a3 Added all 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 * specific information. The listener is notified by sending 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	197 * one of the messages defined in the <code>AccessibleTextListener</code>
92c102dd64a3 Added all 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 * interface.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	199 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	200 * @param listener the listener that should be notified when 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	201 * is asked for custom text control specific information
92c102dd64a3 Added all 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 * @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	204 * <li>ERROR_NULL_ARGUMENT - if the listener 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	205 * </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	206 * @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	207 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	208 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	209 * </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	210 *
92c102dd64a3 Added all 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 * @see AccessibleTextListener
92c102dd64a3 Added all 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 * @see #removeAccessibleTextListener
92c102dd64a3 Added all 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 *
92c102dd64a3 Added all 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 * @since 3.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	215 */
92c102dd64a3 Added all 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 public void addAccessibleTextListener (AccessibleTextListener listener) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	217 checkWidget ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	218 if (listener is null) DWT.error (DWT.ERROR_NULL_ARGUMENT);
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	219 textListeners ~= listener;
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	220 }
92c102dd64a3 Added all 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 /**
92c102dd64a3 Added all 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 * Returns the control for this Accessible object.
92c102dd64a3 Added all 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 *
92c102dd64a3 Added all 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 * @return the receiver's control
92c102dd64a3 Added all 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 * @since 3.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	227 */
92c102dd64a3 Added all 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 public Control getControl() {
92c102dd64a3 Added all 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 return control;
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all 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
92c102dd64a3 Added all 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 * Invokes platform specific functionality to dispose an accessible object.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	234 * <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	235 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public
92c102dd64a3 Added all 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 * API for <code>Accessible</code>. It is marked public only so that 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	237 * can be shared within the packages provided by DWT. It is 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	238 * available on all platforms, and should never be called from
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	239 * application code.
92c102dd64a3 Added all 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 * </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	241 */
92c102dd64a3 Added all 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 public void internal_dispose_Accessible() {
92c102dd64a3 Added all 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 if (iaccessible !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	244 iaccessible.Release();
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	246 iaccessible = 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	247 Release();
92c102dd64a3 Added all 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
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	250 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	251 * Invokes platform specific functionality to handle a window message.
92c102dd64a3 Added all 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 * <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	253 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public
92c102dd64a3 Added all 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 * API for <code>Accessible</code>. It is marked public only so that 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	255 * can be shared within the packages provided by DWT. It is 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	256 * available on all platforms, and should never be called from
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	257 * application code.
92c102dd64a3 Added all 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 * </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	259 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	260 public int /long/ internal_WM_GETOBJECT (int /long/ wParam, int /long/ 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	261 if (objIAccessible is null) return 0;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	262 if (lParam is COM.OBJID_CLIENT) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	263 /* LresultFromObject([in] riid, [in] wParam, [in] pAcc)
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	264 * The argument pAcc is owned by the caller so reference count 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	265 * need to be incremented.
92c102dd64a3 Added all 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 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	267 return COM.LresultFromObject(&COM.IIDIAccessible, wParam, cast(IAccessible)objIAccessible);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	268 }
92c102dd64a3 Added all 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 return 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	270 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	271
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	272 /**
92c102dd64a3 Added all 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 * Removes the listener from the collection of listeners who will
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	274 * be notified when an accessible client asks for certain strings,
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	275 * such as name, description, help, or keyboard shortcut.
92c102dd64a3 Added all 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 *
92c102dd64a3 Added all 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 * @param listener the listener that should no longer be notified when 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	278 * is asked for a name, description, help, or keyboard shortcut string
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	279 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	280 * @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	281 * <li>ERROR_NULL_ARGUMENT - if the listener 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	282 * </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	283 * @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	284 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	285 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	286 * </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	287 *
92c102dd64a3 Added all 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 * @see AccessibleListener
92c102dd64a3 Added all 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 * @see #addAccessibleListener
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	290 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	291 public void removeAccessibleListener(AccessibleListener listener) {
92c102dd64a3 Added all 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 checkWidget();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	293 if (listener is null) DWT.error(__FILE__, __LINE__, DWT.ERROR_NULL_ARGUMENT);
313 fcbee1f66cc3 Fix 2 typos Frank Benoit <benoit@tionex.de> parents: 312 diff changeset	294 accessibleListeners.length = accessibleListeners.remove(listener);
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	295 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	296
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	297 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	298 * Removes the listener from the collection of listeners who will
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	299 * be notified when an accessible client asks for custom control
92c102dd64a3 Added all 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 * specific information.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	301 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	302 * @param listener the listener that should no longer be notified when 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	303 * is asked for custom control specific information
92c102dd64a3 Added all 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 * @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	306 * <li>ERROR_NULL_ARGUMENT - if the listener 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	307 * </ul>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	308 * @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	309 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	310 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	311 * </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	312 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	313 * @see AccessibleControlListener
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	314 * @see #addAccessibleControlListener
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	315 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	316 public void removeAccessibleControlListener(AccessibleControlListener listener) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	317 checkWidget();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	318 if (listener is null) DWT.error(__FILE__, __LINE__, DWT.ERROR_NULL_ARGUMENT);
313 fcbee1f66cc3 Fix 2 typos Frank Benoit <benoit@tionex.de> parents: 312 diff changeset	319 accessibleControlListeners.length = accessibleControlListeners.remove(listener);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	320 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	321
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	322 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	323 * Removes the listener from the collection of listeners who will
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	324 * be notified when an accessible client asks for custom text control
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	325 * specific information.
92c102dd64a3 Added all 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 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	327 * @param listener the listener that should no longer be notified when 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	328 * is asked for custom text control specific information
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	329 *
92c102dd64a3 Added all 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 * @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	331 * <li>ERROR_NULL_ARGUMENT - if the listener 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	332 * </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	333 * @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	334 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	335 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	336 * </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	337 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	338 * @see AccessibleTextListener
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	339 * @see #addAccessibleTextListener
92c102dd64a3 Added all 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 * @since 3.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	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 public void removeAccessibleTextListener (AccessibleTextListener listener) {
92c102dd64a3 Added all 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 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	345 if (listener is null) DWT.error (DWT.ERROR_NULL_ARGUMENT);
312 ebe343095cf1 Fix tango.core.Array.remove use Frank Benoit <benoit@tionex.de> parents: 246 diff changeset	346 textListeners.length = textListeners.remove (listener);
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	347 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	348
92c102dd64a3 Added all 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 /**
92c102dd64a3 Added all 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 * Sends a message to accessible clients that the child selection
92c102dd64a3 Added all 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 * within a custom container control has changed.
92c102dd64a3 Added all 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 *
92c102dd64a3 Added all 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 * @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	354 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	355 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	356 * </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	357 *
92c102dd64a3 Added all 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 * @since 3.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	359 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	360 public void selectionChanged () {
92c102dd64a3 Added all 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 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	362 COM.NotifyWinEvent (COM.EVENT_OBJECT_SELECTIONWITHIN, control.handle, COM.OBJID_CLIENT, COM.CHILDID_SELF);
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all 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 * Sends a message to accessible clients indicating that the focus
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	367 * has changed within a custom control.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	368 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	369 * @param childID an identifier specifying a child of the control
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	370 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	371 * @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	372 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	373 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	374 * </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	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 public void setFocus(int childID) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	377 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	378 COM.NotifyWinEvent (COM.EVENT_OBJECT_FOCUS, control.handle, COM.OBJID_CLIENT, childIDToOs(childID));
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	379 }
92c102dd64a3 Added all 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
92c102dd64a3 Added all 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 /**
92c102dd64a3 Added all 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 * Sends a message to accessible clients that the text
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	383 * caret has moved within a custom control.
92c102dd64a3 Added all 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 * @param index the new caret index within the control
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	386 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	387 * @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	388 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	389 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	390 * </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	391 *
92c102dd64a3 Added all 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 * @since 3.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	393 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	394 public void textCaretMoved (int index) {
92c102dd64a3 Added all 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 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	396 COM.NotifyWinEvent (COM.EVENT_OBJECT_LOCATIONCHANGE, control.handle, COM.OBJID_CARET, COM.CHILDID_SELF);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	397 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	398
92c102dd64a3 Added all 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 * Sends a message to accessible clients that the text
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	401 * within a custom control has changed.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	402 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	403 * @param type the type of change, one of <code>ACC.NOTIFY_TEXT_INSERT</code>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	404 * or <code>ACC.NOTIFY_TEXT_DELETE</code>
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	405 * @param startIndex the text index within the control where the insertion or deletion begins
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	406 * @param length the non-negative length in characters of the insertion or deletion
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	407 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	408 * @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	409 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	410 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	411 * </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	412 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	413 * @see ACC#TEXT_INSERT
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	414 * @see ACC#TEXT_DELETE
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	415 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	416 * @since 3.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	417 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	418 public void textChanged (int type, int startIndex, int length) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	419 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	420 COM.NotifyWinEvent (COM.EVENT_OBJECT_VALUECHANGE, control.handle, COM.OBJID_CLIENT, COM.CHILDID_SELF);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	421 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	422
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	423 /**
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	424 * Sends a message to accessible clients that the text
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	425 * selection has changed within a custom control.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	426 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	427 * @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	428 * <li>ERROR_WIDGET_DISPOSED - if the receiver's control 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	429 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver's control</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	430 * </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	431 *
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	432 * @since 3.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	433 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	434 public void textSelectionChanged () {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	435 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	436 // not an MSAA 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	437 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	438
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	439 /* QueryInterface([in] iid, [out] ppvObject)
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	440 * Ownership of ppvObject transfers from callee to caller so reference count on ppvObject
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	441 * must be incremented before returning. Caller is responsible for releasing ppvObject.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	442 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	443 HRESULT QueryInterface(REFIID riid, void** ppvObject) {
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	444 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	445
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	446 if (COM.IsEqualGUID(riid, &COM.IIDIUnknown)) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	447 ppvObject = cast(void)cast(IUnknown) objIAccessible;
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	448 AddRef();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	449 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	450 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	451
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	452 if (COM.IsEqualGUID(riid, &COM.IIDIDispatch)) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	453 ppvObject = cast(void)cast(IDispatch) objIAccessible;
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	454 AddRef();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	455 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	456 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	457
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	458 if (COM.IsEqualGUID(riid, &COM.IIDIAccessible)) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	459 ppvObject = cast(void)cast(IAccessible) objIAccessible;
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	460 AddRef();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	461 return COM.S_OK;
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all 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
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	464 if (COM.IsEqualGUID(riid, &COM.IIDIEnumVARIANT)) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	465 ppvObject = cast(void)cast(IEnumVARIANT) objIEnumVARIANT;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	466 AddRef();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	467 enumIndex = 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	468 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	469 }
92c102dd64a3 Added all 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
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	471 HRESULT result = iaccessible.QueryInterface(riid, ppvObject);
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 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	473 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	474
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	475 ULONG AddRef() {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	476 refCount++;
92c102dd64a3 Added all 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 return refCount;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	478 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	479
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	480 ULONG Release() {
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	481 refCount--;
92c102dd64a3 Added all 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
92c102dd64a3 Added all 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 if (refCount 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	484 objIAccessible = 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	485 objIEnumVARIANT = 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	486 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	487 return refCount;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	488 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	489
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	490 HRESULT accDoDefaultAction(VARIANT variant) {
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	491 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all 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 // Currently, we don't let the application override this. Forward to the proxy.
92c102dd64a3 Added all 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 int code = iaccessible.accDoDefaultAction(variant);
92c102dd64a3 Added all 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 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all 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 return code;
92c102dd64a3 Added all 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 }
92c102dd64a3 Added all 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
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	498 HRESULT accHitTest(LONG xLeft, LONG yTop, VARIANT* pvarChild) {
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	499 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	500 if (accessibleControlListeners.length is 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	501 return iaccessible.accHitTest(xLeft, yTop, pvarChild);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	502 }
92c102dd64a3 Added all 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
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	504 AccessibleControlEvent event = new AccessibleControlEvent(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	505 event.childID = ACC.CHILDID_NONE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	506 event.x = xLeft;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	507 event.y = yTop;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	508 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	509 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	510 listener.getChildAtPoint(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	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 int childID = event.childID;
92c102dd64a3 Added all 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 if (childID is ACC.CHILDID_NONE) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	514 return iaccessible.accHitTest(xLeft, yTop, pvarChild);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	515 }
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	516 //TODO - use VARIANT structure
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	517 pvarChild.vt = COM.VT_I4;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	518 pvarChild.lVal = childIDToOs(childID);
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	519 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	520 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	521
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	522 HRESULT accLocation(LONG* pxLeft, LONG* pyTop, LONG* pcxWidth, LONG* pcyHeight, VARIANT variant) {
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	523 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	524 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	525 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	526 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	527
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	528 /* Get the default location from the OS. */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	529 int osLeft = 0, osTop = 0, osWidth = 0, osHeight = 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	530 int code = iaccessible.accLocation(pxLeft, pyTop, pcxWidth, pcyHeight, variant);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	531 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	532 if (accessibleControlListeners.length is 0) return 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	533 if (code is COM.S_OK) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	534 int[1] pLeft, pTop, pWidth, pHeight;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	535 COM.MoveMemory(pLeft.ptr, pxLeft, 4);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	536 COM.MoveMemory(pTop.ptr, pyTop, 4);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	537 COM.MoveMemory(pWidth.ptr, pcxWidth, 4);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	538 COM.MoveMemory(pHeight.ptr, pcyHeight, 4);
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	539 osLeft = pLeft[0]; osTop = pTop[0]; osWidth = pWidth[0]; osHeight = pHeight[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	540 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	541
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	542 AccessibleControlEvent event = new AccessibleControlEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	543 event.childID = osToChildID(v.lVal);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	544 event.x = osLeft;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	545 event.y = osTop;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	546 event.width = osWidth;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	547 event.height = osHeight;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	548 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	549 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	550 listener.getLocation(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	551 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	552 OS.MoveMemory(pxLeft, &event.x, 4);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	553 OS.MoveMemory(pyTop, &event.y, 4);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	554 OS.MoveMemory(pcxWidth, &event.width, 4);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	555 OS.MoveMemory(pcyHeight, &event.height, 4);
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	556 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	557 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	558
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	559 HRESULT accNavigate(LONG navDir, VARIANT variant, VARIANT* pvarEndUpAt) {
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	560 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	561 // Currently, we don't let the application override this. Forward to the proxy.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	562 int code = iaccessible.accNavigate(navDir, variant, pvarEndUpAt);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	563 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	564 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	565 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	566
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	567 HRESULT accSelect(LONG flagsSelect, VARIANT variant) {
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	568 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	569 // Currently, we don't let the application override this. Forward to the proxy.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	570 int code = iaccessible.accSelect(flagsSelect, variant);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	571 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	572 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	573 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	574
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	575 /* get_accChild([in] varChild, [out] ppdispChild)
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	576 * Ownership of ppdispChild transfers from callee to caller so reference count on ppdispChild
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	577 * must be incremented before returning. The caller is responsible for releasing ppdispChild.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	578 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	579 HRESULT get_accChild(VARIANT variant, LPDISPATCH* ppdispChild) {
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	580 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	581 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	582 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	583 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	584 if (accessibleControlListeners.length is 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	585 int code = iaccessible.get_accChild(variant, ppdispChild);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	586 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	587 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	588 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	589
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	590 AccessibleControlEvent event = new AccessibleControlEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	591 event.childID = osToChildID(v.lVal);
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	592 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	593 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	594 listener.getChild(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	595 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	596 Accessible accessible = event.accessible;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	597 if (accessible !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	598 accessible.AddRef();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	599 *ppdispChild = accessible.objIAccessible;
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	600 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	601 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	602 return COM.S_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	603 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	604
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	605 HRESULT get_accChildCount(LONG* pcountChildren) {
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	606 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	607
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	608 /* Get the default child count from the OS. */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	609 int osChildCount = 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	610 int code = iaccessible.get_accChildCount(pcountChildren);
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	611 if (accessibleControlListeners.length is 0) return 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	612 if (code is COM.S_OK) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	613 int[1] pChildCount;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	614 COM.MoveMemory(pChildCount.ptr, pcountChildren, 4);
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	615 osChildCount = pChildCount[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	616 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	617
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	618 AccessibleControlEvent event = new AccessibleControlEvent(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	619 event.childID = ACC.CHILDID_SELF;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	620 event.detail = osChildCount;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	621 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	622 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	623 listener.getChildCount(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	624 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	625
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	626 *pcountChildren = event.detail;
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	627 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	628 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	629
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	630 HRESULT get_accDefaultAction(VARIANT variant, BSTR* pszDefaultAction) {
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	631 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	632 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	633 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	634 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	635
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	636 /* Get the default defaultAction from the OS. */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 134 diff changeset	637 String osDefaultAction = 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	638 int code = iaccessible.get_accDefaultAction(variant, pszDefaultAction);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	639 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	640 if (accessibleControlListeners.length is 0) return 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	641 if (code is COM.S_OK) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	642 osDefaultAction = BSTRToStr( *pszDefaultAction, 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	643 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	644
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	645 AccessibleControlEvent event = new AccessibleControlEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	646 event.childID = osToChildID(v.lVal);
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	647 event.result = osDefaultAction;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	648 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	649 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	650 listener.getDefaultAction(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	651 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	652 if (event.result is null) return code;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	653 auto ptr = COM.SysAllocString(StrToWCHARz(event.result));
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	654 *pszDefaultAction = ptr;
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	655 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	656 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	657
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	658 HRESULT get_accDescription(VARIANT variant, BSTR* pszDescription) {
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	659 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	660 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	661 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	662 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	663
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	664 /* Get the default description from the OS. */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 134 diff changeset	665 String osDescription = 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	666 int code = iaccessible.get_accDescription(variant, pszDescription);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	667 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	668 // TEMPORARY CODE - process tree even if there are no apps listening
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	669 if (accessibleListeners.length is 0 && !( null is cast(Tree)control )) return 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	670 if (code is COM.S_OK) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	671 int size = COM.SysStringByteLen(*pszDescription);
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	672 if (size > 0) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	673 size = (size + 1) /2;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	674 osDescription = WCHARzToStr(*pszDescription, size);
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	675 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	676 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	677
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	678 AccessibleEvent event = new AccessibleEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	679 event.childID = osToChildID(v.lVal);
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	680 event.result = osDescription;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	681
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	682 // TEMPORARY CODE
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	683 /* Currently our tree columns are emulated using custom draw,
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	684 * so we need to create the description using the tree column
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	685 * header text and tree item text. */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	686 if (v.lVal !is COM.CHILDID_SELF) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	687 if (auto tree = cast(Tree)control ) {
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	688 int columnCount = tree.getColumnCount ();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	689 if (columnCount > 1) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	690 HWND hwnd = control.handle;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	691 int hItem;
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	692 if (OS.COMCTL32_MAJOR >= 6) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	693 hItem = OS.SendMessage (hwnd, OS.TVM_MAPACCIDTOHTREEITEM, v.lVal, 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	694 } else {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	695 hItem = v.lVal;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	696 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	697 Widget widget = tree.getDisplay ().findWidget (hwnd, hItem);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	698 event.result = "";
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	699 if (widget !is null ) if( auto item = cast(TreeItem) widget ) {
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	700 for (int i = 1; i < columnCount; i++) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	701 event.result ~= tree.getColumn(i).getText() ~ ": " ~ item.getText(i);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	702 if (i + 1 < columnCount) event.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	703 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	704 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	705 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	706 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	707 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	708 for (int i = 0; i < accessibleListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	709 AccessibleListener listener = cast(AccessibleListener) accessibleListeners[i];
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	710 listener.getDescription(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	711 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	712 if (event.result is null) return code;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	713 auto ptr = COM.SysAllocString(StrToWCHARz(event.result));
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	714 *pszDescription = ptr;
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	715 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	716 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	717
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	718 /* get_accFocus([out] int pvarChild)
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	719 * Ownership of pvarChild transfers from callee to caller so reference count on pvarChild
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	720 * must be incremented before returning. The caller is responsible for releasing pvarChild.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	721 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	722 HRESULT get_accFocus(VARIANT* pvarChild) {
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	723 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	724
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	725 /* Get the default focus child from the OS. */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	726 int osChild = ACC.CHILDID_NONE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	727 int code = iaccessible.get_accFocus(pvarChild);
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	728 if (accessibleControlListeners.length is 0) return 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	729 if (code is COM.S_OK) {
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	730 //TODO - use VARIANT structure
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	731 short[1] pvt;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	732 COM.MoveMemory(pvt.ptr, pvarChild, 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	733 if (pvt[0] is COM.VT_I4) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	734 int[1] pChild;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	735 COM.MoveMemory(pChild.ptr, pvarChild + 8, 4);
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	736 osChild = osToChildID(pChild[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	737 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	738 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	739
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	740 AccessibleControlEvent event = new AccessibleControlEvent(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	741 event.childID = osChild;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	742 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	743 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	744 listener.getFocus(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	745 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	746 Accessible accessible = event.accessible;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	747 if (accessible !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	748 accessible.AddRef();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	749 pvarChild.vt = COM.VT_DISPATCH;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	750 pvarChild.byRef = cast(void*)cast(IDispatch)accessible.objIAccessible;
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	751 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	752 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	753 int childID = event.childID;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	754 if (childID is ACC.CHILDID_NONE) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	755 pvarChild.vt = COM.VT_EMPTY;
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	756 return COM.S_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	757 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	758 if (childID is ACC.CHILDID_SELF) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	759 AddRef();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	760 pvarChild.vt = COM.VT_DISPATCH;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	761 pvarChild.byRef = cast(void*)cast(IDispatch)objIAccessible;
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	762 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	763 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	764 pvarChild.vt = COM.VT_I4;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	765 pvarChild.lVal = childIDToOs(childID);
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	766 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	767 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	768
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	769 HRESULT get_accHelp(VARIANT variant, BSTR* pszHelp) {
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	770 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	771 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	772 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	773 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	774
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	775 /* Get the default help string from the OS. */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 134 diff changeset	776 String osHelp = 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	777 int code = iaccessible.get_accHelp(variant, pszHelp);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	778 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	779 if (accessibleListeners.length is 0) return 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	780 if (code is COM.S_OK) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	781 // the original SysString is clearuped and bstr set to null
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	782 osHelp = BSTRToStr(*pszHelp, 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	783 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	784
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	785 AccessibleEvent event = new AccessibleEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	786 event.childID = osToChildID(v.lVal);
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	787 event.result = osHelp;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	788 for (int i = 0; i < accessibleListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	789 AccessibleListener listener = cast(AccessibleListener) accessibleListeners[i];
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	790 listener.getHelp(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	791 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	792 if (event.result is null) return code;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	793 auto ptr = COM.SysAllocString(StrToWCHARz(event.result));
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	794 *pszHelp = ptr;
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	795 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	796 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	797
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	798 HRESULT get_accHelpTopic(BSTR* pszHelpFile, VARIANT variant, LONG* pidTopic) {
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	799 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	800 // Currently, we don't let the application override this. Forward to the proxy.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	801 int code = iaccessible.get_accHelpTopic(pszHelpFile, variant, pidTopic);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	802 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	803 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	804 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	805
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	806 HRESULT get_accKeyboardShortcut(VARIANT variant, BSTR* pszKeyboardShortcut) {
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	807 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	808 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	809 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	810 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	811
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	812 /* Get the default keyboard shortcut from the OS. */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 134 diff changeset	813 String osKeyboardShortcut = 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	814 int code = iaccessible.get_accKeyboardShortcut(variant, pszKeyboardShortcut);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	815 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	816 if (accessibleListeners.length is 0) return 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	817 if (code is COM.S_OK) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	818 // the original SysString is clearuped and bstr set to null
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	819 osKeyboardShortcut = BSTRToStr(*pszKeyboardShortcut, 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	820 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	821
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	822 AccessibleEvent event = new AccessibleEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	823 event.childID = osToChildID(v.lVal);
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	824 event.result = osKeyboardShortcut;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	825 for (int i = 0; i < accessibleListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	826 AccessibleListener listener = cast(AccessibleListener) accessibleListeners[i];
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	827 listener.getKeyboardShortcut(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	828 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	829 if (event.result is null) return code;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	830 auto ptr = COM.SysAllocString(StrToWCHARz(event.result));
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	831 *pszKeyboardShortcut = ptr;
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	832 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	833 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	834
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	835 HRESULT get_accName(VARIANT variant, BSTR* pszName) {
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	836 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	837 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	838 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	839 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	840
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	841 /* Get the default name from the OS. */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 134 diff changeset	842 String osName = 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	843 int code = iaccessible.get_accName(variant, pszName);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	844 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	845 if (accessibleListeners.length is 0) return 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	846 if (code is COM.S_OK) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	847 // the original SysString is clearuped and bstr set to null
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	848 osName = BSTRToStr(*pszName, 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	849 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	850
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	851 AccessibleEvent event = new AccessibleEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	852 event.childID = osToChildID(v.lVal);
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	853 event.result = osName;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	854 for (int i = 0; i < accessibleListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	855 AccessibleListener listener = cast(AccessibleListener) accessibleListeners[i];
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	856 listener.getName(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	857 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	858 if (event.result is null) return code;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	859 auto ptr = COM.SysAllocString(StrToWCHARz(event.result));
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	860 *pszName = ptr;
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	861 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	862 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	863
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	864 /* get_accParent([out] ppdispParent)
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	865 * Ownership of ppdispParent transfers from callee to caller so reference count on ppdispParent
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	866 * must be incremented before returning. The caller is responsible for releasing ppdispParent.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	867 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	868 HRESULT get_accParent(LPDISPATCH* ppdispParent) {
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	869 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	870 // Currently, we don't let the application override this. Forward to the proxy.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	871 return iaccessible.get_accParent(ppdispParent);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	872 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	873
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	874 HRESULT get_accRole(VARIANT variant, VARIANT* pvarRole) {
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	875 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	876 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	877 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	878 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	879
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	880 /* Get the default role from the OS. */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	881 int osRole = COM.ROLE_SYSTEM_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	882 int code = iaccessible.get_accRole(variant, pvarRole);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	883 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	884 // TEMPORARY CODE - process tree and table even if there are no apps listening
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	885 if (accessibleControlListeners.length is 0 && !( null !is cast(Tree)control \|\| null !is cast(Table)control )) return 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	886 if (code is COM.S_OK) {
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	887 //TODO - use VARIANT structure
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	888 short[1] pvt;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	889 COM.MoveMemory(pvt.ptr, pvarRole, 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	890 if (pvt[0] is COM.VT_I4) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	891 int[1] pRole;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	892 COM.MoveMemory(pRole.ptr, pvarRole + 8, 4);
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	893 osRole = pRole[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	894 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	895 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	896
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	897 AccessibleControlEvent event = new AccessibleControlEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	898 event.childID = osToChildID(v.lVal);
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	899 event.detail = osToRole(osRole);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	900 // TEMPORARY CODE
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	901 /* Currently our checkbox table and tree are emulated using state mask
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	902 * images, so we need to specify 'checkbox' role for the items. */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	903 if (v.lVal !is COM.CHILDID_SELF) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	904 if ( null !is cast(Tree)control \|\| null !is cast(Table)control ) {
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	905 if ((control.getStyle() & DWT.CHECK) !is 0) event.detail = ACC.ROLE_CHECKBUTTON;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	906 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	907 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	908 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	909 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	910 listener.getRole(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	911 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	912 int role = roleToOs(event.detail);
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	913 pvarRole.vt = COM.VT_I4;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	914 pvarRole.lVal = role;
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	915 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	916 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	917
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	918 /* get_accSelection([out] pvarChildren)
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	919 * Ownership of pvarChildren transfers from callee to caller so reference count on pvarChildren
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	920 * must be incremented before returning. The caller is responsible for releasing pvarChildren.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	921 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	922 HRESULT get_accSelection(VARIANT* pvarChildren) {
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	923 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	924
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	925 /* Get the default selection from the OS. */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	926 int osChild = ACC.CHILDID_NONE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	927 int code = iaccessible.get_accSelection(pvarChildren);
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	928 if (accessibleControlListeners.length is 0) return 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	929 if (code is COM.S_OK) {
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	930 //TODO - use VARIANT structure
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	931 short[1] pvt;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	932 COM.MoveMemory(pvt.ptr, pvarChildren, 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	933 if (pvt[0] is COM.VT_I4) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	934 int[1] pChild;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	935 COM.MoveMemory(pChild.ptr, pvarChildren + 8, 4);
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	936 osChild = osToChildID(pChild[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	937 } else if (pvt[0] is COM.VT_UNKNOWN) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	938 osChild = ACC.CHILDID_MULTIPLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	939 /* Should get IEnumVARIANT from punkVal field, and enumerate children... */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	940 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	941 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	942
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	943 AccessibleControlEvent event = new AccessibleControlEvent(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	944 event.childID = osChild;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	945 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	946 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	947 listener.getSelection(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	948 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	949 Accessible accessible = event.accessible;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	950 if (accessible !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	951 accessible.AddRef();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	952 pvarChildren.vt = COM.VT_DISPATCH;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	953 pvarChildren.byRef = cast(void*)cast(IDispatch)accessible.objIAccessible;
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	954 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	955 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	956 int childID = event.childID;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	957 if (childID is ACC.CHILDID_NONE) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	958 pvarChildren.vt = COM.VT_EMPTY;
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	959 return COM.S_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	960 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	961 if (childID is ACC.CHILDID_MULTIPLE) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	962 AddRef();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	963 pvarChildren.vt = COM.VT_UNKNOWN;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	964 pvarChildren.byRef = cast(void*)cast(IUnknown)objIAccessible;
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	965 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	966 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	967 if (childID is ACC.CHILDID_SELF) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	968 AddRef();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	969 pvarChildren.vt = COM.VT_DISPATCH;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	970 pvarChildren.byRef = cast(void*)cast(IDispatch)objIAccessible;
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	971 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	972 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	973 pvarChildren.vt = COM.VT_I4;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	974 pvarChildren.lVal = childIDToOs(childID);
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	975 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	976 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	977
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	978 HRESULT get_accState(VARIANT variant, VARIANT* pvarState) {
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	979 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	980 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	981 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	982 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	983
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	984 /* Get the default state from the OS. */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	985 int osState = 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	986 int code = iaccessible.get_accState(variant, pvarState);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	987 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	988 // TEMPORARY CODE - process tree and table even if there are no apps listening
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	989 if (accessibleControlListeners.length is 0 && !( null !is cast(Tree)control \|\| null !is cast(Table)control )) return 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	990 if (code is COM.S_OK) {
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	991 //TODO - use VARIANT structure
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	992 short[1] pvt;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	993 COM.MoveMemory(pvt.ptr, pvarState, 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	994 if (pvt[0] is COM.VT_I4) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	995 int[1] pState;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	996 COM.MoveMemory(pState.ptr, pvarState + 8, 4);
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	997 osState = pState[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	998 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	999 }
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1000 bool grayed = false;
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	1001 AccessibleControlEvent event = new AccessibleControlEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1002 event.childID = osToChildID(v.lVal);
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	1003 event.detail = osToState(osState);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1004 // TEMPORARY CODE
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1005 /* Currently our checkbox table and tree are emulated using state mask
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1006 * images, so we need to determine if the item state is 'checked'. */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1007 if (v.lVal !is COM.CHILDID_SELF) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1008 if (null !is cast(Tree)control && (control.getStyle() & DWT.CHECK) !is 0) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1009 auto hwnd = control.handle;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1010 TVITEM tvItem;
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	1011 tvItem.mask = OS.TVIF_HANDLE \| OS.TVIF_STATE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1012 tvItem.stateMask = OS.TVIS_STATEIMAGEMASK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1013 if (OS.COMCTL32_MAJOR >= 6) {
237 e2affbeb686d Making tango.sys.win32.Types and dwt.internal.win32.WINTYPES to match common declaration. Make ansi charactars of type ubyte. Frank Benoit <benoit@tionex.de> parents: 213 diff changeset	1014 tvItem.hItem = cast(HTREEITEM) OS.SendMessage (hwnd, OS.TVM_MAPACCIDTOHTREEITEM, v.lVal, 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	1015 } else {
237 e2affbeb686d Making tango.sys.win32.Types and dwt.internal.win32.WINTYPES to match common declaration. Make ansi charactars of type ubyte. Frank Benoit <benoit@tionex.de> parents: 213 diff changeset	1016 tvItem.hItem = cast(HTREEITEM) v.lVal;
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	1017 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1018 auto result = OS.SendMessage (hwnd, OS.TVM_GETITEM, 0, &tvItem);
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	1019 bool checked = (result !is 0) && (((tvItem.state >> 12) & 1) 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	1020 if (checked) event.detail \|= ACC.STATE_CHECKED;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1021 grayed = tvItem.state >> 12 > 2;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1022 } else if (null !is cast(Table)control && (control.getStyle() & DWT.CHECK) !is 0) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1023 Table table = cast(Table) control;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1024 int index = event.childID;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1025 if (0 <= index && index < table.getItemCount()) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1026 TableItem item = table.getItem(index);
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	1027 if (item.getChecked()) event.detail \|= ACC.STATE_CHECKED;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1028 if (item.getGrayed()) grayed = 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	1029 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1030 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1031 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1032 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1033 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	1034 listener.getState(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	1035 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1036 int state = stateToOs(event.detail);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1037 if ((state & ACC.STATE_CHECKED) !is 0 && grayed) {
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1038 state &= ~ COM.STATE_SYSTEM_CHECKED;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1039 state \|= COM.STATE_SYSTEM_MIXED;
36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1040 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1041 pvarState.vt = COM.VT_I4;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1042 pvarState.lVal = state;
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	1043 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1044 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1045
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1046 HRESULT get_accValue(VARIANT variant, BSTR* pszValue) {
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	1047 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1048 VARIANT* v = &variant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1049 //COM.MoveMemory(v, variant, VARIANT.sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1050 if ((v.vt & 0xFFFF) !is COM.VT_I4) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1051
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1052 /* Get the default value string from the OS. */
212 ab60f3309436 reverted the char[] to String and use the an alias. Frank Benoit <benoit@tionex.de> parents: 134 diff changeset	1053 String osValue = 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	1054 int code = iaccessible.get_accValue(variant, pszValue);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1055 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1056 if (accessibleControlListeners.length is 0) return 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	1057 if (code is COM.S_OK) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1058 int size = COM.SysStringByteLen(*pszValue);
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	1059 if (size > 0) {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1060 osValue = WCHARsToStr((*pszValue)[ 0 .. size ]);
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	1061 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1062 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1063
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1064 AccessibleControlEvent event = new AccessibleControlEvent(this);
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1065 event.childID = osToChildID(v.lVal);
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	1066 event.result = osValue;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1067 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1068 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	1069 listener.getValue(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	1070 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1071 if (event.result is null) return code;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1072 auto ptr = COM.SysAllocString(StrToWCHARz(event.result));
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1073 *pszValue = ptr;
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	1074 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1075 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1076
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1077 HRESULT put_accName(VARIANT variant, BSTR* szName) {
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	1078 // MSAA: this method is no longer supported
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1079 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1080 // We don't implement this. Forward to the proxy.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1081 int code = iaccessible.put_accName(variant, szName);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1082 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1083 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1084 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1085
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1086 HRESULT put_accValue(VARIANT variant, BSTR* szValue) {
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	1087 // MSAA: this method is typically only used for edit controls
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1088 if (iaccessible is null) return COM.CO_E_OBJNOTCONNECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1089 // We don't implement this. Forward to the proxy.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1090 int code = iaccessible.put_accValue(variant, szValue);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1091 if (code is COM.E_INVALIDARG) code = COM.S_FALSE; // proxy doesn't know about app childID
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1092 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1093 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1094
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1095 /* IEnumVARIANT methods: Next, Skip, Reset, Clone */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1096 /* Retrieve the next celt items in the enumeration sequence.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1097 * If there are fewer than the requested number of elements 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	1098 * in the sequence, retrieve the remaining elements.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1099 * The number of elements actually retrieved is returned in pceltFetched
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1100 * (unless the caller passed in NULL for that parameter).
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1101 */
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1102
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1103 /* Next([in] celt, [out] rgvar, [in, out] pceltFetched)
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1104 * Ownership of rgvar transfers from callee to caller so reference count on rgvar
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1105 * must be incremented before returning. The caller is responsible for releasing rgvar.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1106 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1107 HRESULT Next(ULONG celt, VARIANT rgvar, ULONG pceltFetched) {
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	1108 /* If there are no listeners, query the proxy 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	1109 * its IEnumVariant, and get the Next items from 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	1110 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1111 if (accessibleControlListeners.length is 0) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1112 IEnumVARIANT ienumvariant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1113 int code = iaccessible.QueryInterface(&COM.IIDIEnumVARIANT, cast(void**)&ienumvariant);
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	1114 if (code !is COM.S_OK) return code;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1115 uint[1] celtFetched;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1116 code = ienumvariant.Next(celt, rgvar, celtFetched.ptr);
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	1117 ienumvariant.Release();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1118 COM.MoveMemory(pceltFetched, celtFetched.ptr, 4);
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	1119 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1120 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1121
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1122 if (rgvar is null) return COM.E_INVALIDARG;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1123 if (pceltFetched is null && celt !is 1) return COM.E_INVALIDARG;
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	1124 if (enumIndex 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	1125 AccessibleControlEvent event = new AccessibleControlEvent(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	1126 event.childID = ACC.CHILDID_SELF;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1127 for (int i = 0; i < accessibleControlListeners.length; i++) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1128 AccessibleControlListener listener = cast(AccessibleControlListener) accessibleControlListeners[i];
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	1129 listener.getChildren(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	1130 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1131 variants = event.children;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1132 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1133 Object[] nextItems = 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	1134 if (variants !is null && celt >= 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	1135 int endIndex = enumIndex + celt - 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	1136 if (endIndex > (variants.length - 1)) endIndex = variants.length - 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	1137 if (enumIndex <= endIndex) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1138 nextItems = new Object[endIndex - enumIndex + 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	1139 for (int i = 0; i < nextItems.length; i++) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1140 Object child = variants[enumIndex];
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1141 if (auto val = cast(ValueWrapperInt)child ) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1142 nextItems[i] = new ValueWrapperInt(childIDToOs(val.value));
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	1143 } else {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1144 nextItems[i] = child;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1145 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1146 enumIndex++;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1147 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1148 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1149 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1150 if (nextItems !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	1151 for (int i = 0; i < nextItems.length; i++) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1152 Object nextItem = nextItems[i];
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1153 if (auto val = cast(ValueWrapperInt)nextItem ) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1154 int item = val.value;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1155 rgvar[i].vt = COM.VT_I4;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1156 rgvar[i].byRef = cast(void*)item;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1157 COM.MoveMemory(rgvar + i * VARIANT.sizeof + 8, &item, 4);
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	1158 } else {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1159 Accessible accessible = cast(Accessible) nextItem;
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	1160 accessible.AddRef();
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1161 rgvar[i].vt = COM.VT_DISPATCH;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1162 rgvar[i].byRef = cast(void*)accessible.objIAccessible;
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	1163 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1164 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1165 if (pceltFetched !is null)
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1166 *pceltFetched = nextItems.length;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1167 if (nextItems.length is celt) return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1168 } else {
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1169 if (pceltFetched !is null){
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1170 int zero = 0;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1171 *pceltFetched = 0;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1172 }
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	1173 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1174 return COM.S_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	1175 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1176
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1177 /* Skip over the specified number of elements in the enumeration sequence. */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1178 HRESULT Skip(ULONG celt) {
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	1179 /* If there are no listeners, query the proxy
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1180 * for its IEnumVariant, and tell it to Skip.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1181 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1182 if (accessibleControlListeners.length is 0) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1183 IEnumVARIANT ienumvariant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1184 int code = iaccessible.QueryInterface(&COM.IIDIEnumVARIANT, cast(void**)&ienumvariant);
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	1185 if (code !is COM.S_OK) return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1186 code = ienumvariant.Skip(celt);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1187 ienumvariant.Release();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1188 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1189 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1190
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1191 if (celt < 1 ) return COM.E_INVALIDARG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1192 enumIndex += celt;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1193 if (enumIndex > (variants.length - 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	1194 enumIndex = variants.length - 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	1195 return COM.S_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	1196 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1197 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1198 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1199
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1200 /* Reset the enumeration sequence to the beginning. */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1201 HRESULT Reset() {
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	1202 /* If there are no listeners, query the proxy
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1203 * for its IEnumVariant, and tell it to Reset.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1204 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1205 if (accessibleControlListeners.length is 0) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1206 IEnumVARIANT ienumvariant;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1207 int code = iaccessible.QueryInterface(&COM.IIDIEnumVARIANT, cast(void**)&ienumvariant);
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	1208 if (code !is COM.S_OK) return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1209 code = ienumvariant.Reset();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1210 ienumvariant.Release();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1211 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1212 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1213
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1214 enumIndex = 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	1215 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1216 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1217
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1218 /* Clone([out] ppEnum)
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1219 * Ownership of ppEnum transfers from callee to caller so reference count on ppEnum
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1220 * must be incremented before returning. The caller is responsible for releasing ppEnum.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1221 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1222 int Clone(IEnumVARIANT* ppEnum) {
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	1223 /* If there are no listeners, query the proxy 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	1224 * its IEnumVariant, and get the Clone from 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	1225 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1226 if (accessibleControlListeners.length is 0) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1227 IEnumVARIANT ienumvariant;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1228 int code = iaccessible.QueryInterface(&COM.IIDIEnumVARIANT, cast(void**)&ienumvariant);
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	1229 if (code !is COM.S_OK) return code;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1230 IEnumVARIANT[1] pEnum;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1231 code = ienumvariant.Clone(pEnum.ptr);
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	1232 ienumvariant.Release();
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1233 COM.MoveMemory(ppEnum, pEnum.ptr, (void*).sizeof);
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1234 return code;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1235 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1236
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1237 if (ppEnum is null) return COM.E_INVALIDARG;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1238 *ppEnum = objIEnumVARIANT;
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	1239 AddRef();
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1240 return COM.S_OK;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1241 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1242
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1243 int childIDToOs(int childID) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1244 if (childID is ACC.CHILDID_SELF) return COM.CHILDID_SELF;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1245 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1246 * Feature of 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	1247 * In Windows XP, tree item ids are 1-based indices. Previous versions
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1248 * of Windows use the tree item handle for the accessible child ID.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1249 * For backward compatibility, we still take a handle childID for tree
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1250 * items on XP. All other childIDs are 1-based indices.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1251 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1252 if (!(cast(Tree)control )) return childID + 1;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1253 if (OS.COMCTL32_MAJOR < 6) return childID;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1254 return OS.SendMessage (control.handle, OS.TVM_MAPHTREEITEMTOACCID, childID, 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	1255 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1256
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1257 int osToChildID(int osChildID) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1258 if (osChildID is COM.CHILDID_SELF) return ACC.CHILDID_SELF;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1259 /*
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1260 * Feature of 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	1261 * In Windows XP, tree item ids are 1-based indices. Previous versions
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1262 * of Windows use the tree item handle for the accessible child ID.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1263 * For backward compatibility, we still take a handle childID for tree
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1264 * items on XP. All other childIDs are 1-based indices.
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1265 */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1266 if (!(cast(Tree)control )) return osChildID - 1;
31 92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1267 if (OS.COMCTL32_MAJOR < 6) return osChildID;
213 36f5cb12e1a2 Update to SWT 3.4M7 Frank Benoit <benoit@tionex.de> parents: 212 diff changeset	1268 return OS.SendMessage (control.handle, OS.TVM_MAPACCIDTOHTREEITEM, osChildID, 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	1269 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1270
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1271 int stateToOs(int state) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1272 int osState = 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	1273 if ((state & ACC.STATE_SELECTED) !is 0) osState \|= COM.STATE_SYSTEM_SELECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1274 if ((state & ACC.STATE_SELECTABLE) !is 0) osState \|= COM.STATE_SYSTEM_SELECTABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1275 if ((state & ACC.STATE_MULTISELECTABLE) !is 0) osState \|= COM.STATE_SYSTEM_MULTISELECTABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1276 if ((state & ACC.STATE_FOCUSED) !is 0) osState \|= COM.STATE_SYSTEM_FOCUSED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1277 if ((state & ACC.STATE_FOCUSABLE) !is 0) osState \|= COM.STATE_SYSTEM_FOCUSABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1278 if ((state & ACC.STATE_PRESSED) !is 0) osState \|= COM.STATE_SYSTEM_PRESSED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1279 if ((state & ACC.STATE_CHECKED) !is 0) osState \|= COM.STATE_SYSTEM_CHECKED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1280 if ((state & ACC.STATE_EXPANDED) !is 0) osState \|= COM.STATE_SYSTEM_EXPANDED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1281 if ((state & ACC.STATE_COLLAPSED) !is 0) osState \|= COM.STATE_SYSTEM_COLLAPSED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1282 if ((state & ACC.STATE_HOTTRACKED) !is 0) osState \|= COM.STATE_SYSTEM_HOTTRACKED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1283 if ((state & ACC.STATE_BUSY) !is 0) osState \|= COM.STATE_SYSTEM_BUSY;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1284 if ((state & ACC.STATE_READONLY) !is 0) osState \|= COM.STATE_SYSTEM_READONLY;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1285 if ((state & ACC.STATE_INVISIBLE) !is 0) osState \|= COM.STATE_SYSTEM_INVISIBLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1286 if ((state & ACC.STATE_OFFSCREEN) !is 0) osState \|= COM.STATE_SYSTEM_OFFSCREEN;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1287 if ((state & ACC.STATE_SIZEABLE) !is 0) osState \|= COM.STATE_SYSTEM_SIZEABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1288 if ((state & ACC.STATE_LINKED) !is 0) osState \|= COM.STATE_SYSTEM_LINKED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1289 return osState;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1290 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1291
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1292 int osToState(int osState) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1293 int state = ACC.STATE_NORMAL;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1294 if ((osState & COM.STATE_SYSTEM_SELECTED) !is 0) state \|= ACC.STATE_SELECTED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1295 if ((osState & COM.STATE_SYSTEM_SELECTABLE) !is 0) state \|= ACC.STATE_SELECTABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1296 if ((osState & COM.STATE_SYSTEM_MULTISELECTABLE) !is 0) state \|= ACC.STATE_MULTISELECTABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1297 if ((osState & COM.STATE_SYSTEM_FOCUSED) !is 0) state \|= ACC.STATE_FOCUSED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1298 if ((osState & COM.STATE_SYSTEM_FOCUSABLE) !is 0) state \|= ACC.STATE_FOCUSABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1299 if ((osState & COM.STATE_SYSTEM_PRESSED) !is 0) state \|= ACC.STATE_PRESSED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1300 if ((osState & COM.STATE_SYSTEM_CHECKED) !is 0) state \|= ACC.STATE_CHECKED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1301 if ((osState & COM.STATE_SYSTEM_EXPANDED) !is 0) state \|= ACC.STATE_EXPANDED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1302 if ((osState & COM.STATE_SYSTEM_COLLAPSED) !is 0) state \|= ACC.STATE_COLLAPSED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1303 if ((osState & COM.STATE_SYSTEM_HOTTRACKED) !is 0) state \|= ACC.STATE_HOTTRACKED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1304 if ((osState & COM.STATE_SYSTEM_BUSY) !is 0) state \|= ACC.STATE_BUSY;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1305 if ((osState & COM.STATE_SYSTEM_READONLY) !is 0) state \|= ACC.STATE_READONLY;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1306 if ((osState & COM.STATE_SYSTEM_INVISIBLE) !is 0) state \|= ACC.STATE_INVISIBLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1307 if ((osState & COM.STATE_SYSTEM_OFFSCREEN) !is 0) state \|= ACC.STATE_OFFSCREEN;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1308 if ((osState & COM.STATE_SYSTEM_SIZEABLE) !is 0) state \|= ACC.STATE_SIZEABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1309 if ((osState & COM.STATE_SYSTEM_LINKED) !is 0) state \|= ACC.STATE_LINKED;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1310 return state;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1311 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1312
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1313 int roleToOs(int role) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1314 switch (role) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1315 case ACC.ROLE_CLIENT_AREA: return COM.ROLE_SYSTEM_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	1316 case ACC.ROLE_WINDOW: return COM.ROLE_SYSTEM_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	1317 case ACC.ROLE_MENUBAR: return COM.ROLE_SYSTEM_MENUBAR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1318 case ACC.ROLE_MENU: return COM.ROLE_SYSTEM_MENUPOPUP;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1319 case ACC.ROLE_MENUITEM: return COM.ROLE_SYSTEM_MENUITEM;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1320 case ACC.ROLE_SEPARATOR: return COM.ROLE_SYSTEM_SEPARATOR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1321 case ACC.ROLE_TOOLTIP: return COM.ROLE_SYSTEM_TOOLTIP;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1322 case ACC.ROLE_SCROLLBAR: return COM.ROLE_SYSTEM_SCROLLBAR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1323 case ACC.ROLE_DIALOG: return COM.ROLE_SYSTEM_DIALOG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1324 case ACC.ROLE_LABEL: return COM.ROLE_SYSTEM_STATICTEXT;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1325 case ACC.ROLE_PUSHBUTTON: return COM.ROLE_SYSTEM_PUSHBUTTON;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1326 case ACC.ROLE_CHECKBUTTON: return COM.ROLE_SYSTEM_CHECKBUTTON;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1327 case ACC.ROLE_RADIOBUTTON: return COM.ROLE_SYSTEM_RADIOBUTTON;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1328 case ACC.ROLE_COMBOBOX: return COM.ROLE_SYSTEM_COMBOBOX;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1329 case ACC.ROLE_TEXT: return COM.ROLE_SYSTEM_TEXT;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1330 case ACC.ROLE_TOOLBAR: return COM.ROLE_SYSTEM_TOOLBAR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1331 case ACC.ROLE_LIST: return COM.ROLE_SYSTEM_LIST;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1332 case ACC.ROLE_LISTITEM: return COM.ROLE_SYSTEM_LISTITEM;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1333 case ACC.ROLE_TABLE: return COM.ROLE_SYSTEM_TABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1334 case ACC.ROLE_TABLECELL: return COM.ROLE_SYSTEM_CELL;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1335 case ACC.ROLE_TABLECOLUMNHEADER: return COM.ROLE_SYSTEM_COLUMNHEADER;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1336 case ACC.ROLE_TABLEROWHEADER: return COM.ROLE_SYSTEM_ROWHEADER;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1337 case ACC.ROLE_TREE: return COM.ROLE_SYSTEM_OUTLINE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1338 case ACC.ROLE_TREEITEM: return COM.ROLE_SYSTEM_OUTLINEITEM;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1339 case ACC.ROLE_TABFOLDER: return COM.ROLE_SYSTEM_PAGETABLIST;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1340 case ACC.ROLE_TABITEM: return COM.ROLE_SYSTEM_PAGETAB;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1341 case ACC.ROLE_PROGRESSBAR: return COM.ROLE_SYSTEM_PROGRESSBAR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1342 case ACC.ROLE_SLIDER: return COM.ROLE_SYSTEM_SLIDER;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1343 case ACC.ROLE_LINK: return COM.ROLE_SYSTEM_LINK;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1344 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	1345 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1346 return COM.ROLE_SYSTEM_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	1347 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1348
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1349 int osToRole(int osRole) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1350 switch (osRole) {
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1351 case COM.ROLE_SYSTEM_CLIENT: return ACC.ROLE_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	1352 case COM.ROLE_SYSTEM_WINDOW: return ACC.ROLE_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	1353 case COM.ROLE_SYSTEM_MENUBAR: return ACC.ROLE_MENUBAR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1354 case COM.ROLE_SYSTEM_MENUPOPUP: return ACC.ROLE_MENU;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1355 case COM.ROLE_SYSTEM_MENUITEM: return ACC.ROLE_MENUITEM;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1356 case COM.ROLE_SYSTEM_SEPARATOR: return ACC.ROLE_SEPARATOR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1357 case COM.ROLE_SYSTEM_TOOLTIP: return ACC.ROLE_TOOLTIP;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1358 case COM.ROLE_SYSTEM_SCROLLBAR: return ACC.ROLE_SCROLLBAR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1359 case COM.ROLE_SYSTEM_DIALOG: return ACC.ROLE_DIALOG;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1360 case COM.ROLE_SYSTEM_STATICTEXT: return ACC.ROLE_LABEL;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1361 case COM.ROLE_SYSTEM_PUSHBUTTON: return ACC.ROLE_PUSHBUTTON;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1362 case COM.ROLE_SYSTEM_CHECKBUTTON: return ACC.ROLE_CHECKBUTTON;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1363 case COM.ROLE_SYSTEM_RADIOBUTTON: return ACC.ROLE_RADIOBUTTON;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1364 case COM.ROLE_SYSTEM_COMBOBOX: return ACC.ROLE_COMBOBOX;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1365 case COM.ROLE_SYSTEM_TEXT: return ACC.ROLE_TEXT;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1366 case COM.ROLE_SYSTEM_TOOLBAR: return ACC.ROLE_TOOLBAR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1367 case COM.ROLE_SYSTEM_LIST: return ACC.ROLE_LIST;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1368 case COM.ROLE_SYSTEM_LISTITEM: return ACC.ROLE_LISTITEM;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1369 case COM.ROLE_SYSTEM_TABLE: return ACC.ROLE_TABLE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1370 case COM.ROLE_SYSTEM_CELL: return ACC.ROLE_TABLECELL;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1371 case COM.ROLE_SYSTEM_COLUMNHEADER: return ACC.ROLE_TABLECOLUMNHEADER;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1372 case COM.ROLE_SYSTEM_ROWHEADER: return ACC.ROLE_TABLEROWHEADER;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1373 case COM.ROLE_SYSTEM_OUTLINE: return ACC.ROLE_TREE;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1374 case COM.ROLE_SYSTEM_OUTLINEITEM: return ACC.ROLE_TREEITEM;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1375 case COM.ROLE_SYSTEM_PAGETABLIST: return ACC.ROLE_TABFOLDER;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1376 case COM.ROLE_SYSTEM_PAGETAB: return ACC.ROLE_TABITEM;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1377 case COM.ROLE_SYSTEM_PROGRESSBAR: return ACC.ROLE_PROGRESSBAR;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1378 case COM.ROLE_SYSTEM_SLIDER: return ACC.ROLE_SLIDER;
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1379 case COM.ROLE_SYSTEM_LINK: return ACC.ROLE_LINK;
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1380 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	1381 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1382 return ACC.ROLE_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	1383 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1384
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1385 /* checkWidget was copied from Widget, and rewritten to work in this 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	1386 void 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	1387 if (!isValidThread ()) DWT.error (DWT.ERROR_THREAD_INVALID_ACCESS);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1388 if (control.isDisposed ()) DWT.error (DWT.ERROR_WIDGET_DISPOSED);
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1389 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1390
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1391 /* isValidThread was copied from Widget, and rewritten to work in this package */
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1392 WINBOOL isValidThread () {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1393 return control.getDisplay ().getThread () is Thread.getThis ();
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	1394 }
92c102dd64a3 Added all widgets modules as dummy. Most modules of accessible are equal to the linux version, except Accessible. Frank Benoit <benoit@tionex.de> parents: diff changeset	1395 }
134 fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1396
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1397 class _IAccessibleImpl : IAccessible {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1398
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1399 Accessible parent;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1400 this(Accessible p) { parent = p; }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1401 extern (Windows):
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1402 // interface of IUnknown
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1403 HRESULT QueryInterface(REFIID riid, void ** ppvObject) { return parent.QueryInterface(riid, ppvObject); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1404 ULONG AddRef() { return parent.AddRef(); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1405 ULONG Release() { return parent.Release(); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1406
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1407 // interface of IDispatch
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1408 HRESULT GetTypeInfoCount(UINT * pctinfo) { return COM.E_NOTIMPL; }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1409 HRESULT GetTypeInfo(UINT iTInfo, LCID lcid, ITypeInfo * ppTInfo) { return COM.E_NOTIMPL; }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1410 HRESULT GetIDsOfNames(REFIID riid, LPOLESTR * rgszNames, UINT cNames, LCID lcid, DISPID * rgDispId) { return COM.E_NOTIMPL; }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1411 HRESULT Invoke(DISPID dispIdMember,REFIID riid,LCID lcid,WORD wFlags,DISPPARAMS* pDispParams,VARIANT* pVarResult,EXCEPINFO* pExcepInfo,UINT* puArgErr) { return COM.E_NOTIMPL; }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1412
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1413 // interface of IAccessible
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1414 HRESULT get_accParent(LPDISPATCH * ppdispParent) { return parent.get_accParent(ppdispParent); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1415 HRESULT get_accChildCount(LONG* pcountChildren) { return parent.get_accChildCount(pcountChildren); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1416 HRESULT get_accChild(VARIANT varChildID, LPDISPATCH* ppdispChild) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1417 return parent.get_accChild(varChildID, ppdispChild);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1418 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1419 HRESULT get_accName(VARIANT varID, BSTR* pszName) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1420 return parent.get_accName(varID, pszName);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1421 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1422 HRESULT get_accValue(VARIANT varID, BSTR* pszValue) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1423 return parent.get_accValue(varID, pszValue);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1424 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1425 HRESULT get_accDescription(VARIANT varID,BSTR* pszDescription) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1426 return parent.get_accDescription(varID, pszDescription);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1427 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1428 HRESULT get_accRole(VARIANT varID, VARIANT* pvarRole) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1429 return parent.get_accRole(varID, pvarRole);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1430 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1431 HRESULT get_accState(VARIANT varID, VARIANT* pvarState) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1432 return parent.get_accState(varID, pvarState);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1433 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1434 HRESULT get_accHelp(VARIANT varID, BSTR* pszHelp) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1435 return parent.get_accHelp(varID, pszHelp);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1436 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1437 HRESULT get_accHelpTopic(BSTR* pszHelpFile, VARIANT varChild, LONG* pidTopic) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1438 return parent.get_accHelpTopic(pszHelpFile, varChild, pidTopic);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1439 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1440 HRESULT get_accKeyboardShortcut(VARIANT varID, BSTR* pszKeyboardShortcut) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1441 return parent.get_accKeyboardShortcut(varID, pszKeyboardShortcut);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1442 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1443 HRESULT get_accFocus(VARIANT* pvarID) { return parent.get_accFocus(pvarID); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1444 HRESULT get_accSelection(VARIANT* pvarChildren) { return parent.get_accSelection(pvarChildren); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1445 HRESULT get_accDefaultAction(VARIANT varID,BSTR* pszDefaultAction) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1446 return parent.get_accDefaultAction(varID, pszDefaultAction);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1447 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1448 HRESULT accSelect(LONG flagsSelect, VARIANT varID) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1449 return parent.accSelect(flagsSelect, varID);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1450 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1451 HRESULT accLocation(LONG* pxLeft, LONG* pyTop, LONG* pcxWidth, LONG* pcyHeight, VARIANT varID) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1452 return parent.accLocation(pxLeft, pyTop, pcxWidth, pcyHeight, varID);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1453 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1454 HRESULT accNavigate(LONG navDir, VARIANT varStart, VARIANT* pvarEnd) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1455 return parent.accNavigate(navDir, varStart, pvarEnd);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1456 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1457 HRESULT accHitTest(LONG xLeft, LONG yTop, VARIANT* pvarID) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1458 return parent.accHitTest(xLeft, yTop, pvarID);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1459 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1460 HRESULT accDoDefaultAction(VARIANT varID) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1461 return parent.accDoDefaultAction(varID);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1462 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1463 HRESULT put_accName(VARIANT varID, BSTR* szName) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1464 return parent.put_accName(varID, szName);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1465 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1466 HRESULT put_accValue(VARIANT varID, BSTR* szValue) {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1467 return parent.put_accValue(varID, szValue);
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1468 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1469 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1470
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1471 class _IEnumVARIANTImpl : IEnumVARIANT {
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1472
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1473 Accessible parent;
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1474 this(Accessible a) { parent = a; }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1475 extern (Windows):
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1476 // interface of IUnknown
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1477 HRESULT QueryInterface(REFIID riid, void ** ppvObject) { return parent.QueryInterface(riid, ppvObject); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1478 ULONG AddRef() { return parent.AddRef(); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1479 ULONG Release() { return parent.Release(); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1480
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1481 // interface of IEnumVARIANT
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1482 HRESULT Next(ULONG celt, VARIANT rgvar, ULONG pceltFetched) { return parent.Next(celt, rgvar, pceltFetched); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1483 HRESULT Skip(ULONG celt) { return parent.Skip(celt); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1484 HRESULT Reset() { return parent.Reset(); }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1485 HRESULT Clone(LPENUMVARIANT * ppenum) { return COM.E_NOTIMPL;}
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1486 }
fa7d7d66b9ed Accessible Frank Benoit <benoit@tionex.de> parents: 77 diff changeset	1487

Mercurial > projects > dwt-win

annotate dwt/accessibility/Accessible.d @ 313:fcbee1f66cc3