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

annotate dwt/widgets/Text.d @ 139:86fc761a24ae

Fixes #11

author	Jacob Carlborg <doob@me.com>
date	Thu, 04 Jun 2009 23:23:10 +0200
parents	3d9eb62cd2e3
children	834420cb1486

rev	line source
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1 /*******************************************************************************
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 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
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	10 *
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	11 * Port to the D programming language:
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 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.Text;
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 import dwt.dwthelper.utils;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	17
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	18 import dwt.DWT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	19 import dwt.DWTException;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	20 import dwt.events.ModifyListener;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	21 import dwt.events.SelectionEvent;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	22 import dwt.events.SelectionListener;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	23 import dwt.events.VerifyListener;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	24 import dwt.graphics.Color;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	25 import dwt.graphics.Point;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	26 import dwt.graphics.Rectangle;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	27 import dwt.internal.cocoa.NSAttributedString;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	28 import dwt.internal.cocoa.NSCell;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	29 import dwt.internal.cocoa.NSColor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	30 import dwt.internal.cocoa.NSControl;
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: 7 diff changeset	32 import dwt.internal.cocoa.NSFont;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	33 import dwt.internal.cocoa.NSMutableString;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	34 import dwt.internal.cocoa.NSNotification;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	35 import dwt.internal.cocoa.NSRange;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	36 import dwt.internal.cocoa.NSRect;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	37 import dwt.internal.cocoa.NSScrollView;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	38 import dwt.internal.cocoa.NSSize;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	39 import dwt.internal.cocoa.NSString;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	40 import dwt.internal.cocoa.NSText;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	41 import dwt.internal.cocoa.NSTextContainer;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	42 import dwt.internal.cocoa.NSTextField;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	43 import dwt.internal.cocoa.NSTextFieldCell;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	44 import dwt.internal.cocoa.NSTextStorage;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	45 import dwt.internal.cocoa.NSTextView;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	46 import dwt.internal.cocoa.OS;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	47 import dwt.internal.cocoa.SWTScrollView;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	48 import dwt.internal.cocoa.SWTSearchField;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	49 import dwt.internal.cocoa.SWTSecureTextField;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	50 import dwt.internal.cocoa.SWTTextField;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	51 import dwt.internal.cocoa.SWTTextView;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	52
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	53 import Carbon = dwt.internal.c.Carbon;
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	54 import dwt.internal.objc.cocoa.Cocoa;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	55 import objc = dwt.internal.objc.runtime;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	56 import dwt.widgets.Composite;
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	57 import dwt.widgets.Event;
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	58 import dwt.widgets.Scrollable;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	59 import dwt.widgets.TypedListener;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	60
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	61 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	62 * Instances of this class are selectable user interface
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	63 * objects that allow the user to enter and modify text.
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	64 * Text controls can be either single or multi-line.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	65 * When a text control is created with a border, the
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	66 * operating system includes a platform specific inset
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	67 * around the contents of the control. When created
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	68 * without a border, an effort is made to remove the
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	69 * inset such that the preferred size of the control
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	70 * is the same size as the contents.
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	71 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	72 * <dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	73 * <dt><b>Styles:</b></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	74 * <dd>CANCEL, CENTER, LEFT, MULTI, PASSWORD, SEARCH, SINGLE, RIGHT, READ_ONLY, WRAP</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	75 * <dt><b>Events:</b></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	76 * <dd>DefaultSelection, Modify, Verify</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	77 * </dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	78 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	79 * Note: Only one of the styles MULTI and SINGLE may be specified,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	80 * and only one of the styles LEFT, CENTER, and RIGHT may be specified.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	81 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	82 * IMPORTANT: This class is <em>not</em> intended to be subclassed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	83 * </p>
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	84 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	85 * @see <a href="http://www.eclipse.org/swt/snippets/#text">Text snippets</a>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	86 * @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: 7 diff changeset	87 * @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	88 */
3 649b8e223d5a fix extends Frank Benoit <benoit@tionex.de> parents: 0 diff changeset	89 public class Text : Scrollable {
123 63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	90
126 38807a925e24 Fixed compile errors, support for SWT language files Jacob Carlborg <doob@me.com> parents: 123 diff changeset	91 alias Scrollable.computeSize computeSize;
38807a925e24 Fixed compile errors, support for SWT language files Jacob Carlborg <doob@me.com> parents: 123 diff changeset	92 alias Scrollable.dragDetect dragDetect;
123 63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	93 alias Scrollable.setBackground setBackground;
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	94 alias Scrollable.setFont setFont;
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	95 alias Scrollable.setForeground setForeground;
126 38807a925e24 Fixed compile errors, support for SWT language files Jacob Carlborg <doob@me.com> parents: 123 diff changeset	96 alias Scrollable.translateTraversal translateTraversal;
38807a925e24 Fixed compile errors, support for SWT language files Jacob Carlborg <doob@me.com> parents: 123 diff changeset	97
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	98 int textLimit, tabs = 8;
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	99 wchar echoCharacter;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	100 bool doubleClick, receivingFocus;
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	101 wchar[] hiddenText, message;
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	102 NSRange* selectionRange;
c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	103 NSRange selectionRangeStruct;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	104
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	105 /**
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	106 * The maximum number of characters that can be entered
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	107 * into a text widget.
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	108 * <p>
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	109 * Note that this value is platform dependent, based upon
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	110 * the native widget implementation.
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	111 * </p>
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	112 */
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	113 public static const int LIMIT;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	114
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	115 /**
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	116 * The delimiter used by multi-line text widgets. When text
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	117 * is queried and from the widget, it will be delimited using
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	118 * this delimiter.
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	119 */
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	120 public static const wchar[] DELIMITER;
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	121 static const wchar PASSWORD = '\u2022';
123 63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	122
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	123 /*
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	124 * These values can be different on different platforms.
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	125 * Therefore they are not initialized in the declaration
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	126 * to stop the compiler from inlining.
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	127 */
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	128 static this () {
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	129 LIMIT = 0x7FFFFFFF;
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	130 DELIMITER = "\r";
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	131 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	132
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	133 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	134 * 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	135 * 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	136 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	137 * 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	138 * 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	139 * 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	140 * (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	141 * 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	142 * 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	143 * 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	144 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	145 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	146 * @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	147 * @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	148 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	149 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	150 * <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	151 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	152 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	153 * <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	154 * <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	155 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	156 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	157 * @see DWT#SINGLE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	158 * @see DWT#MULTI
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	159 * @see DWT#READ_ONLY
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	160 * @see DWT#WRAP
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	161 * @see Widget#checkSubclass
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	162 * @see Widget#getStyle
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	163 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	164 public this (Composite parent, int style) {
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	165 textLimit = LIMIT;
c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	166
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	167 super (parent, checkStyle (style));
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	168 if ((style & DWT.SEARCH) !is 0) {
123 63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	169 // int inAttributesToSet = (style & DWT.CANCEL) !is 0 ? OS.kHISearchFieldAttributesCancel : 0;
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	170 // OS.HISearchFieldChangeAttributes (handle, inAttributesToSet, 0);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	171 /*
123 63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	172 * Ensure that DWT.CANCEL is set.
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	173 * NOTE: CANCEL has the same value as H_SCROLL so it is
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	174 * necessary to first clear these bits to avoid a scroll
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	175 * bar and then reset the bit using the original style
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	176 * supplied by the programmer.
63a09873578e Fixed compile errors Jacob Carlborg <doob@me.com> parents: 90 diff changeset	177 */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	178 if ((style & DWT.CANCEL) !is 0) this.style \|= DWT.CANCEL;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	179 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	180 }
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 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	183 * 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	184 * be notified when the receiver's text is modified, by sending
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	185 * it one of the messages defined in the <code>ModifyListener</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	186 * interface.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	187 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	188 * @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	189 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	190 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	191 * <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	192 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	193 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	194 * <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	195 * <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	196 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	197 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	198 * @see ModifyListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	199 * @see #removeModifyListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	200 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	201 public void addModifyListener (ModifyListener listener) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	202 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	203 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	204 TypedListener typedListener = new TypedListener (listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	205 addListener (DWT.Modify, typedListener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	206 }
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 * 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	210 * 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	211 * 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	212 * interface.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	213 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	214 * <code>widgetSelected</code> is not called for texts.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	215 * <code>widgetDefaultSelected</code> is typically called when ENTER is pressed in a single-line text,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	216 * or when ENTER is pressed in a search text. If the receiver has the <code>DWT.SEARCH \| DWT.CANCEL</code> style
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	217 * and the user cancels the search, the event object detail field contains the value <code>DWT.CANCEL</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	218 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	219 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	220 * @param listener the listener which should 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	221 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	222 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	223 * <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	224 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	225 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	226 * <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	227 * <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	228 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	229 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	230 * @see SelectionListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	231 * @see #removeSelectionListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	232 * @see SelectionEvent
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	233 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	234 public void addSelectionListener(SelectionListener listener) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	235 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	236 if (listener is null) error (DWT.ERROR_NULL_ARGUMENT);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	237 TypedListener typedListener = new TypedListener (listener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	238 addListener (DWT.Selection,typedListener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	239 addListener (DWT.DefaultSelection,typedListener);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	240 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	241
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	242 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	243 * 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	244 * be notified when the receiver's text is verified, by sending
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	245 * it one of the messages defined in the <code>VerifyListener</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	246 * interface.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	247 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	248 * @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	249 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	250 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	251 * <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	252 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	253 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	254 * <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	255 * <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	256 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	257 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	258 * @see VerifyListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	259 * @see #removeVerifyListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	260 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	261 public void addVerifyListener (VerifyListener listener) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	262 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	263 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	264 TypedListener typedListener = new TypedListener (listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	265 addListener (DWT.Verify, typedListener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	266 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	267
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	268 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	269 * Appends a string.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	270 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	271 * The new text is appended to the text at
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	272 * the end of the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	273 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	274 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	275 * @param string the string to be appended
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	276 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	277 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	278 * <li>ERROR_NULL_ARGUMENT - if the string is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	279 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	280 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	281 * <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	282 * <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	283 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	284 */
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	285 public void append (String stri) {
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	286 wchar[] string = stri.toString16();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	287 checkWidget ();
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	288 //if (string is null) error (DWT.ERROR_NULL_ARGUMENT);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	289 if (hooks (DWT.Verify) \|\| filters (DWT.Verify)) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	290 int charCount = getCharCount ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	291 string = verifyText (string, charCount, charCount, null);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	292 if (string is null) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	293 }
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	294 NSString str = NSString.stringWith16 (string);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	295 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	296 setSelection (getCharCount ());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	297 insertEditText (string);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	298 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	299 NSTextView widget = cast(NSTextView) view;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	300 NSMutableString mutableString = widget.textStorage ().mutableString ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	301 mutableString.appendString (str);
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	302 NSRange range = NSRange ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	303 range.location = mutableString.length ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	304 widget.scrollRangeToVisible (range);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	305 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	306 if (string.length () !is 0) sendEvent (DWT.Modify);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	307 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	308
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	309 bool becomeFirstResponder (objc.id id, objc.SEL sel) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	310 receivingFocus = true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	311 bool result = super.becomeFirstResponder (id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	312 receivingFocus = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	313 return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	314 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	315
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	316 static int checkStyle (int style) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	317 if ((style & DWT.SEARCH) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	318 style \|= DWT.SINGLE \| DWT.BORDER;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	319 style &= ~DWT.PASSWORD;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	320 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	321 if ((style & DWT.SINGLE) !is 0 && (style & DWT.MULTI) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	322 style &= ~DWT.MULTI;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	323 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	324 style = checkBits (style, DWT.LEFT, DWT.CENTER, DWT.RIGHT, 0, 0, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	325 if ((style & DWT.SINGLE) !is 0) style &= ~(DWT.H_SCROLL \| DWT.V_SCROLL \| DWT.WRAP);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	326 if ((style & DWT.WRAP) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	327 style \|= DWT.MULTI;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	328 style &= ~DWT.H_SCROLL;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	329 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	330 if ((style & DWT.MULTI) !is 0) style &= ~DWT.PASSWORD;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	331 if ((style & (DWT.SINGLE \| DWT.MULTI)) !is 0) return style;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	332 if ((style & (DWT.H_SCROLL \| DWT.V_SCROLL)) !is 0) return style \| DWT.MULTI;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	333 return style \| DWT.SINGLE;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	334 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	335
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	336 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	337 * Clears the selection.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	338 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	339 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	340 * <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	341 * <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	342 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	343 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	344 public void clearSelection () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	345 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	346 Point selection = getSelection ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	347 setSelection (selection.x);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	348 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	349
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	350 public Point computeSize (int wHint, int hHint, bool changed) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	351 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	352 int width = 0, height = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	353 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	354 NSTextField widget = cast(NSTextField) view;
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	355 NSRect rect = NSRect ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	356 rect.width = rect.height = Float.MAX_VALUE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	357 NSSize size = widget.cell ().cellSizeForBounds (rect);
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	358 width = cast(int)Math.ceil (size.width);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	359 height = cast(int)Math.ceil (size.height);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	360 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	361 NSTextView widget = cast(NSTextView) view;
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	362 NSSize oldSize;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	363 NSTextContainer textContainer = widget.textContainer ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	364 if ((style & DWT.WRAP) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	365 widget.setHorizontallyResizable (true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	366 textContainer.setWidthTracksTextView (false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	367 oldSize = textContainer.containerSize ();
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	368 NSSize csize = NSSize ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	369 csize.width = wHint !is DWT.DEFAULT ? wHint : Float.MAX_VALUE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	370 csize.height = hHint !is DWT.DEFAULT ? hHint : Float.MAX_VALUE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	371 textContainer.setContainerSize (csize);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	372 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	373 NSRect oldRect = widget.frame ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	374 widget.sizeToFit ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	375 NSRect newRect = widget.frame ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	376 widget.setFrame (oldRect);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	377 if ((style & DWT.WRAP) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	378 widget.setHorizontallyResizable (false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	379 textContainer.setWidthTracksTextView (true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	380 textContainer.setContainerSize (oldSize);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	381 }
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	382 width = cast(int)(newRect.width + 1);
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	383 height = cast(int)(newRect.height + 1);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	384 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	385 if (width <= 0) width = DEFAULT_WIDTH;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	386 if (height <= 0) height = DEFAULT_HEIGHT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	387 if (wHint !is DWT.DEFAULT) width = wHint;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	388 if (hHint !is DWT.DEFAULT) height = hHint;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	389 Rectangle trim = computeTrim (0, 0, width, height);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	390 width = trim.width;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	391 height = trim.height;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	392 return new Point (width, height);
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	395 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	396 * Copies the selected text.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	397 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	398 * The current selection is copied to the clipboard.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	399 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	400 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	401 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	402 * <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	403 * <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	404 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	405 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	406 public void copy () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	407 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	408 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	409 Point selection = getSelection ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	410 if (selection.x is selection.y) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	411 copyToClipboard (getEditText (selection.x, selection.y - 1));
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	412 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	413 NSText text = cast(NSText) view;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	414 if (text.selectedRange ().length is 0) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	415 text.copy (null);
0 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 }
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 void createHandle () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	420 if ((style & DWT.SINGLE) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	421 NSTextField widget;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	422 if ((style & DWT.PASSWORD) !is 0) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	423 widget = cast(NSTextField) (new SWTSecureTextField ()).alloc ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	424 } else if ((style & DWT.SEARCH) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	425 widget = cast(NSTextField) (new SWTSearchField ()).alloc ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	426 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	427 widget = cast(NSTextField) (new SWTTextField ()).alloc ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	428 }
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	429 widget.initWithFrame (NSRect ());
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	430 widget.setSelectable (true);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	431 widget.setEditable((style & DWT.READ_ONLY) is 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	432 if ((style & DWT.BORDER) is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	433 widget.setFocusRingType (OS.NSFocusRingTypeNone);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	434 widget.setBordered (false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	435 }
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	436 NSTextAlignment align_ = OS.NSLeftTextAlignment;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	437 if ((style & DWT.CENTER) !is 0) align_ = OS.NSCenterTextAlignment;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	438 if ((style & DWT.RIGHT) !is 0) align_ = OS.NSRightTextAlignment;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	439 widget.setAlignment (align_);
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	440 // widget.setTarget(widget);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	441 // widget.setAction(OS.sel_sendSelection);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	442 view = widget;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	443 } else {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	444 NSScrollView scrollWidget = cast(NSScrollView) (new SWTScrollView ()).alloc ();
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	445 scrollWidget.initWithFrame (NSRect ());
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	446 scrollWidget.setHasVerticalScroller ((style & DWT.VERTICAL) !is 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	447 scrollWidget.setHasHorizontalScroller ((style & DWT.HORIZONTAL) !is 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	448 scrollWidget.setAutoresizesSubviews (true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	449 if ((style & DWT.BORDER) !is 0) scrollWidget.setBorderType (OS.NSBezelBorder);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	450
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	451 NSTextView widget = cast(NSTextView) (new SWTTextView ()).alloc ();
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	452 widget.initWithFrame (NSRect ());
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	453 widget.setEditable ((style & DWT.READ_ONLY) is 0);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	454
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	455 NSSize size = NSSize ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	456 size.width = size.height = Float.MAX_VALUE;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	457 widget.setMaxSize (size);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	458 widget.setAutoresizingMask (OS.NSViewWidthSizable \| OS.NSViewHeightSizable);
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	459
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	460 if ((style & DWT.WRAP) is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	461 NSTextContainer textContainer = widget.textContainer ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	462 widget.setHorizontallyResizable (true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	463 textContainer.setWidthTracksTextView (false);
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	464 NSSize csize = NSSize ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	465 csize.width = csize.height = Float.MAX_VALUE;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	466 textContainer.setContainerSize (csize);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	467 }
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	468
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	469 NSTextAlignment align_ = OS.NSLeftTextAlignment;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	470 if ((style & DWT.CENTER) !is 0) align_ = OS.NSCenterTextAlignment;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	471 if ((style & DWT.RIGHT) !is 0) align_ = OS.NSRightTextAlignment;
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	472 widget.setAlignment (align_);
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	473
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	474 // widget.setTarget(widget);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	475 // widget.setAction(OS.sel_sendSelection);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	476 widget.setRichText (false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	477 widget.setDelegate(widget);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	478
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	479 view = widget;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	480 scrollView = scrollWidget;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	481 }
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 createWidget () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	485 super.createWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	486 doubleClick = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	487 message = "";
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	488 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	489
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	490 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	491 * Cuts the selected text.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	492 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	493 * The current selection is first copied to the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	494 * clipboard and then deleted from the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	495 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	496 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	497 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	498 * <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	499 * <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	500 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	501 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	502 public void cut () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	503 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	504 if ((style & DWT.READ_ONLY) !is 0) return;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	505 bool cut = true;
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	506 wchar [] oldText = null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	507 Point oldSelection = getSelection ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	508 if (hooks (DWT.Verify) \|\| filters (DWT.Verify)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	509 if (oldSelection.x !is oldSelection.y) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	510 oldText = getEditText (oldSelection.x, oldSelection.y - 1);
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	511 wchar[] newText = verifyText ("", oldSelection.x, oldSelection.y, null);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	512 if (newText is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	513 if (newText.length () !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	514 copyToClipboard (oldText);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	515 if ((style & DWT.SINGLE) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	516 insertEditText (newText);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	517 } else {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	518 NSTextView widget = cast(NSTextView) view;
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	519 widget.replaceCharactersInRange (widget.selectedRange (), NSString.stringWith16 (newText));
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	520 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	521 cut = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	522 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	523 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	524 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	525 if (cut) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	526 if ((style & DWT.SINGLE) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	527 if (oldText is null) oldText = getEditText (oldSelection.x, oldSelection.y - 1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	528 copyToClipboard (oldText);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	529 insertEditText ("");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	530 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	531 (cast(NSTextView) view).cut (null);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	532 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	533 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	534 Point newSelection = getSelection ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	535 if (!cut \|\| !oldSelection.equals (newSelection)) sendEvent (DWT.Modify);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	536 }
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 Color defaultBackground () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	539 return display.getSystemColor (DWT.COLOR_LIST_BACKGROUND);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	540 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	541
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	542 Color defaultForeground () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	543 return display.getSystemColor (DWT.COLOR_LIST_FOREGROUND);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	544 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	545
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	546 void deregister() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	547 super.deregister();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	548
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	549 if ((style & DWT.SINGLE) !is 0) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	550 display.removeWidget((cast(NSControl)view).cell());
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	551 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	552 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	553
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	554 bool dragDetect (int x, int y, bool filter, bool [] consume) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	555 if (filter) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	556 Point selection = getSelection ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	557 if (selection.x !is selection.y) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	558 int position = getPosition (x, y);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	559 if (selection.x <= position && position < selection.y) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	560 if (super.dragDetect (x, y, filter, consume)) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	561 if (consume !is null) consume [0] = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	562 return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	563 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	564 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	565 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	566 return false;
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 return super.dragDetect (x, y, filter, consume);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	569 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	570
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	571 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	572 * Returns the line number of the caret.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	573 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	574 * The line number of the caret is returned.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	575 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	576 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	577 * @return the line number
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	578 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	579 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	580 * <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	581 * <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	582 * </ul>
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 public int getCaretLineNumber () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	585 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	586 if ((style & DWT.SINGLE) !is 0) return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	587 return (getTopPixel () + getCaretLocation ().y) / getLineHeight ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	588 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	589
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	590 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	591 * Returns a point describing the receiver's location relative
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	592 * to its parent (or its display if its parent is null).
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	593 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	594 * The location of the caret is returned.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	595 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	596 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	597 * @return a point, the location of the caret
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	598 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	599 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	600 * <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	601 * <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	602 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	603 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	604 public Point getCaretLocation () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	605 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	606 if ((style & DWT.SINGLE) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	607 //TODO - caret location for unicode text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	608 return new Point (0, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	609 }
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	610 // NSText
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	611 // NSRange range = (cast(NSTextView)view).selectedRange();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	612 return null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	613 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	614
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	615 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	616 * Returns the character position of the caret.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	617 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	618 * Indexing is zero based.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	619 * </p>
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 * @return the position of the caret
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	622 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	623 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	624 * <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	625 * <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	626 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	627 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	628 public int getCaretPosition () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	629 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	630 if ((style & DWT.SINGLE) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	631 //TODO
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	632 return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	633 } else {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	634 NSRange range = (cast(NSTextView)view).selectedRange();
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	635 return cast(int)/64/range.location;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	636 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	637 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	638
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	639 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	640 * Returns the number of characters.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	641 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	642 * @return number of characters in the widget
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	643 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	644 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	645 * <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	646 * <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	647 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	648 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	649 public int getCharCount () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	650 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	651 if ((style & DWT.SINGLE) !is 0) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	652 return cast(int)/64/(new NSCell ((cast(NSControl) view).cell ())).title ().length ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	653 } else {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	654 return cast(int)/64/(cast(NSTextView) view).textStorage ().length ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	655 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	656 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	657
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	658 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	659 * Returns the double click enabled flag.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	660 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	661 * The double click flag enables or disables the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	662 * default action of the text widget when the user
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	663 * double clicks.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	664 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	665 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	666 * @return whether or not double click is enabled
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	667 *
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 bool getDoubleClickEnabled () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	674 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	675 return doubleClick;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	676 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	677
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	678 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	679 * Returns the echo character.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	680 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	681 * The echo character is the character that is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	682 * displayed when the user enters text or the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	683 * text is changed by the programmer.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	684 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	685 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	686 * @return the echo character
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	687 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	688 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	689 * <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	690 * <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	691 * </ul>
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 * @see #setEchoChar
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	694 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	695 public char getEchoChar () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	696 checkWidget ();
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	697 return toChar(echoCharacter);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	698 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	699
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 * Returns the editable 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 * @return whether or not the receiver is editable
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	704 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	705 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	706 * <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	707 * <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	708 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	709 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	710 public bool getEditable () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	711 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	712 return (style & DWT.READ_ONLY) is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	713 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	714
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	715 wchar [] getEditText () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	716 NSString str = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	717 if ((style & DWT.SINGLE) !is 0) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	718 str = (new NSTextFieldCell ((cast(NSTextField) view).cell ())).title ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	719 } else {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	720 str = (cast(NSTextView)view).textStorage().string();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	721 }
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	722
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	723 NSUInteger length_ = str.length ();
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	724 wchar [] buffer = new wchar [length_];
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	725 if (hiddenText !is null) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	726 hiddenText.getChars (0, length_, buffer, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	727 } else {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	728 NSRange range = NSRange ();
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	729 range.length = length_;
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	730 str.getCharacters (buffer.ptr, range);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	731 }
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	732 return buffer;//.fromString16();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	733 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	734
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	735 wchar [] getEditText (int start, int end) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	736 NSString str = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	737 if ((style & DWT.SINGLE) !is 0) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	738 str = (new NSTextFieldCell ((cast(NSTextField) view).cell ())).title ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	739 } else {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	740 str = (cast(NSTextView)view).textStorage().string();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	741 }
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	742
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	743 int length = cast(int)/64/str.length ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	744 end = Math.min (end, length - 1);
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	745 if (start > end) return new wchar [0];
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	746 start = Math.max (0, start);
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	747 NSRange range = NSRange ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	748 range.location = start;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	749 range.length = Math.max (0, end - start + 1);
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	750 wchar [] buffer = new wchar [range.length];
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	751 if (hiddenText !is null) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	752 hiddenText.getChars (cast(int)/64/range.location, cast(int)/64/(range.location + range.length), buffer, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	753 } else {
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	754 str.getCharacters (buffer.ptr, range);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	755 }
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	756 return buffer;//.fromString16();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	757 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	758
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	759 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	760 * Returns the number of lines.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	761 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	762 * @return the number of lines in the widget
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 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	765 * <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	766 * <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	767 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	768 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	769 public int getLineCount () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	770 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	771 if ((style & DWT.SINGLE) !is 0) return 1;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	772 return cast(int)/64/(cast(NSTextView) view).textStorage ().paragraphs ().count ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	773 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	774
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	775 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	776 * Returns the line delimiter.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	777 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	778 * @return a string that is the line delimiter
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	779 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	780 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	781 * <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	782 * <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	783 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	784 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	785 * @see #DELIMITER
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	786 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	787 public String getLineDelimiter () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	788 checkWidget ();
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	789 return DELIMITER.fromString16();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	790 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	791
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	792 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	793 * Returns the height of a line.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	794 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	795 * @return the height of a row of text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	796 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	797 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	798 * <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	799 * <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	800 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	801 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	802 public int getLineHeight () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	803 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	804 //TODO
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	805 return 16;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	806 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	807
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	808 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	809 * Returns the orientation of the receiver, which will be one of the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	810 * constants <code>DWT.LEFT_TO_RIGHT</code> or <code>DWT.RIGHT_TO_LEFT</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	811 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	812 * @return the orientation style
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	813 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	814 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	815 * <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	816 * <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	817 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	818 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	819 * @since 2.1.2
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	820 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	821 public int getOrientation () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	822 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	823 return style & (DWT.LEFT_TO_RIGHT \| DWT.RIGHT_TO_LEFT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	824 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	825
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	826 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	827 * Returns the widget message. When the widget is created
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	828 * with the style <code>DWT.SEARCH</code>, the message text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	829 * is displayed as a hint for the user, indicating the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	830 * purpose of the field.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	831 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	832 * Note: This operation is a <em>HINT</em> and is not
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	833 * supported on platforms that do not have this concept.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	834 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	835 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	836 * @return the widget message
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	837 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	838 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	839 * <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	840 * <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	841 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	842 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	843 * @since 3.3
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	844 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	845 public String getMessage () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	846 checkWidget ();
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	847 return message.fromString16();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	848 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	849
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	850 int getPosition (int x, int y) {
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	851 // checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	852 //TODO
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	853 return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	854 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	855
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	856 /public/ int getPosition (Point point) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	857 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	858 if (point 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	859 return getPosition (point.x, point.y);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	860 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	861
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	862 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	863 * Returns a <code>Point</code> whose x coordinate is the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	864 * character position representing the start of the selected
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	865 * text, and whose y coordinate is the character position
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	866 * representing the end of the selection. An "empty" selection
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	867 * is indicated by the x and y coordinates having the same value.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	868 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	869 * Indexing is zero based. The range of a selection is from
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	870 * 0..N where N is the number of characters in the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	871 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	872 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	873 * @return a point representing the selection start and end
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	874 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	875 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	876 * <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	877 * <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	878 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	879 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	880 public Point getSelection () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	881 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	882 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	883 if (selectionRange is null) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	884 NSString str = (new NSTextFieldCell ((cast(NSTextField) view).cell ())).title ();
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	885 return new Point(cast(int)/64/str.length (), cast(int)/64/str.length ());
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	886 }
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	887 return new Point (cast(int)/64/selectionRange.location, cast(int)/64/(selectionRange.location + selectionRange.length));
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	888 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	889 NSTextView widget = cast(NSTextView) view;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	890 NSRange range = widget.selectedRange ();
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	891 return new Point (cast(int)/64/range.location, cast(int)/64/(range.location + range.length));
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	892 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	893 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	894
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	895 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	896 * Returns the number of selected characters.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	897 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	898 * @return the number of selected characters.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	899 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	900 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	901 * <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	902 * <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	903 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	904 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	905 public int getSelectionCount () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	906 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	907 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	908 return selectionRange !is null ? cast(int)/64/selectionRange.length : 0;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	909 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	910 NSTextView widget = cast(NSTextView) view;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	911 NSRange range = widget.selectedRange ();
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	912 return cast(int)/64/range.length;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	913 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	914 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	915
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	916 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	917 * Gets the selected text, or an empty string if there is no current selection.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	918 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	919 * @return the selected text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	920 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	921 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	922 * <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	923 * <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	924 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	925 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	926 public String getSelectionText () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	927 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	928 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	929 Point selection = getSelection ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	930 if (selection.x is selection.y) return "";
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	931 return new_String (getEditText (selection.x, selection.y - 1).fromString16());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	932 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	933 NSTextView widget = cast(NSTextView) view;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	934 NSRange range = widget.selectedRange ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	935 NSString str = widget.textStorage ().string ();
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	936 wchar[] buffer = new wchar [range.length];
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	937 str.getCharacters (buffer.ptr, range);
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	938 return buffer.fromString16();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	939 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	940 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	941
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	942 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	943 * Returns the number of tabs.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	944 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	945 * Tab stop spacing is specified in terms of the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	946 * space (' ') character. The width of a single
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	947 * tab stop is the pixel width of the spaces.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	948 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	949 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	950 * @return the number of tab characters
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	951 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	952 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	953 * <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	954 * <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	955 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	956 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	957 public int getTabs () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	958 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	959 return tabs;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	960 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	961
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	962 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	963 * Returns the widget text.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	964 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	965 * The text for a text widget is the characters in the widget, or
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	966 * an empty string if this has never been set.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	967 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	968 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	969 * @return the widget text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	970 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	971 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	972 * <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	973 * <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	974 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	975 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	976 public String getText () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	977 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	978 NSString str;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	979 if ((style & DWT.SINGLE) !is 0) {
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	980 return new_String (getEditText ().fromString16());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	981 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	982 str = (cast(NSTextView)view).textStorage ().string ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	983 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	984 return str.getString();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	985 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	986
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	987 private wchar[] getText16 () {
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	988 checkWidget ();
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	989 NSString str;
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	990 if ((style & DWT.SINGLE) !is 0) {
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	991 return getEditText ().dup;
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	992 } else {
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	993 str = (cast(NSTextView)view).textStorage ().string ();
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	994 }
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	995 return str.getString16();
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	996 }
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	997
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	998 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	999 * Returns a range of text. Returns an empty string if the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1000 * start of the range is greater than the end.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1001 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1002 * Indexing is zero based. The range of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1003 * a selection is from 0..N-1 where N is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1004 * the number of characters in the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1005 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1006 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1007 * @param start the start of the range
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1008 * @param end the end of the range
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1009 * @return the range of text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1010 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1011 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1012 * <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	1013 * <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	1014 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1015 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1016 public String getText (int start, int end) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1017 checkWidget ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1018 if (!(start <= end && 0 <= end)) return ""; //$NON-NLS-1$
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1019 if ((style & DWT.SINGLE) !is 0) {
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1020 return new_String (getEditText (start, end).fromString16());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1021 }
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1022 NSTextStorage storage = (cast(NSTextView) view).textStorage ();
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1023 end = Math.min (end, cast(int)/64/storage.length () - 1);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1024 if (start > end) return ""; //$NON-NLS-1$
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1025 start = Math.max (0, start);
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1026 NSRange range = NSRange ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1027 range.location = start;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1028 range.length = end - start + 1;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1029 NSAttributedString substring = storage.attributedSubstringFromRange (range);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1030 NSString string = substring.string ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1031 return string.getString();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1032 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1033
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1034 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1035 * Returns the maximum number of characters that the receiver is capable of holding.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1036 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1037 * If this has not been changed by <code>setTextLimit()</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1038 * it will be the constant <code>Text.LIMIT</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1039 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1040 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1041 * @return the text limit
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1042 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1043 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1044 * <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	1045 * <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	1046 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1047 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1048 * @see #LIMIT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1049 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1050 public int getTextLimit () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1051 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1052 return textLimit;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1053 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1054
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1055 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1056 * Returns the zero-relative index of the line which is currently
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1057 * at the top of the receiver.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1058 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1059 * This index can change when lines are scrolled or new lines are added or removed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1060 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1061 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1062 * @return the index of the top line
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1063 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1064 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1065 * <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	1066 * <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	1067 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1068 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1069 public int getTopIndex () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1070 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1071 if ((style & DWT.SINGLE) !is 0) return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1072 return getTopPixel () / getLineHeight ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1073 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1074
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1075 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1076 * Returns the top pixel.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1077 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1078 * The top pixel is the pixel position of the line
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1079 * that is currently at the top of the widget. On
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1080 * some platforms, a text widget can be scrolled by
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1081 * pixels instead of lines so that a partial line
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1082 * is displayed at the top of the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1083 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1084 * The top pixel changes when the widget is scrolled.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1085 * The top pixel does not include the widget trimming.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1086 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1087 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1088 * @return the pixel position of the top line
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1089 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1090 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1091 * <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	1092 * <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	1093 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1094 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1095 public int getTopPixel () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1096 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1097 if ((style & DWT.SINGLE) !is 0) return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1098 //TODO
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1099 return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1100 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1101
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1102 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1103 * Inserts a string.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1104 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1105 * The old selection is replaced with the new text.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1106 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1107 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1108 * @param string the string
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1109 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1110 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1111 * <li>ERROR_NULL_ARGUMENT - if the string is <code>null</code></li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1112 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1113 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1114 * <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	1115 * <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	1116 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1117 */
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1118 public void insert (String stri) {
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1119 wchar[] string = stri.toString16();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1120 checkWidget ();
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1121 //if (string is null) error (DWT.ERROR_NULL_ARGUMENT);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1122 if (hooks (DWT.Verify) \|\| filters (DWT.Verify)) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1123 Point selection = getSelection ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1124 string = verifyText (string, selection.x, selection.y, null);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1125 if (string is null) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1126 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1127 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1128 insertEditText (string);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1129 } else {
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1130 NSString str = NSString.stringWith16 (string);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1131 NSTextView widget = cast(NSTextView) view;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1132 NSRange range = widget.selectedRange ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1133 widget.textStorage ().replaceCharactersInRange (range, str);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1134 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1135 if (string.length () !is 0) sendEvent (DWT.Modify);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1136 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1137
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1138 void insertEditText (wchar[] string) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1139 int length_ = string.length ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1140 Point selection = getSelection ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1141 if (hasFocus () && hiddenText is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1142 if (textLimit !is LIMIT) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1143 int charCount = getCharCount();
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1144 if (charCount - (selection.y - selection.x) + length_ > textLimit) {
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1145 length_ = textLimit - charCount + (selection.y - selection.x);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1146 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1147 }
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1148 wchar [] buffer = new wchar [length_];
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1149 string.getChars (0, buffer.length, buffer, 0);
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1150 NSString nsstring = NSString.stringWithCharacters (buffer.ptr, buffer.length);
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1151 NSText editor = (cast(NSTextField) view).currentEditor ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1152 editor.replaceCharactersInRange (editor.selectedRange (), nsstring);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1153 selectionRange = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1154 } else {
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1155 wchar[] oldText = getText16 ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1156 if (textLimit !is LIMIT) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1157 int charCount = oldText.length ();
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1158 if (charCount - (selection.y - selection.x) + length_ > textLimit) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1159 string = string.substring(0, textLimit - charCount + (selection.y - selection.x));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1160 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1161 }
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1162 wchar[] newText = oldText.substring (0, selection.x) ~ string ~ oldText.substring (selection.y);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1163 setEditText (newText);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1164 setSelection (selection.x + string.length ());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1165 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1166 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1167
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1168 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1169 * Pastes text from clipboard.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1170 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1171 * The selected text is deleted from the widget
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1172 * and new text inserted from the clipboard.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1173 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1174 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1175 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1176 * <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	1177 * <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	1178 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1179 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1180 public void paste () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1181 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1182 if ((style & DWT.READ_ONLY) !is 0) return;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1183 bool paste = true;
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1184 wchar[] oldText = null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1185 if (hooks (DWT.Verify) \|\| filters (DWT.Verify)) {
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1186 oldText = getClipboardText16 ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1187 if (oldText !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1188 Point selection = getSelection ();
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1189 wchar[] newText = verifyText (oldText, selection.x, selection.y, null);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1190 if (newText is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1191 if (!newText.equals (oldText)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1192 if ((style & DWT.SINGLE) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1193 insertEditText (newText);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1194 } else {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1195 NSTextView textView = cast(NSTextView) view;
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1196 textView.replaceCharactersInRange (textView.selectedRange (), NSString.stringWith16 (newText));
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1197 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1198 paste = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1199 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1200 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1201 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1202 if (paste) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1203 if ((style & DWT.SINGLE) !is 0) {
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1204 if (oldText is null) oldText = getClipboardText16 ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1205 insertEditText (oldText);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1206 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1207 //TODO check text limit
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1208 (cast(NSTextView) view).paste (null);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1209 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1210 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1211 sendEvent (DWT.Modify);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1212 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1213
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1214 void register() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1215 super.register();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1216
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1217 if ((style & DWT.SINGLE) !is 0) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1218 display.addWidget((cast(NSControl)view).cell(), this);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1219 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1220 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1221
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1222 void releaseWidget () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1223 super.releaseWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1224 hiddenText = message = null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1225 selectionRange = null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1226 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1227
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1228 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1229 * 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	1230 * be notified when the receiver's text is modified.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1231 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1232 * @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	1233 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1234 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1235 * <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	1236 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1237 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1238 * <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	1239 * <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	1240 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1241 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1242 * @see ModifyListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1243 * @see #addModifyListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1244 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1245 public void removeModifyListener (ModifyListener listener) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1246 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1247 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	1248 if (eventTable is null) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1249 eventTable.unhook (DWT.Modify, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1250 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1251
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1252 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1253 * 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	1254 * 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	1255 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1256 * @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	1257 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1258 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1259 * <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	1260 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1261 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1262 * <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	1263 * <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	1264 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1265 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1266 * @see SelectionListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1267 * @see #addSelectionListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1268 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1269 public void removeSelectionListener(SelectionListener listener) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1270 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1271 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	1272 if (eventTable is null) return;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1273 eventTable.unhook (DWT.Selection, listener);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1274 eventTable.unhook (DWT.DefaultSelection,listener);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1275 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1276
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1277 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1278 * 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	1279 * be notified when the control is verified.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1280 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1281 * @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	1282 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1283 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1284 * <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	1285 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1286 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1287 * <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	1288 * <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	1289 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1290 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1291 * @see VerifyListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1292 * @see #addVerifyListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1293 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1294 public void removeVerifyListener (VerifyListener listener) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1295 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1296 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	1297 if (eventTable is null) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1298 eventTable.unhook (DWT.Verify, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1299 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1300
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1301 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1302 * Selects all the text in the receiver.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1303 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1304 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1305 * <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	1306 * <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	1307 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1308 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1309 public void selectAll () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1310 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1311 if ((style & DWT.SINGLE) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1312 setSelection (0, getCharCount ());
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1313 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1314 (cast(NSTextView) view).selectAll (null);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1315 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1316 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1317
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1318 bool sendKeyEvent (NSEvent nsEvent, int type) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1319 bool result = super.sendKeyEvent (nsEvent, type);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1320 if (!result) return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1321 if (type !is DWT.KeyDown) return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1322 int stateMask = 0;
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1323 NSUInteger modifierFlags = nsEvent.modifierFlags();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1324 if ((modifierFlags & OS.NSAlternateKeyMask) !is 0) stateMask \|= DWT.ALT;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1325 if ((modifierFlags & OS.NSShiftKeyMask) !is 0) stateMask \|= DWT.SHIFT;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1326 if ((modifierFlags & OS.NSControlKeyMask) !is 0) stateMask \|= DWT.CONTROL;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1327 if ((modifierFlags & OS.NSCommandKeyMask) !is 0) stateMask \|= DWT.COMMAND;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1328 if (stateMask is DWT.COMMAND) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1329 ushort keyCode = nsEvent.keyCode ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1330 switch (keyCode) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1331 case 7: /* X */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1332 cut ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1333 return false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1334 case 8: /* C */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1335 copy ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1336 return false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1337 case 9: /* V */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1338 paste ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1339 return false;
128 07399639c0c8 Added DWT extension to dwt.widgets.MessageBox Jacob Carlborg <doob@me.com> parents: 126 diff changeset	1340 default:
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1341 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1342 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1343 if ((style & DWT.SINGLE) !is 0) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1344 ushort keyCode = nsEvent.keyCode ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1345 switch (keyCode) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1346 case 76: /* KP Enter */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1347 case 36: /* Return */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1348 postEvent (DWT.DefaultSelection);
128 07399639c0c8 Added DWT extension to dwt.widgets.MessageBox Jacob Carlborg <doob@me.com> parents: 126 diff changeset	1349 default:
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1350 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1351 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1352 if ((stateMask & DWT.COMMAND) !is 0) return result;
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1353 wchar[] oldText = "";
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1354 int charCount = getCharCount ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1355 Point selection = getSelection ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1356 int start = selection.x, end = selection.y;
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1357 ushort keyCode = nsEvent.keyCode ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1358 NSString characters = nsEvent.charactersIgnoringModifiers();
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1359 wchar character = characters.characterAtIndex(0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1360 switch (keyCode) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1361 case 51: /* Backspace */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1362 if (start is end) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1363 if (start is 0) return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1364 start = Math.max (0, start - 1);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1365 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1366 break;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1367 case 117: /* Delete */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1368 if (start is end) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1369 if (start is charCount) return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1370 end = Math.min (end + 1, charCount);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1371 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1372 break;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1373 case 36: /* Return */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1374 if ((style & DWT.SINGLE) !is 0) return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1375 oldText = DELIMITER;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1376 break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1377 default:
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1378 if (character !is '\t' && character < 0x20) return true;
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1379 oldText = new_String ([character]);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1380 }
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1381 wchar[] newText = verifyText (oldText, start, end, nsEvent);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1382 if (newText is null) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1383 if (charCount - (end - start) + newText.length () > textLimit) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1384 return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1385 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1386 result = newText is oldText;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1387 if (newText !is oldText \|\| hiddenText !is null) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1388 if ((style & DWT.SINGLE) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1389 insertEditText (newText);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1390 } else {
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1391 NSString str = NSString.stringWith16 (newText);
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1392 NSTextView widget = cast(NSTextView) view;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1393 NSRange range = widget.selectedRange ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1394 widget.textStorage ().replaceCharactersInRange (range, str);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1395 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1396 if (newText.length () !is 0) sendEvent (DWT.Modify);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1397 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1398 return result;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1399 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1400
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1401 void setBackground (Carbon.CGFloat [] color) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1402 NSColor nsColor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1403 if (color is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1404 return; // TODO reset to OS default
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1405 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1406 nsColor = NSColor.colorWithDeviceRed (color [0], color [1], color [2], 1);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1407 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1408 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1409 (cast(NSTextField) view).setBackgroundColor (nsColor);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1410 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1411 (cast(NSTextView) view).setBackgroundColor (nsColor);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1412 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1413 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1414
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1415 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1416 * Sets the double click enabled flag.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1417 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1418 * The double click flag enables or disables the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1419 * default action of the text widget when the user
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1420 * double clicks.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1421 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1422 * Note: This operation is a hint and is not supported on
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1423 * platforms that do not have this concept.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1424 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1425 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1426 * @param doubleClick the new double click flag
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1427 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1428 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1429 * <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	1430 * <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	1431 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1432 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1433 public void setDoubleClickEnabled (bool doubleClick) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1434 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1435 this.doubleClick = doubleClick;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1436 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1437
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1438 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1439 * Sets the echo character.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1440 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1441 * The echo character is the character that is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1442 * displayed when the user enters text or the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1443 * text is changed by the programmer. Setting
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1444 * the echo character to '\0' clears the echo
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1445 * character and redraws the original text.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1446 * If for any reason the echo character is invalid,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1447 * or if the platform does not allow modification
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1448 * of the echo character, the default echo character
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1449 * for the platform is used.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1450 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1451 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1452 * @param echo the new echo character
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1453 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1454 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1455 * <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	1456 * <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	1457 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1458 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1459 public void setEchoChar (char echo) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1460 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1461 if ((style & DWT.MULTI) !is 0) return;
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1462 // if (txnObject is 0) {
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1463 // if ((style & DWT.PASSWORD) is 0) {
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1464 // Point selection = getSelection ();
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1465 // String text = getText ();
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1466 // echoCharacter = echo;
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1467 // setEditText (text);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1468 // setSelection (selection);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1469 // }
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1470 // } else {
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1471 // OS.TXNEchoMode (txnObject, echo, OS.kTextEncodingMacUnicode, echo !is '\0');
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1472 // }
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1473 echoCharacter = toWChar(echo);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1474 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1475
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1476 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1477 * Sets the editable state.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1478 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1479 * @param editable the new editable state
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1480 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1481 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1482 * <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	1483 * <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	1484 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1485 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1486 public void setEditable (bool editable) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1487 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1488 if (editable) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1489 style &= ~DWT.READ_ONLY;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1490 } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1491 style \|= DWT.READ_ONLY;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1492 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1493 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1494 (cast(NSTextField) view).setEditable (editable);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1495 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1496 (cast(NSTextView) view).setEditable (editable);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1497 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1498 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1499
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1500 void setEditText (wchar[] string) {
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1501 wchar [] buffer;
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1502 if ((style & DWT.PASSWORD) && echoCharacter !is '\0') {
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1503 hiddenText = string;
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1504 buffer = new wchar [Math.min(hiddenText.length (), textLimit)];
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1505 for (int i = 0; i < buffer.length; i++) buffer [i] = echoCharacter;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1506 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1507 hiddenText = null;
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1508 buffer = new wchar [Math.min(string.length (), textLimit)];
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1509 string.getChars (0, buffer.length, buffer, 0);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1510 }
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1511 NSString nsstring = NSString.stringWithCharacters (buffer.ptr, buffer.length);
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1512 (new NSCell ((cast(NSTextField) view).cell ())).setTitle (nsstring);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1513 selectionRange = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1514 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1515
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1516 void setFont(NSFont font) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1517 if ((style & DWT.MULTI) !is 0) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1518 (cast(NSTextView) view).setFont (font);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1519 return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1520 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1521 super.setFont (font);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1522 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1523
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1524 void setForeground (Carbon.CGFloat [] color) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1525 NSColor nsColor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1526 if (color is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1527 return; // TODO reset to OS default
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1528 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1529 nsColor = NSColor.colorWithDeviceRed (color [0], color [1], color [2], 1);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1530 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1531 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1532 (cast(NSTextField) view).setTextColor (nsColor);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1533 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1534 (cast(NSTextView) view).setTextColor (nsColor);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1535 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1536 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1537
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1538 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1539 * Sets the orientation of the receiver, which must be one
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1540 * of the constants <code>DWT.LEFT_TO_RIGHT</code> or <code>DWT.RIGHT_TO_LEFT</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1541 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1542 * Note: This operation is a hint and is not supported on
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1543 * platforms that do not have this concept.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1544 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1545 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1546 * @param orientation new orientation style
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1547 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1548 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1549 * <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	1550 * <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	1551 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1552 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1553 * @since 2.1.2
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1554 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1555 public void setOrientation (int orientation) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1556 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1557 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1558
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1559 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1560 * Sets the widget message. When the widget is created
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1561 * with the style <code>DWT.SEARCH</code>, the message text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1562 * is displayed as a hint for the user, indicating the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1563 * purpose of the field.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1564 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1565 * Note: This operation is a <em>HINT</em> and is not
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1566 * supported on platforms that do not have this concept.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1567 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1568 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1569 * @param message the new message
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1570 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1571 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1572 * <li>ERROR_NULL_ARGUMENT - if the message is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1573 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1574 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1575 * <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	1576 * <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	1577 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1578 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1579 * @since 3.3
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1580 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1581 public void setMessage (String message) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1582 checkWidget ();
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1583 //if (message is null) error (DWT.ERROR_NULL_ARGUMENT);
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1584 this.message = message.toString16();
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1585 // if ((style & DWT.SEARCH) !is 0) {
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1586 // char [] buffer = new char [message.length ()];
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1587 // message.getChars (0, buffer.length, buffer, 0);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1588 // int ptr = OS.CFStringCreateWithCharacters (OS.kCFAllocatorDefault, buffer, buffer.length);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1589 // if (ptr is 0) error (DWT.ERROR_CANNOT_SET_TEXT);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1590 // OS.HISearchFieldSetDescriptiveText (handle, ptr);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1591 // OS.CFRelease (ptr);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1592 // }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1593 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1594
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1595 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1596 * Sets the selection.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1597 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1598 * Indexing is zero based. The range of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1599 * a selection is from 0..N where N is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1600 * the number of characters in the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1601 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1602 * Text selections are specified in terms of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1603 * caret positions. In a text widget that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1604 * contains N characters, there are N+1 caret
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1605 * positions, ranging from 0..N. This differs
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1606 * from other functions that address character
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1607 * position such as getText () that use the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1608 * regular array indexing rules.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1609 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1610 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1611 * @param start new caret position
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1612 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1613 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1614 * <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	1615 * <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	1616 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1617 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1618 public void setSelection (int start) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1619 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1620 setSelection (start, start);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1621 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1622
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1623 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1624 * Sets the selection to the range specified
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1625 * by the given start and end indices.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1626 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1627 * Indexing is zero based. The range of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1628 * a selection is from 0..N where N is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1629 * the number of characters in the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1630 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1631 * Text selections are specified in terms of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1632 * caret positions. In a text widget that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1633 * contains N characters, there are N+1 caret
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1634 * positions, ranging from 0..N. This differs
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1635 * from other functions that address character
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1636 * position such as getText () that use the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1637 * usual array indexing rules.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1638 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1639 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1640 * @param start the start of the range
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1641 * @param end the end of the range
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1642 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1643 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1644 * <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	1645 * <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	1646 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1647 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1648 public void setSelection (int start, int end) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1649 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1650 if ((style & DWT.SINGLE) !is 0) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1651 NSString str = (new NSCell ((cast(NSTextField) view).cell ())).title ();
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1652 int length = cast(int)/64/str.length ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1653 int selStart = Math.min (Math.max (Math.min (start, end), 0), length);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1654 int selEnd = Math.min (Math.max (Math.max (start, end), 0), length);
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1655 selectionRangeStruct = NSRange ();
c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1656 selectionRange = &selectionRangeStruct;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1657 selectionRange.location = selStart;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1658 selectionRange.length = selEnd - selStart;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1659 if (this is display.getFocusControl ()) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1660 NSText editor = view.window ().fieldEditor (false, view);
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1661 editor.setSelectedRange (selectionRangeStruct);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1662 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1663 } else {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1664 int length = cast(int)/64/(cast(NSTextView) view).textStorage ().length ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1665 int selStart = Math.min (Math.max (Math.min (start, end), 0), length);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1666 int selEnd = Math.min (Math.max (Math.max (start, end), 0), length);
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1667 NSRange range = NSRange ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1668 range.location = selStart;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1669 range.length = selEnd - selStart;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1670 (cast(NSTextView) view).setSelectedRange (range);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1671 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1672 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1673
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1674 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1675 * Sets the selection to the range specified
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1676 * by the given point, where the x coordinate
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1677 * represents the start index and the y coordinate
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1678 * represents the end index.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1679 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1680 * Indexing is zero based. The range of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1681 * a selection is from 0..N where N is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1682 * the number of characters in the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1683 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1684 * Text selections are specified in terms of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1685 * caret positions. In a text widget that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1686 * contains N characters, there are N+1 caret
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1687 * positions, ranging from 0..N. This differs
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1688 * from other functions that address character
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1689 * position such as getText () that use the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1690 * usual array indexing rules.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1691 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1692 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1693 * @param selection the point
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1694 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1695 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1696 * <li>ERROR_NULL_ARGUMENT - if the point is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1697 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1698 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1699 * <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	1700 * <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	1701 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1702 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1703 public void setSelection (Point selection) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1704 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1705 if (selection 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	1706 setSelection (selection.x, selection.y);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1707 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1708
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1709 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1710 * Sets the number of tabs.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1711 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1712 * Tab stop spacing is specified in terms of the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1713 * space (' ') character. The width of a single
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1714 * tab stop is the pixel width of the spaces.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1715 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1716 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1717 * @param tabs the number of tabs
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1718 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1719 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1720 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1721 * <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	1722 * <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	1723 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1724 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1725 public void setTabs (int tabs) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1726 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1727 if (this.tabs is tabs) return;
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1728 // if (txnObject is 0) return;
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1729 // this.tabs = tabs;
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1730 // TXNTab tab = new TXNTab ();
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1731 // tab.value = cast(short) (textExtent (new char[]{' '}, 0).x * tabs);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1732 // int [] tags = new int [] {OS.kTXNTabSettingsTag};
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1733 // int [] datas = new int [1];
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1734 // OS.memmove (datas, tab, TXNTab.sizeof);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1735 // OS.TXNSetTXNObjectControls (txnObject, false, tags.length, tags, datas);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1736 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1737
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1738 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1739 * Sets the contents of the receiver to the given string. If the receiver has style
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1740 * SINGLE and the argument contains multiple lines of text, the result of this
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1741 * operation is undefined and may vary from platform to platform.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1742 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1743 * @param string the new text
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1744 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1745 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1746 * <li>ERROR_NULL_ARGUMENT - if the string is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1747 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1748 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1749 * <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	1750 * <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	1751 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1752 */
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1753 public void setText (String stri) {
86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1754 wchar[] string = stri.toString16();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1755 checkWidget ();
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1756 //if (string is null) error (DWT.ERROR_NULL_ARGUMENT);
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1757 if (hooks (DWT.Verify) \|\| filters (DWT.Verify)) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1758 string = verifyText (string, 0, getCharCount (), null);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1759 if (string is null) return;
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1760 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1761 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1762 setEditText (string);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1763 } else {
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1764 NSString str = NSString.stringWith16 (string);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1765 (cast(NSTextView) view).setString (str);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1766 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1767 sendEvent (DWT.Modify);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1768 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1769
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1770 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1771 * Sets the maximum number of characters that the receiver
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1772 * is capable of holding to be the argument.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1773 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1774 * Instead of trying to set the text limit to zero, consider
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1775 * creating a read-only text widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1776 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1777 * To reset this value to the default, use <code>setTextLimit(Text.LIMIT)</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1778 * Specifying a limit value larger than <code>Text.LIMIT</code> sets the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1779 * receiver's limit to <code>Text.LIMIT</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1780 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1781 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1782 * @param limit new text limit
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1783 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1784 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1785 * <li>ERROR_CANNOT_BE_ZERO - if the limit is zero</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1786 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1787 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1788 * <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	1789 * <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	1790 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1791 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1792 * @see #LIMIT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1793 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1794 public void setTextLimit (int limit) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1795 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1796 if (limit is 0) error (DWT.ERROR_CANNOT_BE_ZERO);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1797 textLimit = limit;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1798 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1799
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1800 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1801 * Sets the zero-relative index of the line which is currently
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1802 * at the top of the receiver. This index can change when lines
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1803 * are scrolled or new lines are added and removed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1804 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1805 * @param index the index of the top item
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1806 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1807 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1808 * <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	1809 * <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	1810 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1811 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1812 public void setTopIndex (int index) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1813 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1814 if ((style & DWT.SINGLE) !is 0) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1815 //TODO no working
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1816 // NSTextView widget = cast(NSTextView) view;
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1817 // NSRange range = NSRange ();
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1818 // NSRect rect = widget.firstRectForCharacterRange (range);
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1819 // view.scrollRectToVisible (rect);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1820 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1821
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1822 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1823 * Shows the selection.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1824 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1825 * If the selection is already showing
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1826 * in the receiver, this method simply returns. Otherwise,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1827 * lines are scrolled until the selection is visible.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1828 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1829 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1830 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1831 * <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	1832 * <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	1833 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1834 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1835 public void showSelection () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1836 checkWidget ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1837 if ((style & DWT.SINGLE) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1838 setSelection (getSelection ());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1839 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1840 NSTextView widget = cast(NSTextView) view;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1841 widget.scrollRangeToVisible (widget.selectedRange ());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1842 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1843 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1844
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1845 void textViewDidChangeSelection(objc.id id, objc.SEL sel, objc.id aNotification) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1846 NSNotification notification = new NSNotification (aNotification);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1847 NSText editor = new NSText (notification.object ().id);
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1848 selectionRangeStruct = editor.selectedRange ();
c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1849 selectionRange = &selectionRangeStruct;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1850 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1851
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1852 void textDidChange (objc.id id, objc.SEL sel, objc.id aNotification) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1853 postEvent (DWT.Modify);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1854 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1855
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1856 NSRange textView_willChangeSelectionFromCharacterRange_toCharacterRange (objc.id id, objc.SEL sel, objc.id aTextView, objc.id oldSelectedCharRange, objc.id newSelectedCharRange) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1857 /*
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1858 * If the selection is changing as a result of the receiver getting focus
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1859 * then return the receiver's last selection range, otherwise the full
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1860 * text will be automatically selected.
3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1861 */
90 c7f7f4d7091a All widgets are ported Jacob Carlborg <doob@me.com> parents: 83 diff changeset	1862 if (receivingFocus && selectionRange !is null) return selectionRangeStruct;
138 3d9eb62cd2e3 Fixes #8 Jacob Carlborg <doob@me.com> parents: 128 diff changeset	1863
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1864 /* allow the selection change to proceed */
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1865 NSRange result = NSRange ();
681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1866 OS.memmove(&result, newSelectedCharRange, NSRange.sizeof);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1867 return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1868 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1869
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1870 int traversalCode (int key, NSEvent theEvent) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1871 int bits = super.traversalCode (key, theEvent);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1872 if ((style & DWT.READ_ONLY) !is 0) return bits;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1873 if ((style & DWT.MULTI) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1874 bits &= ~DWT.TRAVERSE_RETURN;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1875 if (key is 48 /* Tab */ && theEvent !is null) {
83 681769fb5a7a Ported dwt.widgets.Text Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1876 NSUInteger modifiers = theEvent.modifierFlags ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1877 bool next = (modifiers & OS.NSShiftKeyMask) is 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1878 if (next && (modifiers & OS.NSControlKeyMask) is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1879 bits &= ~(DWT.TRAVERSE_TAB_NEXT \| DWT.TRAVERSE_TAB_PREVIOUS);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1880 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1881 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1882 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1883 return bits;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1884 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1885
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1886 wchar[] verifyText (wchar[] string, int start, int end, NSEvent keyEvent) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1887 Event event = new Event ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 7 diff changeset	1888 if (keyEvent !is null) setKeyState(event, DWT.MouseDown, keyEvent);
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1889 event.text = string.fromString16();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1890 event.start = start;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1891 event.end = end;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1892 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1893 * It is possible (but unlikely), that application
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1894 * code could have disposed the widget in the verify
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1895 * event. If this happens, answer null to cancel
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1896 * the operation.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1897 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1898 sendEvent (DWT.Verify, event);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1899 if (!event.doit \|\| isDisposed ()) return null;
139 86fc761a24ae Fixes #11 Jacob Carlborg <doob@me.com> parents: 138 diff changeset	1900 return event.text.toString16();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1901 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1902
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1903 }

Mercurial > projects > dwt-mac

annotate dwt/widgets/Text.d @ 139:86fc761a24ae