projects/dwt-mac: dwt/widgets/Button.d annotate

annotate dwt/widgets/Button.d @ 156:969e7de37c3d default tip

Fixes to get dwt to work with dmd and ldc

author	Jacob Carlborg <doob@me.com>
date	Wed, 08 Jul 2009 21:56:44 +0200
parents	1a0129cab08e
children

rev	line source
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1 /*******************************************************************************
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	2 * Copyright (c) 2000, 2008 IBM Corporation and others.
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3 * All rights reserved. This program and the accompanying materials
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4 * are made available under the terms of the Eclipse Public License v1.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	5 * which accompanies this distribution, and is available at
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	6 * http://www.eclipse.org/legal/epl-v10.html
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	7 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	8 * Contributors:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	9 * IBM Corporation - initial API and implementation
27 dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	10 *
dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	11 * Port to the D programming language:
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	12 * Jacob Carlborg <doob@me.com>
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	13 *******************************************************************************/
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	14 module dwt.widgets.Button;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	15
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	16
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	17 import dwt.DWT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	18 import dwt.DWTException;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	19 import dwt.accessibility.ACC;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	20 import dwt.events.SelectionEvent;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	21 import dwt.events.SelectionListener;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	22 import dwt.graphics.Image;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	23 import dwt.graphics.Point;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	24 import dwt.internal.cocoa.NSAffineTransform;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	25 import dwt.internal.cocoa.NSAttributedString;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	26 import dwt.internal.cocoa.NSBezierPath;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	27 import dwt.internal.cocoa.NSButton;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	28 import dwt.internal.cocoa.NSButtonCell;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	29 import dwt.internal.cocoa.NSColor;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	30 import dwt.internal.cocoa.NSControl;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	31 import dwt.internal.cocoa.NSEvent;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	32 import dwt.internal.cocoa.NSFont;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	33 import dwt.internal.cocoa.NSGraphicsContext;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	34 import dwt.internal.cocoa.NSMutableDictionary;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	35 import dwt.internal.cocoa.NSMutableParagraphStyle;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	36 import dwt.internal.cocoa.NSPoint;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	37 import dwt.internal.cocoa.NSRect;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	38 import dwt.internal.cocoa.NSString;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	39 import dwt.internal.cocoa.OS;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	40 import dwt.internal.cocoa.SWTButton;
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	41 import cocoa = dwt.internal.cocoa.id;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	42
27 dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	43 import dwt.dwthelper.utils;
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	44 import Carbon = dwt.internal.c.Carbon;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	45 import dwt.internal.cocoa.NSCell;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	46 import dwt.internal.cocoa.NSText;
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	47 import dwt.internal.objc.cocoa.Cocoa;
cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	48 import objc = dwt.internal.objc.runtime;
27 dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	49 import dwt.widgets.Composite;
36 db5a898b2119 Fixed a lot of compile errors Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 35 diff changeset	50 import dwt.widgets.Control;
27 dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	51 import dwt.widgets.Decorations;
dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	52 import dwt.widgets.TypedListener;
dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	53
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	54 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	55 * Instances of this class represent a selectable user interface object that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	56 * issues notification when pressed and released.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	57 * <dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	58 * <dt><b>Styles:</b></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	59 * <dd>ARROW, CHECK, PUSH, RADIO, TOGGLE, FLAT</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	60 * <dd>UP, DOWN, LEFT, RIGHT, CENTER</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	61 * <dt><b>Events:</b></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	62 * <dd>Selection</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	63 * </dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	64 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	65 * Note: Only one of the styles ARROW, CHECK, PUSH, RADIO, and TOGGLE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	66 * may be specified.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	67 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	68 * Note: Only one of the styles LEFT, RIGHT, and CENTER may be specified.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	69 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	70 * Note: Only one of the styles UP, DOWN, LEFT, and RIGHT may be specified
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	71 * when the ARROW style is specified.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	72 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	73 * IMPORTANT: This class is intended to be subclassed <em>only</em>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	74 * within the DWT implementation.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	75 * </p>
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	76 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	77 * @see <a href="http://www.eclipse.org/swt/snippets/#button">Button snippets</a>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	78 * @see <a href="http://www.eclipse.org/swt/examples.php">DWT Example: ControlExample</a>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	79 * @see <a href="http://www.eclipse.org/swt/">Sample code and further information</a>
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	80 */
3 649b8e223d5a fix extends Frank Benoit <benoit@tionex.de> parents: 0 diff changeset	81 public class Button : Control {
123 63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 60 diff changeset	82
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 60 diff changeset	83 alias Control.setBackground setBackground;
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 60 diff changeset	84 alias Control.setForeground setForeground;
136 1a0129cab08e Fixes #5 Jacob Carlborg <doob@me.com> parents: 123 diff changeset	85 alias Control.computeSize computeSize;
123 63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 60 diff changeset	86
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	87 String text = "";
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	88 Image image;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	89 bool grayed;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	90
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	91 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	92 * Constructs a new instance of this class given its parent
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	93 * and a style value describing its behavior and appearance.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	94 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	95 * The style value is either one of the style constants defined in
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	96 * class <code>DWT</code> which is applicable to instances of this
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	97 * class, or must be built by <em>bitwise OR</em>'ing together
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	98 * (that is, using the <code>int</code> "\|" operator) two or more
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	99 * of those <code>DWT</code> style constants. The class description
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	100 * lists the style constants that are applicable to the class.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	101 * Style bits are also inherited from superclasses.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	102 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	103 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	104 * @param parent a composite control which will be the parent of the new instance (cannot be null)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	105 * @param style the style of control to construct
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	106 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	107 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	108 * <li>ERROR_NULL_ARGUMENT - if the parent is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	109 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	110 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	111 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the parent</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	112 * <li>ERROR_INVALID_SUBCLASS - if this class is not an allowed subclass</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	113 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	114 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	115 * @see DWT#ARROW
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	116 * @see DWT#CHECK
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	117 * @see DWT#PUSH
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	118 * @see DWT#RADIO
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	119 * @see DWT#TOGGLE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	120 * @see DWT#FLAT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	121 * @see DWT#LEFT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	122 * @see DWT#RIGHT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	123 * @see DWT#CENTER
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	124 * @see Widget#checkSubclass
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	125 * @see Widget#getStyle
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	126 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	127 public this (Composite parent, int style) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	128 super (parent, checkStyle (style));
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	129 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	130
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	131 objc.id accessibilityAttributeValue (objc.id id, objc.SEL sel, objc.id arg0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	132 NSString nsAttributeName = new NSString(arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	133
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	134 if (accessible !is null) {
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	135 cocoa.id returnObject = accessible.internal_accessibilityAttributeValue(nsAttributeName, ACC.CHILDID_SELF);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	136 if (returnObject !is null) return returnObject.id;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	137 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	138
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	139 if (nsAttributeName.isEqualToString (OS.NSAccessibilityRoleAttribute) \|\| nsAttributeName.isEqualToString (OS.NSAccessibilityRoleDescriptionAttribute)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	140 NSString role = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	141
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	142 if ((style & DWT.RADIO) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	143 role = OS.NSAccessibilityRadioButtonRole;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	144 } else if ((style & DWT.ARROW) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	145 role = OS.NSAccessibilityButtonRole;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	146 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	147
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	148 if (role !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	149 if (nsAttributeName.isEqualToString (OS.NSAccessibilityRoleAttribute))
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	150 return role.id;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	151 else {
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	152 objc.id roleDescription = OS.NSAccessibilityRoleDescription(role.id, null);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	153 return roleDescription;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	154 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	155 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	156 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	157
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	158 return super.accessibilityAttributeValue(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	159 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	160
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	161
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	162 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	163 * Adds the listener to the collection of listeners who will
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	164 * be notified when the control is selected by the user, by sending
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	165 * it one of the messages defined in the <code>SelectionListener</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	166 * interface.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	167 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	168 * <code>widgetSelected</code> is called when the control is selected by the user.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	169 * <code>widgetDefaultSelected</code> is not called.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	170 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	171 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	172 * @param listener the listener which should be notified
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	173 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	174 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	175 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	176 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	177 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	178 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	179 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	180 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	181 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	182 * @see SelectionListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	183 * @see #removeSelectionListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	184 * @see SelectionEvent
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	185 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	186 public void addSelectionListener(SelectionListener listener) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	187 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	188 if (listener is null) error (DWT.ERROR_NULL_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	189 TypedListener typedListener = new TypedListener(listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	190 addListener(DWT.Selection,typedListener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	191 addListener(DWT.DefaultSelection,typedListener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	192 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	193
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	194 static int checkStyle (int style) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	195 style = checkBits (style, DWT.PUSH, DWT.ARROW, DWT.CHECK, DWT.RADIO, DWT.TOGGLE, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	196 if ((style & (DWT.PUSH \| DWT.TOGGLE)) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	197 return checkBits (style, DWT.CENTER, DWT.LEFT, DWT.RIGHT, 0, 0, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	198 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	199 if ((style & (DWT.CHECK \| DWT.RADIO)) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	200 return checkBits (style, DWT.LEFT, DWT.RIGHT, DWT.CENTER, 0, 0, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	201 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	202 if ((style & DWT.ARROW) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	203 style \|= DWT.NO_FOCUS;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	204 return checkBits (style, DWT.UP, DWT.DOWN, DWT.LEFT, DWT.RIGHT, 0, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	205 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	206 return style;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	207 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	208
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	209 void click () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	210 postEvent (DWT.Selection);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	211 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	212
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	213 public Point computeSize (int wHint, int hHint, bool changed) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	214 checkWidget();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	215 if ((style & DWT.ARROW) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	216 // TODO use some OS metric instead of hardcoded values
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	217 int width = wHint !is DWT.DEFAULT ? wHint : 23;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	218 int height = hHint !is DWT.DEFAULT ? hHint : 23;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	219 return new Point (width, height);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	220 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	221 return super.computeSize(wHint, hHint, changed);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	222 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	223
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	224 NSAttributedString createString() {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	225 NSMutableDictionary dict = NSMutableDictionary.dictionaryWithCapacity(4);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	226 if (foreground !is null) {
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	227 NSColor color = NSColor.colorWithDeviceRed(cast(Carbon.CGFloat) foreground.handle[0], cast(Carbon.CGFloat) foreground.handle[1], cast(Carbon.CGFloat) foreground.handle[2], 1);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	228 dict.setObject(color, OS.NSForegroundColorAttributeName);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	229 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	230
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	231 dict.setObject(getFont().handle, OS.NSFontAttributeName);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	232
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	233 NSTextAlignment alignment;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	234 if ((style & DWT.CENTER) !is 0) {
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	235 alignment = OS.NSCenterTextAlignment;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	236 } else if ((style & DWT.LEFT) !is 0) {
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	237 alignment = OS.NSLeftTextAlignment;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	238 } else {
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	239 alignment = OS.NSRightTextAlignment;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	240 }
27 dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	241 NSMutableParagraphStyle pStyle = cast(NSMutableParagraphStyle)(new NSMutableParagraphStyle()).alloc().init();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	242 pStyle.autorelease();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	243 pStyle.setAlignment(alignment);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	244 dict.setObject(pStyle, OS.NSParagraphStyleAttributeName);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	245 char [] chars = new char [text.length ()];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	246 text.getChars (0, chars.length, chars, 0);
27 dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	247 NSUInteger length = fixMnemonic (chars);
dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	248 NSString str = NSString.stringWithCharacters(chars.toString16().ptr, length);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	249 NSAttributedString attribStr = (cast(NSAttributedString)(new NSAttributedString()).alloc()).initWithString(str, dict);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	250 attribStr.autorelease();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	251 return attribStr;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	252 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	253
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	254 void createHandle () {
27 dfcc6c4c4317 Ported dwt.widgets.Button Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	255 NSButton widget = cast(NSButton)(new SWTButton()).alloc();
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	256 widget.initWithFrame(NSRect());
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	257 NSButtonType type = OS.NSMomentaryLightButton;
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	258 if ((style & DWT.PUSH) !is 0) {
62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	259 if ((style & DWT.FLAT) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	260 widget.setBezelStyle(OS.NSShadowlessSquareBezelStyle);
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	261 // if ((style & DWT.BORDER) is 0) widget.setShowsBorderOnlyWhileMouseInside(true);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	262 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	263 widget.setBezelStyle(OS.NSRoundedBezelStyle);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	264 }
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	265 } else if ((style & DWT.CHECK) !is 0) {
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	266 type = OS.NSSwitchButton;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	267 widget.setAllowsMixedState (true);
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	268 } else if ((style & DWT.RADIO) !is 0) {
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	269 type = OS.NSRadioButton;
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	270 } else if ((style & DWT.TOGGLE) !is 0) {
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	271 type = OS.NSPushOnPushOffButton;
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	272 if ((style & DWT.FLAT) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	273 widget.setBezelStyle(OS.NSShadowlessSquareBezelStyle);
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	274 // if ((style & DWT.BORDER) is 0) widget.setShowsBorderOnlyWhileMouseInside(true);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	275 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	276 widget.setBezelStyle(OS.NSRoundedBezelStyle);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	277 }
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	278 } else if ((style & DWT.ARROW) !is 0) {
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	279 widget.setBezelStyle(OS.NSRegularSquareBezelStyle);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	280 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	281 widget.setButtonType(type);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	282 widget.setTitle(NSString.stringWith(""));
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	283 widget.setImagePosition(OS.NSImageLeft);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	284 widget.setTarget(widget);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	285 widget.setAction(OS.sel_sendSelection);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	286 view = widget;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	287 _setAlignment(style);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	288 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	289
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	290 void deregister () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	291 super.deregister ();
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	292 display.removeWidget((cast(NSControl)view).cell());
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	293 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	294
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	295 void drawWidget (objc.id id, NSRect rect) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	296 if ((style & DWT.ARROW) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	297 NSRect frame = view.frame();
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	298 int arrowSize = Math.min(cast(int)frame.height, cast(int)frame.width) / 2;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	299 NSGraphicsContext context = NSGraphicsContext.currentContext();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	300 context.saveGraphicsState();
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	301 NSPoint p1 = NSPoint();
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	302 p1.x = cast(Carbon.CGFloat)Math.floor(-arrowSize / 2);
62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	303 p1.y = cast(Carbon.CGFloat)Math.floor(-arrowSize / 2);
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	304 NSPoint p2 = NSPoint();
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	305 p2.x = cast(Carbon.CGFloat)Math.ceil(arrowSize / 2);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	306 p2.y = p1.y;
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	307 NSPoint p3 = NSPoint();
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	308 p3.y = cast(Carbon.CGFloat)Math.ceil(arrowSize / 2);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	309
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	310 NSBezierPath path = NSBezierPath.bezierPath();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	311 path.moveToPoint(p1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	312 path.lineToPoint(p2);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	313 path.lineToPoint(p3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	314 path.closePath();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	315
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	316 NSAffineTransform transform = NSAffineTransform.transform();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	317 if ((style & DWT.LEFT) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	318 transform.rotateByDegrees(90);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	319 } else if ((style & DWT.UP) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	320 transform.rotateByDegrees(180);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	321 } else if ((style & DWT.RIGHT) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	322 transform.rotateByDegrees(-90);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	323 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	324 path.transformUsingAffineTransform(transform);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	325 transform = NSAffineTransform.transform();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	326 transform.translateXBy(frame.width / 2, frame.height / 2);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	327 path.transformUsingAffineTransform(transform);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	328
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	329 NSColor color = isEnabled() ? NSColor.blackColor() : NSColor.disabledControlTextColor();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	330 color.set();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	331 path.fill();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	332 context.restoreGraphicsState();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	333 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	334 super.drawWidget (id, rect);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	335 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	336
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	337 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	338 * Returns a value which describes the position of the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	339 * text or image in the receiver. The value will be one of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	340 * <code>LEFT</code>, <code>RIGHT</code> or <code>CENTER</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	341 * unless the receiver is an <code>ARROW</code> button, in
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	342 * which case, the alignment will indicate the direction of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	343 * the arrow (one of <code>LEFT</code>, <code>RIGHT</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	344 * <code>UP</code> or <code>DOWN</code>).
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	345 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	346 * @return the alignment
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	347 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	348 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	349 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	350 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	351 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	352 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	353 public int getAlignment () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	354 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	355 if ((style & DWT.ARROW) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	356 if ((style & DWT.UP) !is 0) return DWT.UP;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	357 if ((style & DWT.DOWN) !is 0) return DWT.DOWN;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	358 if ((style & DWT.LEFT) !is 0) return DWT.LEFT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	359 if ((style & DWT.RIGHT) !is 0) return DWT.RIGHT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	360 return DWT.UP;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	361 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	362 if ((style & DWT.LEFT) !is 0) return DWT.LEFT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	363 if ((style & DWT.CENTER) !is 0) return DWT.CENTER;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	364 if ((style & DWT.RIGHT) !is 0) return DWT.RIGHT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	365 return DWT.LEFT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	366 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	367
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	368 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	369 * Returns <code>true</code> if the receiver is grayed,
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	370 * and false otherwise. When the widget does not have
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	371 * the <code>CHECK</code> style, return false.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	372 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	373 * @return the grayed state of the checkbox
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	374 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	375 * @exception DWTException <ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	376 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	377 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	378 * </ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	379 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	380 * @since 3.4
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	381 */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	382 public bool getGrayed() {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	383 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	384 if ((style &DWT.CHECK) !is 0) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	385 return grayed;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	386 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	387
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	388 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	389 * Returns the receiver's image if it has one, or null
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	390 * if it does not.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	391 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	392 * @return the receiver's image
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	393 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	394 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	395 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	396 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	397 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	398 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	399 public Image getImage () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	400 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	401 return image;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	402 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	403
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	404 String getNameText () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	405 return getText ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	406 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	407
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	408 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	409 * Returns <code>true</code> if the receiver is selected,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	410 * and false otherwise.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	411 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	412 * When the receiver is of type <code>CHECK</code> or <code>RADIO</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	413 * it is selected when it is checked. When it is of type <code>TOGGLE</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	414 * it is selected when it is pushed in. If the receiver is of any other type,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	415 * this method returns false.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	416 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	417 * @return the selection state
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	418 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	419 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	420 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	421 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	422 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	423 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	424 public bool getSelection () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	425 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	426 if ((style & (DWT.CHECK \| DWT.RADIO \| DWT.TOGGLE)) is 0) return false;
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	427 if ((style & DWT.CHECK) !is 0 && grayed) return (cast(NSButton)view).state() is OS.NSMixedState;
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	428 return (cast(NSButton)view).state() is OS.NSOnState;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	429 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	430
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	431 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	432 * Returns the receiver's text, which will be an empty
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	433 * string if it has never been set or if the receiver is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	434 * an <code>ARROW</code> button.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	435 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	436 * @return the receiver's text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	437 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	438 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	439 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	440 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	441 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	442 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	443 public String getText () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	444 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	445 return text;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	446 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	447
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	448 void register() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	449 super.register();
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	450 display.addWidget((cast(NSControl)view).cell(), this);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	451 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	452
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	453 void releaseWidget () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	454 super.releaseWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	455 image = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	456 text = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	457 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	458
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	459 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	460 * Removes the listener from the collection of listeners who will
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	461 * be notified when the control is selected by the user.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	462 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	463 * @param listener the listener which should no longer be notified
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	464 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	465 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	466 * <li>ERROR_NULL_ARGUMENT - if the listener is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	467 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	468 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	469 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	470 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	471 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	472 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	473 * @see SelectionListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	474 * @see #addSelectionListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	475 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	476 public void removeSelectionListener(SelectionListener listener) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	477 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	478 if (listener is null) error (DWT.ERROR_NULL_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	479 if (eventTable is null) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	480 eventTable.unhook(DWT.Selection, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	481 eventTable.unhook(DWT.DefaultSelection,listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	482 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	483
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	484 void selectRadio () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	485 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	486 * This code is intentionally commented. When two groups
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	487 * of radio buttons with the same parent are separated by
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	488 * another control, the correct behavior should be that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	489 * the two groups act independently. This is consistent
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	490 * with radio tool and menu items. The commented code
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	491 * implements this behavior.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	492 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	493 // int index = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	494 // Control [] children = parent._getChildren ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	495 // while (index < children.length && children [index] !is this) index++;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	496 // int i = index - 1;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	497 // while (i >= 0 && children [i].setRadioSelection (false)) --i;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	498 // int j = index + 1;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	499 // while (j < children.length && children [j].setRadioSelection (false)) j++;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	500 // setSelection (true);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	501 Control [] children = parent._getChildren ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	502 for (int i=0; i<children.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	503 Control child = children [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	504 if (this !is child) child.setRadioSelection (false);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	505 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	506 setSelection (true);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	507 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	508
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	509 void sendSelection () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	510 if ((style & DWT.RADIO) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	511 if ((parent.getStyle () & DWT.NO_RADIO_GROUP) is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	512 selectRadio ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	513 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	514 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	515 if ((style & DWT.CHECK) !is 0) {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	516 if (grayed && (cast(NSButton)view).state() is OS.NSOnState) {
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	517 (cast(NSButton)view).setState(OS.NSOffState);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	518 }
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	519 if (!grayed && (cast(NSButton)view).state() is OS.NSMixedState) {
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	520 (cast(NSButton)view).setState(OS.NSOnState);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	521 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	522 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	523 postEvent (DWT.Selection);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	524 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	525
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	526
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	527 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	528 * Controls how text, images and arrows will be displayed
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	529 * in the receiver. The argument should be one of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	530 * <code>LEFT</code>, <code>RIGHT</code> or <code>CENTER</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	531 * unless the receiver is an <code>ARROW</code> button, in
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	532 * which case, the argument indicates the direction of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	533 * the arrow (one of <code>LEFT</code>, <code>RIGHT</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	534 * <code>UP</code> or <code>DOWN</code>).
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	535 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	536 * @param alignment the new alignment
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	537 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	538 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	539 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	540 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	541 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	542 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	543 public void setAlignment (int alignment) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	544 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	545 _setAlignment (alignment);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	546 redraw ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	547 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	548
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	549 void _setAlignment (int alignment) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	550 if ((style & DWT.ARROW) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	551 if ((style & (DWT.UP \| DWT.DOWN \| DWT.LEFT \| DWT.RIGHT)) is 0) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	552 style &= ~(DWT.UP \| DWT.DOWN \| DWT.LEFT \| DWT.RIGHT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	553 style \|= alignment & (DWT.UP \| DWT.DOWN \| DWT.LEFT \| DWT.RIGHT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	554 // int orientation = OS.kThemeDisclosureRight;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	555 // if ((style & DWT.UP) !is 0) orientation = OS.kThemeDisclosureDown;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	556 // if ((style & DWT.DOWN) !is 0) orientation = OS.kThemeDisclosureDown;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	557 // if ((style & DWT.LEFT) !is 0) orientation = OS.kThemeDisclosureLeft;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	558 // OS.SetControl32BitValue (handle, orientation);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	559 return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	560 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	561 if ((alignment & (DWT.LEFT \| DWT.RIGHT \| DWT.CENTER)) is 0) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	562 style &= ~(DWT.LEFT \| DWT.RIGHT \| DWT.CENTER);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	563 style \|= alignment & (DWT.LEFT \| DWT.RIGHT \| DWT.CENTER);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	564 /* text is still null when this is called from createHandle() */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	565 if (text !is null) {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	566 (cast(NSButton)view).setAttributedTitle(createString());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	567 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	568 // /* Alignment not honoured when image and text is visible */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	569 // bool bothVisible = text !is null && text.length () > 0 && image !is null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	570 // if (bothVisible) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	571 // if ((style & (DWT.RADIO \| DWT.CHECK)) !is 0) alignment = DWT.LEFT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	572 // if ((style & (DWT.PUSH \| DWT.TOGGLE)) !is 0) alignment = DWT.CENTER;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	573 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	574 // int textAlignment = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	575 // int graphicAlignment = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	576 // if ((alignment & DWT.LEFT) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	577 // textAlignment = OS.kControlBevelButtonAlignTextFlushLeft;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	578 // graphicAlignment = OS.kControlBevelButtonAlignLeft;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	579 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	580 // if ((alignment & DWT.CENTER) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	581 // textAlignment = OS.kControlBevelButtonAlignTextCenter;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	582 // graphicAlignment = OS.kControlBevelButtonAlignCenter;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	583 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	584 // if ((alignment & DWT.RIGHT) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	585 // textAlignment = OS.kControlBevelButtonAlignTextFlushRight;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	586 // graphicAlignment = OS.kControlBevelButtonAlignRight;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	587 // }
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	588 // OS.SetControlData (handle, OS.kControlEntireControl, OS.kControlBevelButtonTextAlignTag, 2, new short [] {cast(short)textAlignment});
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	589 // OS.SetControlData (handle, OS.kControlEntireControl, OS.kControlBevelButtonGraphicAlignTag, 2, new short [] {cast(short)graphicAlignment});
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	590 // if (bothVisible) {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	591 // OS.SetControlData (handle, OS.kControlEntireControl, OS.kControlBevelButtonTextPlaceTag, 2, new short [] {cast(short)OS.kControlBevelButtonPlaceToRightOfGraphic});
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	592 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	593 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	594
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	595 void setBackground (float [] color) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	596 NSColor nsColor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	597 if (color is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	598 return; // TODO set to OS default
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	599 } else {
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 52 diff changeset	600 nsColor = NSColor.colorWithDeviceRed(cast(Carbon.CGFloat) color[0], cast(Carbon.CGFloat) color[1], cast(Carbon.CGFloat) color[2], 1);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	601 }
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	602 NSButtonCell cell = new NSButtonCell((cast(NSButton)view).cell());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	603 cell.setBackgroundColor(nsColor);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	604 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	605
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	606 void setDefault (bool value) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	607 if ((style & DWT.PUSH) is 0) return;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	608 // NSWindow window = view.window();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	609 // NSButtonCell cell = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	610 // if (value) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	611 // cell = new NSButtonCell(((NSButton)view).cell());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	612 // }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	613 // window.setDefaultButtonCell(cell);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	614 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	615
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	616 void setFont (NSFont font) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	617 if (text !is null) {
52 858e9a565d62 Updated Button to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	618 (cast(NSButton)view).setAttributedTitle(createString());
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	619 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	620 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	621
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	622 void setForeground (float [] color) {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	623 (cast(NSButton)view).setAttributedTitle(createString());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	624 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	625
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	626 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	627 * Sets the grayed state of the receiver. This state change
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	628 * only applies if the control was created with the DWT.CHECK
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	629 * style.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	630 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	631 * @param grayed the new grayed state
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	632 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	633 * @exception DWTException <ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	634 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	635 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	636 * </ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	637 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	638 * @since 3.4
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	639 */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	640 public void setGrayed(bool grayed) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	641 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	642 if ((style & DWT.CHECK) is 0) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	643 bool checked = getSelection ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	644 this.grayed = grayed;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	645 if (checked) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	646 if (grayed) {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	647 (cast(NSButton) view).setState (OS.NSMixedState);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	648 } else {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	649 (cast(NSButton) view).setState (OS.NSOnState);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	650 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	651 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	652 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	653
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	654 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	655 * Sets the receiver's image to the argument, which may be
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	656 * <code>null</code> indicating that no image should be displayed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	657 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	658 * Note that a Button can display an image and text simultaneously
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	659 * on Windows (starting with XP), GTK+ and OSX. On other platforms,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	660 * a Button that has an image and text set into it will display the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	661 * image or text that was set most recently.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	662 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	663 * @param image the image to display on the receiver (may be <code>null</code>)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	664 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	665 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	666 * <li>ERROR_INVALID_ARGUMENT - if the image has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	667 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	668 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	669 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	670 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	671 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	672 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	673 public void setImage (Image image) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	674 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	675 if (image !is null && image.isDisposed ()) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	676 error (DWT.ERROR_INVALID_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	677 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	678 if ((style & DWT.ARROW) !is 0) return;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	679 this.image = image;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	680 (cast(NSButton)view).setImage(image !is null ? image.handle : null);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	681 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	682
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	683 bool setRadioSelection (bool value){
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	684 if ((style & DWT.RADIO) is 0) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	685 if (getSelection () !is value) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	686 setSelection (value);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	687 postEvent (DWT.Selection);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	688 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	689 return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	690 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	691
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	692 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	693 * Sets the selection state of the receiver, if it is of type <code>CHECK</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	694 * <code>RADIO</code>, or <code>TOGGLE</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	695 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	696 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	697 * When the receiver is of type <code>CHECK</code> or <code>RADIO</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	698 * it is selected when it is checked. When it is of type <code>TOGGLE</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	699 * it is selected when it is pushed in.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	700 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	701 * @param selected the new selection state
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	702 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	703 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	704 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	705 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	706 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	707 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	708 public void setSelection (bool selected) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	709 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	710 if ((style & (DWT.CHECK \| DWT.RADIO \| DWT.TOGGLE)) is 0) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	711 if (grayed) {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	712 (cast(NSButton)view).setState (selected ? OS.NSMixedState : OS.NSOffState);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	713 } else {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	714 (cast(NSButton)view).setState (selected ? OS.NSOnState : OS.NSOffState);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	715 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	716 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	717
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	718 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	719 * Sets the receiver's text.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	720 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	721 * This method sets the button label. The label may include
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	722 * the mnemonic character but must not contain line delimiters.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	723 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	724 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	725 * Mnemonics are indicated by an '&' that causes the next
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	726 * character to be the mnemonic. When the user presses a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	727 * key sequence that matches the mnemonic, a selection
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	728 * event occurs. On most platforms, the mnemonic appears
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	729 * underlined but may be emphasized in a platform specific
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	730 * manner. The mnemonic indicator character '&' can be
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	731 * escaped by doubling it in the string, causing a single
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	732 * '&' to be displayed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	733 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	734 * Note that a Button can display an image and text simultaneously
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	735 * on Windows (starting with XP), GTK+ and OSX. On other platforms,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	736 * a Button that has an image and text set into it will display the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	737 * image or text that was set most recently.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	738 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	739 * @param string the new text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	740 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	741 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	742 * <li>ERROR_NULL_ARGUMENT - if the text is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	743 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	744 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	745 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	746 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	747 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	748 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	749 public void setText (String string) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	750 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	751 if (string is null) error (DWT.ERROR_NULL_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	752 if ((style & DWT.ARROW) !is 0) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	753 text = string;
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	754 (cast(NSButton)view).setAttributedTitle(createString());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	755 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	756
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	757 int traversalCode (int key, NSEvent theEvent) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	758 int code = super.traversalCode (key, theEvent);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	759 if ((style & DWT.ARROW) !is 0) code &= ~(DWT.TRAVERSE_TAB_NEXT \| DWT.TRAVERSE_TAB_PREVIOUS);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	760 if ((style & DWT.RADIO) !is 0) code \|= DWT.TRAVERSE_ARROW_NEXT \| DWT.TRAVERSE_ARROW_PREVIOUS;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	761 return code;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	762 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	763
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	764 }

Mercurial > projects > dwt-mac

annotate dwt/widgets/Button.d @ 156:969e7de37c3d default tip