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

annotate dwt/widgets/Shell.d @ 60:62202ce0039f

Updated and fixed many modules to 3.514

author	Jacob Carlborg <doob@me.com>
date	Mon, 22 Dec 2008 15:10:19 +0100
parents	30adfb32d4be
children	63a09873578e

rev	line source
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1 /*******************************************************************************
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	2 * Copyright (c) 2000, 2008 IBM Corporation and others.
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3 * All rights reserved. This program and the accompanying materials
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4 * are made available under the terms of the Eclipse Public License v1.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	5 * which accompanies this distribution, and is available at
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	6 * http://www.eclipse.org/legal/epl-v10.html
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	7 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	8 * Contributors:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	9 * IBM Corporation - initial API and implementation
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	10 *
fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 7 diff changeset	11 * Port to the D programming language:
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	12 * Jacob Carlborg <doob@me.com>
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	13 *******************************************************************************/
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	14 module dwt.widgets.Shell;
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.DWT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	17 import dwt.DWTException;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	18 import dwt.events.ShellListener;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	19 import dwt.graphics.Cursor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	20 import dwt.graphics.GC;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	21 import dwt.graphics.Point;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	22 import dwt.graphics.Rectangle;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	23 import dwt.graphics.Region;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	24 import dwt.internal.cocoa.NSApplication;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	25 import dwt.internal.cocoa.NSBezierPath;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	26 import dwt.internal.cocoa.NSColor;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	27 import dwt.internal.cocoa.NSGraphicsContext;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	28 import dwt.internal.cocoa.NSPoint;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	29 import dwt.internal.cocoa.NSRect;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	30 import dwt.internal.cocoa.NSScreen;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	31 import dwt.internal.cocoa.NSScrollView;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	32 import dwt.internal.cocoa.NSSize;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	33 import dwt.internal.cocoa.NSString;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	34 import dwt.internal.cocoa.NSView;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	35 import dwt.internal.cocoa.NSWindow;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	36 import dwt.internal.cocoa.OS;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	37 import dwt.internal.cocoa.SWTWindow;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	38 import dwt.internal.cocoa.SWTWindowDelegate;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	39 import dwt.internal.cocoa.id;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	40
20 453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	41 import dwt.dwthelper.utils;
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	42 import Carbon = dwt.internal.c.Carbon;
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	43 import dwt.internal.objc.cocoa.Cocoa;
20 453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	44 import objc = dwt.internal.objc.runtime;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	45 import dwt.widgets.Composite;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	46 import dwt.widgets.Control;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	47 import dwt.widgets.Decorations;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	48 import dwt.widgets.Display;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	49 import dwt.widgets.Event;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	50 import dwt.widgets.EventTable;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	51 import dwt.widgets.Layout;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	52 import dwt.widgets.Listener;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	53 import dwt.widgets.Menu;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	54 import dwt.widgets.Monitor;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	55 import dwt.widgets.TypedListener;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	56 import dwt.widgets.Widget;
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	57
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	58 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	59 * Instances of this class represent the "windows"
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	60 * which the desktop or "window manager" is managing.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	61 * Instances that do not have a parent (that is, they
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	62 * are built using the constructor, which takes a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	63 * <code>Display</code> as the argument) are described
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	64 * as <em>top level</em> shells. Instances that do have
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	65 * a parent are described as <em>secondary</em> or
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	66 * <em>dialog</em> shells.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	67 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	68 * Instances are always displayed in one of the maximized,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	69 * minimized or normal states:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	70 * <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	71 * <li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	72 * When an instance is marked as <em>maximized</em>, the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	73 * window manager will typically resize it to fill the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	74 * entire visible area of the display, and the instance
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	75 * is usually put in a state where it can not be resized
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	76 * (even if it has style <code>RESIZE</code>) until it is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	77 * no longer maximized.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	78 * </li><li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	79 * When an instance is in the <em>normal</em> state (neither
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	80 * maximized or minimized), its appearance is controlled by
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	81 * the style constants which were specified when it was created
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	82 * and the restrictions of the window manager (see below).
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	83 * </li><li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	84 * When an instance has been marked as <em>minimized</em>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	85 * its contents (client area) will usually not be visible,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	86 * and depending on the window manager, it may be
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	87 * "iconified" (that is, replaced on the desktop by a small
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	88 * simplified representation of itself), relocated to a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	89 * distinguished area of the screen, or hidden. Combinations
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	90 * of these changes are also possible.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	91 * </li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	92 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	93 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	94 * The <em>modality</em> of an instance may be specified using
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	95 * style bits. The modality style bits are used to determine
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	96 * whether input is blocked for other shells on the display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	97 * The <code>PRIMARY_MODAL</code> style allows an instance to block
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	98 * input to its parent. The <code>APPLICATION_MODAL</code> style
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	99 * allows an instance to block input to every other shell in the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	100 * display. The <code>SYSTEM_MODAL</code> style allows an instance
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	101 * to block input to all shells, including shells belonging to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	102 * different applications.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	103 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	104 * Note: The styles supported by this class are treated
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	105 * as <em>HINT</em>s, since the window manager for the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	106 * desktop on which the instance is visible has ultimate
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	107 * control over the appearance and behavior of decorations
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	108 * and modality. For example, some window managers only
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	109 * support resizable windows and will always assume the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	110 * RESIZE style, even if it is not set. In addition, if a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	111 * modality style is not supported, it is "upgraded" to a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	112 * more restrictive modality style that is supported. For
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	113 * example, if <code>PRIMARY_MODAL</code> is not supported,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	114 * it would be upgraded to <code>APPLICATION_MODAL</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	115 * A modality style may also be "downgraded" to a less
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	116 * restrictive style. For example, most operating systems
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	117 * no longer support <code>SYSTEM_MODAL</code> because
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	118 * it can freeze up the desktop, so this is typically
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	119 * downgraded to <code>APPLICATION_MODAL</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	120 * <dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	121 * <dt><b>Styles:</b></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	122 * <dd>BORDER, CLOSE, MIN, MAX, NO_TRIM, RESIZE, TITLE, ON_TOP, TOOL</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	123 * <dd>APPLICATION_MODAL, MODELESS, PRIMARY_MODAL, SYSTEM_MODAL</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	124 * <dt><b>Events:</b></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	125 * <dd>Activate, Close, Deactivate, Deiconify, Iconify</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	126 * </dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	127 * Class <code>DWT</code> provides two "convenience constants"
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	128 * for the most commonly required style combinations:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	129 * <dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	130 * <dt><code>SHELL_TRIM</code></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	131 * <dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	132 * the result of combining the constants which are required
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	133 * to produce a typical application top level shell: (that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	134 * is, <code>CLOSE \| TITLE \| MIN \| MAX \| RESIZE</code>)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	135 * </dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	136 * <dt><code>DIALOG_TRIM</code></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	137 * <dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	138 * the result of combining the constants which are required
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	139 * to produce a typical application dialog shell: (that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	140 * is, <code>TITLE \| CLOSE \| BORDER</code>)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	141 * </dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	142 * </dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	143 * </p>
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 * Note: Only one of the styles APPLICATION_MODAL, MODELESS,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	146 * PRIMARY_MODAL and SYSTEM_MODAL may be specified.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	147 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	148 * IMPORTANT: This class is not intended to be subclassed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	149 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	150 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	151 * @see Decorations
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	152 * @see DWT
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	153 * @see <a href="http://www.eclipse.org/swt/snippets/#shell">Shell snippets</a>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	154 * @see <a href="http://www.eclipse.org/swt/examples.php">DWT Example: ControlExample</a>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	155 * @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	156 */
3 649b8e223d5a fix extends Frank Benoit <benoit@tionex.de> parents: 0 diff changeset	157 public class Shell : Decorations {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	158 NSWindow window;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	159 SWTWindowDelegate windowDelegate;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	160 NSBezierPath regionPath;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	161 bool opened, moved, resized, fullScreen;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	162 // bool resized, moved, drawing, reshape, update, deferDispose, active, disposed, opened, fullScreen;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	163 Control lastActive;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	164 Rectangle normalBounds;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	165
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	166 static int DEFAULT_CLIENT_WIDTH = -1;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	167 static int DEFAULT_CLIENT_HEIGHT = -1;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	168
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	169 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	170 * Constructs a new instance of this class. This is equivalent
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	171 * to calling <code>Shell(cast(Display) null)</code>.
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	172 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	173 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	174 * <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	175 * <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	176 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	177 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	178 public this () {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	179 this (cast(Display) null);
0 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 * Constructs a new instance of this class given only the style
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	184 * value describing its behavior and appearance. This is equivalent
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	185 * to calling <code>Shell(cast(Display) null, style)</code>.
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	186 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	187 * 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	188 * 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	189 * 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	190 * (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	191 * 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	192 * 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	193 * 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	194 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	195 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	196 * @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	197 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	198 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	199 * <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	200 * <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	201 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	202 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	203 * @see DWT#BORDER
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	204 * @see DWT#CLOSE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	205 * @see DWT#MIN
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	206 * @see DWT#MAX
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	207 * @see DWT#RESIZE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	208 * @see DWT#TITLE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	209 * @see DWT#NO_TRIM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	210 * @see DWT#SHELL_TRIM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	211 * @see DWT#DIALOG_TRIM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	212 * @see DWT#MODELESS
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	213 * @see DWT#PRIMARY_MODAL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	214 * @see DWT#APPLICATION_MODAL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	215 * @see DWT#SYSTEM_MODAL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	216 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	217 public this (int style) {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	218 this (cast(Display) null, style);
0 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
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 * Constructs a new instance of this class given only the display
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	223 * to create it on. It is created with style <code>DWT.SHELL_TRIM</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	224 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	225 * Note: Currently, null can be passed in for the display argument.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	226 * This has the effect of creating the shell on the currently active
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	227 * display if there is one. If there is no current display, the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	228 * shell is created on a "default" display. <b>Passing in null as
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	229 * the display argument is not considered to be good coding style,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	230 * and may not be supported in a future release of DWT.</b>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	231 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	232 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	233 * @param display the display to create the shell on
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	234 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	235 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	236 * <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	237 * <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	238 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	239 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	240 public this (Display display) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	241 this (display, DWT.SHELL_TRIM);
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	244 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	245 * Constructs a new instance of this class given the display
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	246 * to create it on and a style value describing its behavior
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	247 * and appearance.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	248 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	249 * 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	250 * 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	251 * 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	252 * (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	253 * 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	254 * 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	255 * 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	256 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	257 * Note: Currently, null can be passed in for the display argument.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	258 * This has the effect of creating the shell on the currently active
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	259 * display if there is one. If there is no current display, the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	260 * shell is created on a "default" display. <b>Passing in null as
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	261 * the display argument is not considered to be good coding style,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	262 * and may not be supported in a future release of DWT.</b>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	263 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	264 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	265 * @param display the display to create the shell on
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	266 * @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	267 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	268 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	269 * <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	270 * <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	271 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	272 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	273 * @see DWT#BORDER
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	274 * @see DWT#CLOSE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	275 * @see DWT#MIN
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	276 * @see DWT#MAX
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	277 * @see DWT#RESIZE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	278 * @see DWT#TITLE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	279 * @see DWT#NO_TRIM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	280 * @see DWT#SHELL_TRIM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	281 * @see DWT#DIALOG_TRIM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	282 * @see DWT#MODELESS
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	283 * @see DWT#PRIMARY_MODAL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	284 * @see DWT#APPLICATION_MODAL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	285 * @see DWT#SYSTEM_MODAL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	286 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	287 public this (Display display, int style) {
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	288 this (display, null, style, null, false);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	289 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	290
20 453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	291 this (Display display, Shell parent, int style, objc.id handle, bool embedded) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	292 super ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	293 checkSubclass ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	294 if (display is null) display = Display.getCurrent ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	295 if (display is null) display = Display.getDefault ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	296 if (!display.isValidThread ()) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	297 error (DWT.ERROR_THREAD_INVALID_ACCESS);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	298 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	299 if (parent !is null && parent.isDisposed ()) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	300 error (DWT.ERROR_INVALID_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	301 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	302 this.style = checkStyle (style);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	303 this.parent = parent;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	304 this.display = display;
20 453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	305 if (handle !is null) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	306 if (embedded) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	307 view = new NSView(handle);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	308 } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	309 window = new NSWindow(handle);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	310 state \|= FOREIGN_HANDLE;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	311 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	312 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	313 createWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	314 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	315
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	316 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	317 * Constructs a new instance of this class given only its
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	318 * parent. It is created with style <code>DWT.DIALOG_TRIM</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	319 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	320 * Note: Currently, null can be passed in for the parent.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	321 * This has the effect of creating the shell on the currently active
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	322 * display if there is one. If there is no current display, the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	323 * shell is created on a "default" display. <b>Passing in null as
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	324 * the parent is not considered to be good coding style,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	325 * and may not be supported in a future release of DWT.</b>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	326 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	327 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	328 * @param parent a shell which will be the parent of the new instance
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 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	331 * <li>ERROR_INVALID_ARGUMENT - if the parent is disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	332 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	333 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	334 * <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	335 * <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	336 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	337 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	338 public this (Shell parent) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	339 this (parent, DWT.DIALOG_TRIM);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	340 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	341
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	342 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	343 * 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	344 * 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	345 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	346 * 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	347 * 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	348 * 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	349 * (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	350 * 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	351 * 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	352 * 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	353 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	354 * Note: Currently, null can be passed in for the parent.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	355 * This has the effect of creating the shell on the currently active
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	356 * display if there is one. If there is no current display, the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	357 * shell is created on a "default" display. <b>Passing in null as
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	358 * the parent is not considered to be good coding style,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	359 * and may not be supported in a future release of DWT.</b>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	360 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	361 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	362 * @param parent a shell which will be the parent of the new instance
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	363 * @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	364 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	365 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	366 * <li>ERROR_INVALID_ARGUMENT - if the parent is disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	367 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	368 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	369 * <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	370 * <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	371 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	372 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	373 * @see DWT#BORDER
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	374 * @see DWT#CLOSE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	375 * @see DWT#MIN
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	376 * @see DWT#MAX
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	377 * @see DWT#RESIZE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	378 * @see DWT#TITLE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	379 * @see DWT#NO_TRIM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	380 * @see DWT#SHELL_TRIM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	381 * @see DWT#DIALOG_TRIM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	382 * @see DWT#ON_TOP
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	383 * @see DWT#TOOL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	384 * @see DWT#MODELESS
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	385 * @see DWT#PRIMARY_MODAL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	386 * @see DWT#APPLICATION_MODAL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	387 * @see DWT#SYSTEM_MODAL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	388 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	389 public this (Shell parent, int style) {
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	390 this (parent !is null ? parent.display : null, parent, style, null, false);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	391 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	392
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	393 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	394 * Invokes platform specific functionality to allocate a new shell
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	395 * that is not embedded.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	396 * <p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	397 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	398 * API for <code>Shell</code>. It is marked public only so that it
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	399 * can be shared within the packages provided by DWT. It is not
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	400 * available on all platforms, and should never be called from
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	401 * application code.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	402 * </p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	403 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	404 * @param display the display for the shell
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	405 * @param handle the handle for the shell
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	406 * @return a new shell object containing the specified display and handle
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	407 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	408 * @since 3.3
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	409 */
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	410 public static Shell internal_new (Display display, objc.id handle) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	411 return new Shell (display, null, DWT.NO_TRIM, handle, false);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	412 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	413
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	414 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	415 * Invokes platform specific functionality to allocate a new shell
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	416 * that is 'embedded'. In this case, the handle represents an NSView
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	417 * that acts as an embedded DWT Shell in an AWT Canvas.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	418 * <p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	419 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	420 * API for <code>Shell</code>. It is marked public only so that it
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	421 * can be shared within the packages provided by DWT. It is not
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	422 * available on all platforms, and should never be called from
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	423 * application code.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	424 * </p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	425 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	426 * @param display the display for the shell
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	427 * @param handle the handle for the shell
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	428 * @return a new shell object containing the specified display and handle
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	429 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	430 * @since 3.5
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	431 */
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	432 public static Shell cocoa_new (Display display, objc.id handle) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	433 return new Shell (display, null, DWT.NO_TRIM, handle, true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	434 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	435
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	436 static int checkStyle (int style) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	437 style = Decorations.checkStyle (style);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	438 style &= ~DWT.TRANSPARENT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	439 int mask = DWT.SYSTEM_MODAL \| DWT.APPLICATION_MODAL \| DWT.PRIMARY_MODAL;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	440 int bits = style & ~mask;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	441 if ((style & DWT.SYSTEM_MODAL) !is 0) return bits \| DWT.SYSTEM_MODAL;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	442 if ((style & DWT.APPLICATION_MODAL) !is 0) return bits \| DWT.APPLICATION_MODAL;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	443 if ((style & DWT.PRIMARY_MODAL) !is 0) return bits \| DWT.PRIMARY_MODAL;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	444 return bits;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	445 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	446
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	447 bool accessibilityIsIgnored(objc.id id, objc.SEL sel) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	448 // The content view of a shell is always ignored.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	449 if (id is view.id) return true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	450 return super.accessibilityIsIgnored(id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	451 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	452
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	453 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	454 * 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	455 * be notified when operations are performed on the receiver,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	456 * by sending the listener one of the messages defined in the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	457 * <code>ShellListener</code> interface.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	458 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	459 * @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	460 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	461 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	462 * <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	463 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	464 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	465 * <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	466 * <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	467 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	468 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	469 * @see ShellListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	470 * @see #removeShellListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	471 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	472 public void addShellListener(ShellListener listener) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	473 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	474 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	475 TypedListener typedListener = new TypedListener (listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	476 addListener(DWT.Activate,typedListener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	477 addListener(DWT.Close,typedListener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	478 addListener(DWT.Deactivate,typedListener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	479 addListener(DWT.Iconify,typedListener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	480 addListener(DWT.Deiconify,typedListener);
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 void bringToTop (bool force) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	484 if (getMinimized ()) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	485 if (force) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	486 forceActive ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	487 } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	488 setActive ();
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
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	492 bool canBecomeKeyWindow (objc.id id, objc.SEL sel) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	493 if (window.styleMask () is OS.NSBorderlessWindowMask) return true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	494 return super.canBecomeKeyWindow (id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	495 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	496
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	497 void checkOpen () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	498 if (!opened) resized = false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	499 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	500
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	501 void clearLevel() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	502 window.setLevel(0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	503 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	504
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	505 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	506 * Requests that the window manager close the receiver in
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	507 * the same way it would be closed when the user clicks on
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	508 * the "close box" or performs some other platform specific
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	509 * key or mouse combination that indicates the window
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	510 * should be removed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	511 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	512 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	513 * <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	514 * <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	515 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	516 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	517 * @see DWT#Close
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	518 * @see #dispose
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	519 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	520 public void close () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	521 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	522 closeWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	523 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	524
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	525 void closeWidget () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	526 Event event = new Event ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	527 sendEvent (DWT.Close, event);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	528 if (event.doit && !isDisposed ()) dispose ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	529 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	530
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	531 public Rectangle computeTrim (int x, int y, int width, int height) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	532 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	533 Rectangle trim = super.computeTrim(x, y, width, height);
20 453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	534 NSRect rect = NSRect ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	535 rect.x = trim.x;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	536 rect.y = trim.y;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	537 rect.width = trim.width;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	538 rect.height = trim.height;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	539 NSWindow myWindow = (window !is null ? window : view.window());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	540 rect = myWindow.frameRectForContentRect(rect);
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	541 return new Rectangle (cast(int)rect.x, cast(int)rect.y, cast(int)rect.width, cast(int)rect.height);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	542 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	543
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	544 void createHandle () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	545 state \|= HIDDEN;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	546 if (window is null) {
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	547 window = cast(NSWindow) (new SWTWindow ()).alloc ();
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	548 NSUInteger styleMask = NSBorderlessWindowMask;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	549 if ((style & DWT.NO_TRIM) is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	550 if ((style & DWT.TITLE) !is 0) styleMask \|= OS.NSTitledWindowMask;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	551 if ((style & DWT.CLOSE) !is 0) styleMask \|= NSClosableWindowMask;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	552 if ((style & DWT.MIN) !is 0) styleMask \|= NSMiniaturizableWindowMask;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	553 if ((style & DWT.MAX) !is 0) styleMask \|= NSResizableWindowMask;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	554 if ((style & DWT.RESIZE) !is 0) styleMask \|= NSResizableWindowMask;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	555 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	556 NSScreen screen = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	557 NSScreen primaryScreen = new NSScreen(NSScreen.screens().objectAtIndex(0));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	558 if (parent !is null) screen = parent.getShell().window.screen();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	559 if (screen is null) screen = primaryScreen;
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	560 window = window.initWithContentRect(NSRect(), styleMask, OS.NSBackingStoreBuffered, false, screen);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	561 if ((style & (DWT.NO_TRIM \| DWT.BORDER \| DWT.SHELL_TRIM)) is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	562 window.setHasShadow (true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	563 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	564 display.cascadeWindow(window, screen);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	565 NSRect screenFrame = screen.frame();
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	566 Carbon.CGFloat width = screenFrame.width * 5 / 8, height = screenFrame.height * 5 / 8;;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	567 NSRect frame = window.frame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	568 NSRect primaryFrame = primaryScreen.frame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	569 frame.y = primaryFrame.height - ((primaryFrame.height - (frame.y + frame.height)) + height);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	570 frame.width = width;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	571 frame.height = height;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	572 window.setFrame(frame, false);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	573 if ((style & DWT.ON_TOP) !is 0) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	574 window.setLevel(OS.NSStatusWindowLevel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	575 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	576 super.createHandle ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	577 topView ().setHidden (true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	578 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	579 // OS.object_setClass (window.id, OS.objc_getClass("SWTWindow"));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	580 state &= ~HIDDEN;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	581 //TODO - get the content of the foreign window instead of creating it
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	582 super.createHandle ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	583 style \|= DWT.NO_BACKGROUND;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	584 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	585 window.setAcceptsMouseMovedEvents(true);
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	586 windowDelegate = cast(SWTWindowDelegate)(new SWTWindowDelegate()).alloc().init();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	587 window.setDelegate(windowDelegate);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	588 window.disableCursorRects();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	589 id id = window.fieldEditor (true, null);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	590 if (id !is null) {
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	591 OS.object_setClass (id.id, cast(objc.Class) OS.objc_getClass ("SWTEditorView"));
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	592 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	593 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	594
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	595 /*
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	596 * Feature in Cocoa. An NSWindow that is the child window of another NSWindow
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	597 * will track the movement of its parent window. The work around is to adjust
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	598 * the window's level.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	599 */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	600 void fixLevel() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	601 Shell topShell = this;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	602 while (topShell.parent !is null) {
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	603 if (topShell.parent !is null) topShell = cast(Shell) topShell.parent;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	604 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	605 Shell[] shells = display.getShells ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	606 for (int i = 0; i < shells.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	607 Shell shell = shells [i];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	608 if ((shell.style & DWT.ON_TOP) is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	609 int level = 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	610 Shell pShell = shell;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	611 while (pShell.parent !is null) {
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	612 pShell = cast(Shell) pShell.parent;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	613 level++;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	614 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	615 int newLevel = pShell is topShell ? level : 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	616 newLevel = Math.min (newLevel, OS.NSModalPanelWindowLevel - 1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	617 shell.window.setLevel (newLevel);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	618 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	619 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	620 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	621
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	622 void deregister () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	623 super.deregister ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	624 if (window !is null) display.removeWidget (window);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	625 if (windowDelegate !is null) display.removeWidget (windowDelegate);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	626 }
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 void destroyWidget () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	629 NSWindow window = this.window;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	630 Display display = this.display;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	631 releaseHandle ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	632 if (window !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	633 window.close();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	634 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	635 //If another shell is not going to become active, clear the menu bar.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	636 if (!display.isDisposed () && display.getShells ().length is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	637 display.setMenuBar (null);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	638 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	639 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	640
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	641 void drawWidget (objc.id id, NSRect rect) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	642 if (regionPath !is null && background is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	643 NSGraphicsContext context = NSGraphicsContext.currentContext();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	644 context.saveGraphicsState();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	645 NSColor.windowBackgroundColor().setFill();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	646 NSBezierPath.fillRect(rect);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	647 context.restoreGraphicsState();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	648 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	649 super.drawWidget (id, rect);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	650 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	651
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	652 Control findBackgroundControl () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	653 return background !is null \|\| backgroundImage !is null ? this : null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	654 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	655
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	656 Composite findDeferredControl () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	657 return layoutCount > 0 ? this : null;
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	660 Cursor findCursor () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	661 return cursor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	662 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	663
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	664 void fixShell (Shell newShell, Control control) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	665 if (this is newShell) return;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	666 if (control is lastActive) setActiveControl (null);
0 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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	669 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	670 * If the receiver is visible, moves it to the top of the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	671 * drawing order for the display on which it was created
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	672 * (so that all other shells on that display, which are not
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	673 * the receiver's children will be drawn behind it) and forces
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	674 * the window manager to make the shell active.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	675 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	676 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	677 * <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	678 * <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	679 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	680 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	681 * @since 2.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	682 * @see Control#moveAbove
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	683 * @see Control#setFocus
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	684 * @see Control#setVisible
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	685 * @see Display#getActiveShell
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	686 * @see Decorations#setDefaultButton(Button)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	687 * @see Shell#open
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	688 * @see Shell#setActive
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	689 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	690 public void forceActive () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	691 checkWidget ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	692 if (!isVisible()) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	693 if (window is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	694 window.makeKeyAndOrderFront (null);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	695 NSApplication application = NSApplication.sharedApplication ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	696 application.activateIgnoringOtherApps (true);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	697 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	698
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	699 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	700 * Returns the receiver's alpha value. The alpha value
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	701 * is between 0 (transparent) and 255 (opaque).
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	702 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	703 * @return the alpha value
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	704 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	705 * @exception DWTException <ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	706 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	707 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	708 * </ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	709 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	710 * @since 3.4
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	711 */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	712 public int getAlpha () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	713 checkWidget ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	714 // TODO: Should we support embedded frame alpha?
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	715 if (window is null) return 255;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	716 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	717
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	718 public Rectangle getBounds () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	719 checkWidget();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	720 NSRect frame = (window is null ? view.frame() : window.frame());
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	721 Carbon.CGFloat y = display.getPrimaryFrame().height - cast(int)(frame.y + frame.height);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	722 return new Rectangle (cast(int)frame.x, cast(int)y, cast(int)frame.width, cast(int)frame.height);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	723 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	724
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	725 public Rectangle getClientArea () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	726 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	727 //TODO why super implementation fails
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	728 if (window is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	729 // In embedded frames, the whole view is the client area.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	730 NSRect rect = view.frame();
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	731 int width = cast(int)rect.width, height = cast(int)rect.height;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	732 return new Rectangle (0, 0, width, height);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	733 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	734
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	735 NSRect rect = window.contentRectForFrameRect(window.frame());
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	736 int width = cast(int)rect.width, height = cast(int)rect.height;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	737 if (scrollView !is null) {
20 453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	738 NSSize size = NSSize();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	739 size.width = width;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	740 size.height = height;
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	741 size = NSScrollView.contentSizeForFrameSize(size, (style & DWT.H_SCROLL) !is 0, (style & DWT.V_SCROLL) !is 0, OS.NSNoBorder);
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	742 width = cast(int)size.width;
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	743 height = cast(int)size.height;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	744 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	745 return new Rectangle (0, 0, width, height);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	746 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	747
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	748 NSBezierPath getClipping() {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	749 return regionPath;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	750 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	751
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	752 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	753 * Returns <code>true</code> if the receiver is currently
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	754 * in fullscreen state, and false otherwise.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	755 * <p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	756 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	757 * @return the fullscreen state
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	758 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	759 * @exception DWTException <ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	760 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	761 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	762 * </ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	763 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	764 * @since 3.4
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	765 */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	766 public bool getFullScreen () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	767 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	768 return fullScreen;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	769 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	770
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	771 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	772 * Returns the receiver's input method editor mode. This
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	773 * will be the result of bitwise OR'ing together one or
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	774 * more of the following constants defined in class
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	775 * <code>DWT</code>:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	776 * <code>NONE</code>, <code>ROMAN</code>, <code>DBCS</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	777 * <code>PHONETIC</code>, <code>NATIVE</code>, <code>ALPHA</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	778 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	779 * @return the IME mode
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	780 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	781 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	782 * <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	783 * <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	784 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	785 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	786 * @see DWT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	787 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	788 public int getImeInputMode () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	789 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	790 return DWT.NONE;
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 public Point getLocation () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	794 checkWidget();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	795 // TODO: frame is relative to superview. What does getLocation mean in the embedded case?
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	796 NSRect frame = (window !is null ? window.frame() : view.frame());
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	797 Carbon.CGFloat y = display.getPrimaryFrame().height - cast(int)(frame.y + frame.height);
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	798 return new Point (cast(int)frame.x, cast(int)y);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	799 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	800
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	801 public bool getMaximized () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	802 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	803 //NOT DONE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	804 return !fullScreen && super.getMaximized ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	805 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	806
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	807 Shell getModalShell () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	808 Shell shell = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	809 Shell [] modalShells = display.modalShells;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	810 if (modalShells !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	811 int bits = DWT.APPLICATION_MODAL \| DWT.SYSTEM_MODAL;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	812 int index = modalShells.length;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	813 while (--index >= 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	814 Shell modal = modalShells [index];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	815 if (modal !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	816 if ((modal.style & bits) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	817 Control control = this;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	818 while (control !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	819 if (control is modal) break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	820 control = control.parent;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	821 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	822 if (control !is modal) return modal;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	823 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	824 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	825 if ((modal.style & DWT.PRIMARY_MODAL) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	826 if (shell is null) shell = getShell ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	827 if (modal.parent is shell) return modal;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	828 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	829 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	830 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	831 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	832 return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	833 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	834
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	835 public bool getMinimized () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	836 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	837 if (!getVisible ()) return super.getMinimized ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	838 // return OS.IsWindowCollapsed (shellHandle);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	839 return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	840 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	841
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 * Returns a point describing the minimum receiver's size. The
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	844 * x coordinate of the result is the minimum width of the receiver.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	845 * The y coordinate of the result is the minimum height of the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	846 * receiver.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	847 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	848 * @return the receiver's size
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 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	851 * <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	852 * <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	853 * </ul>
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 * @since 3.1
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	856 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	857 public Point getMinimumSize () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	858 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	859 // Rect rect = new Rect ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	860 // OS.GetWindowStructureWidths (shellHandle, rect);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	861 // CGPoint inMinLimits = new CGPoint (), inMaxLimits = new CGPoint ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	862 // OS.GetWindowResizeLimits (shellHandle, inMinLimits, inMaxLimits);
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	863 // int width = Math.max (1, cast(int) inMinLimits.x + (rect.left + rect.right));
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	864 // int height = Math.max (1, cast(int) inMinLimits.y + (rect.top + rect.bottom));
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	865 // return new Point (width, height);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	866 return null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	867 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	868
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	869 float [] getParentBackground () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	870 return null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	871 }
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 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	874 * Returns the region that defines the shape of the shell,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	875 * or null if the shell has the default shape.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	876 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	877 * @return the region that defines the shape of the shell (or null)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	878 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	879 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	880 * <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	881 * <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	882 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	883 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	884 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	885 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	886 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	887 public Region getRegion () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	888 /* This method is needed for the @since 3.0 Javadoc */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	889 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	890 return region;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	891 }
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 public Shell getShell () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	894 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	895 return this;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	896 }
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 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	899 * Returns an array containing all shells which are
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	900 * descendants of the receiver.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	901 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	902 * @return the dialog shells
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	903 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	904 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	905 * <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	906 * <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	907 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	908 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	909 public Shell [] getShells () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	910 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	911 int count = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	912 Shell [] shells = display.getShells ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	913 for (int i=0; i<shells.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	914 Control shell = shells [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	915 do {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	916 shell = shell.parent;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	917 } while (shell !is null && shell !is this);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	918 if (shell is this) count++;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	919 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	920 int index = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	921 Shell [] result = new Shell [count];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	922 for (int i=0; i<shells.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	923 Control shell = shells [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	924 do {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	925 shell = shell.parent;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	926 } while (shell !is null && shell !is this);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	927 if (shell is this) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	928 result [index++] = shells [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	929 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	930 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	931 return result;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	932 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	933
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	934 public Point getSize () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	935 checkWidget();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	936 NSRect frame = (window !is null ? window.frame() : view.frame());
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	937 return new Point (cast(int) frame.width, cast(int) frame.height);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	938 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	939
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	940 float getThemeAlpha () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	941 return 1;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	942 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	943
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	944 bool hasBorder () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	945 return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	946 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	947
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	948 void helpRequested(objc.id id, objc.SEL sel, objc.id theEvent) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	949 Control control = display.getFocusControl();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	950 while (control !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	951 if (control.hooks (DWT.Help)) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	952 control.postEvent (DWT.Help);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	953 break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	954 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	955 control = control.parent;
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 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	958
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	959 public bool isEnabled () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	960 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	961 return getEnabled ();
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	964 bool isEnabledCursor () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	965 return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	966 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	967
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	968 public bool isVisible () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	969 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	970 return getVisible ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	971 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	972
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	973 bool makeFirstResponder (objc.id id, objc.SEL sel, objc.id notification) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	974 if (display.focusControl is null) display.focusControl = display.getFocusControl ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	975 bool result = super.makeFirstResponder(id, sel, notification);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	976 if (result) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	977 Control newFocus = display.getFocusControl ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	978 if (newFocus !is null && newFocus !is display.focusControl) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	979 Control oldFocus = display.focusControl;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	980 display.focusControl = newFocus;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	981 if (oldFocus !is null && !oldFocus.isDisposed ()) oldFocus.sendFocusEvent (DWT.FocusOut, false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	982 if (newFocus !is null && !newFocus.isDisposed ()) newFocus.sendFocusEvent (DWT.FocusIn, false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	983 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	984 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	985 return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	986 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	987
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	988 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	989 * Moves the receiver to the top of the drawing order for
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	990 * the display on which it was created (so that all other
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	991 * shells on that display, which are not the receiver's
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	992 * children will be drawn behind it), marks it visible,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	993 * sets the focus and asks the window manager to make the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	994 * shell active.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	995 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	996 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	997 * <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	998 * <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	999 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1000 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1001 * @see Control#moveAbove
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1002 * @see Control#setFocus
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1003 * @see Control#setVisible
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1004 * @see Display#getActiveShell
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1005 * @see Decorations#setDefaultButton(Button)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1006 * @see Shell#setActive
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1007 * @see Shell#forceActive
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1008 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1009 public void open () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1010 checkWidget();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1011 int mask = DWT.PRIMARY_MODAL \| DWT.APPLICATION_MODAL \| DWT.SYSTEM_MODAL;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1012 if ((style & mask) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1013 display.setModalShell (this);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1014 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1015 updateModal ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1016 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1017 setWindowVisible (true, true);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1018 if (isDisposed ()) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1019 // if (active) {
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	1020 if (!restoreFocus () && !traverseGroup (true)) setFocus ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1021 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1022 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1023
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1024 public bool print (GC gc) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1025 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1026 if (gc 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	1027 if (gc.isDisposed ()) error (DWT.ERROR_INVALID_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1028 // int [] outImage = new int [1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1029 // CGRect outFrame = new CGRect ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1030 // if (OS.HIViewCreateOffscreenImage (handle, 0, outFrame, outImage) is OS.noErr) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1031 // int width = OS.CGImageGetWidth (outImage [0]);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1032 // int height = OS.CGImageGetHeight (outImage [0]);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1033 // CGRect rect = new CGRect();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1034 // rect.width = width;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1035 // rect.height = height;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1036 // //TODO - does not draw the browser (cocoa widgets?)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1037 // OS.HIViewDrawCGImage (gc.handle, rect, outImage [0]);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1038 // OS.CGImageRelease (outImage [0]);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1039 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1040 // return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1041 return false;
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
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1044 void register () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1045 super.register ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1046 if (window !is null) display.addWidget (window, this);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1047 if (windowDelegate !is null) display.addWidget (windowDelegate, this);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1048 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1049
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1050 void releaseChildren (bool destroy) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1051 Shell [] shells = getShells ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1052 for (int i=0; i<shells.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1053 Shell shell = shells [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1054 if (shell !is null && !shell.isDisposed ()) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1055 shell.dispose ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1056 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1057 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1058 super.releaseChildren (destroy);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1059 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1060
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1061 void releaseHandle () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1062 if (window !is null) window.setDelegate(null);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1063 if (windowDelegate !is null) windowDelegate.release();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1064 windowDelegate = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1065 super.releaseHandle ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1066 window = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1067 }
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 void releaseParent () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1070 /* Do nothing */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1071 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1072
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1073 void releaseWidget () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1074 super.releaseWidget ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1075 display.clearModal (this);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1076 // disposed = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1077 lastActive = null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1078 if (regionPath !is null) regionPath.release();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1079 regionPath = null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1080 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1081
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1082 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1083 * 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	1084 * be notified when operations are performed on the receiver.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1085 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1086 * @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	1087 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1088 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1089 * <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	1090 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1091 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1092 * <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	1093 * <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	1094 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1095 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1096 * @see ShellListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1097 * @see #addShellListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1098 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1099 public void removeShellListener(ShellListener listener) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1100 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1101 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	1102 if (eventTable is null) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1103 eventTable.unhook(DWT.Activate, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1104 eventTable.unhook(DWT.Close, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1105 eventTable.unhook(DWT.Deactivate, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1106 eventTable.unhook(DWT.Iconify,listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1107 eventTable.unhook(DWT.Deiconify,listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1108 }
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 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1111 * If the receiver is visible, moves it to the top of the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1112 * drawing order for the display on which it was created
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1113 * (so that all other shells on that display, which are not
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1114 * the receiver's children will be drawn behind it) and asks
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1115 * the window manager to make the shell active
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1116 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1117 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1118 * <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	1119 * <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	1120 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1121 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1122 * @since 2.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1123 * @see Control#moveAbove
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1124 * @see Control#setFocus
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1125 * @see Control#setVisible
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1126 * @see Display#getActiveShell
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1127 * @see Decorations#setDefaultButton(Button)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1128 * @see Shell#open
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1129 * @see Shell#setActive
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1130 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1131 public void setActive () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1132 if (window is null) return;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1133 checkWidget ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1134 if (!isVisible()) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1135 window.makeKeyAndOrderFront (null);
0 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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1138 void setActiveControl (Control control) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1139 if (control !is null && control.isDisposed ()) control = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1140 if (lastActive !is null && lastActive.isDisposed ()) lastActive = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1141 if (lastActive is control) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1142
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1143 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1144 * Compute the list of controls to be activated and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1145 * deactivated by finding the first common parent
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1146 * control.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1147 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1148 Control [] activate = (control is null) ? new Control[0] : control.getPath ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1149 Control [] deactivate = (lastActive is null) ? new Control[0] : lastActive.getPath ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1150 lastActive = control;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1151 int index = 0, length = Math.min (activate.length, deactivate.length);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1152 while (index < length) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1153 if (activate [index] !is deactivate [index]) break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1154 index++;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1155 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1156
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1157 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1158 * 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	1159 * code could have destroyed some of the widgets. If
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1160 * this happens, keep processing those widgets that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1161 * are not disposed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1162 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1163 for (int i=deactivate.length-1; i>=index; --i) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1164 if (!deactivate [i].isDisposed ()) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1165 deactivate [i].sendEvent (DWT.Deactivate);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1166 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1167 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1168 for (int i=activate.length-1; i>=index; --i) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1169 if (!activate [i].isDisposed ()) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1170 activate [i].sendEvent (DWT.Activate);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1171 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1172 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1173 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1174
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1175 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1176 * Sets the receiver's alpha value which must be
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1177 * between 0 (transparent) and 255 (opaque).
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1178 * <p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1179 * This operation requires the operating system's advanced
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1180 * widgets subsystem which may not be available on some
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1181 * platforms.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1182 * </p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1183 * @param alpha the alpha value
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1184 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1185 * @exception DWTException <ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1186 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1187 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1188 * </ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1189 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1190 * @since 3.4
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1191 */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1192 public void setAlpha (int alpha) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1193 if (window is null) return;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1194 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1195 alpha &= 0xFF;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1196 window.setAlphaValue (alpha / 255f);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1197 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1198
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1199 void setBounds (int x, int y, int width, int height, bool move, bool resize) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1200 // Embedded Shells are not resizable.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1201 if (window is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1202 if (fullScreen) setFullScreen (false);
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1203 int screenHeight = cast(int) display.getPrimaryFrame().height;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1204 NSRect frame = window.frame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1205 if (!move) {
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1206 x = cast(int)frame.x;
30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1207 y = screenHeight - cast(int)(frame.y + frame.height);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1208 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1209 if (!resize) {
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1210 width = cast(int)frame.width;
30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1211 height = cast(int)frame.height;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1212 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1213 frame.x = x;
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1214 frame.y = screenHeight - cast(int)(y + height);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1215 frame.width = width;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1216 frame.height = height;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1217 window.setFrame(frame, false);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1218 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1219
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1220 public void setEnabled (bool enabled) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1221 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1222 if (((state & DISABLED) is 0) is enabled) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1223 super.setEnabled (enabled);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1224 // if (enabled && OS.IsWindowActive (shellHandle)) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1225 // if (!restoreFocus ()) traverseGroup (false);
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
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1229 /**
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1230 * Sets the full screen state of the receiver.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1231 * If the argument is <code>true</code> causes the receiver
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1232 * to switch to the full screen state, and if the argument is
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1233 * <code>false</code> and the receiver was previously switched
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1234 * into full screen state, causes the receiver to switch back
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1235 * to either the maximmized or normal states.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1236 * <p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1237 * Note: The result of intermixing calls to <code>setFullScreen(true)</code>,
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1238 * <code>setMaximized(true)</code> and <code>setMinimized(true)</code> will
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1239 * vary by platform. Typically, the behavior will match the platform user's
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1240 * expectations, but not always. This should be avoided if possible.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1241 * </p>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1242 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1243 * @param fullScreen the new fullscreen state
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1244 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1245 * @exception DWTException <ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1246 * <li>ERROR_WIDGET_DISPOSED - if the receiver has been disposed</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1247 * <li>ERROR_THREAD_INVALID_ACCESS - if not called from the thread that created the receiver</li>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1248 * </ul>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1249 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1250 * @since 3.4
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1251 */
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1252 public void setFullScreen (bool fullScreen) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1253 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1254 this.fullScreen = fullScreen;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1255 // if (fullScreen) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1256 // normalBounds = getBounds ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1257 // OS.ChangeWindowAttributes (shellHandle, OS.kWindowNoTitleBarAttribute, OS.kWindowResizableAttribute \| OS.kWindowLiveResizeAttribute);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1258 // updateSystemUIMode ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1259 // Rectangle screen = getMonitor ().getBounds ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1260 // if (menuBar !is null && getMonitor ().equals(display.getPrimaryMonitor ())) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1261 // Rect rect = new Rect ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1262 // int gdevice = OS.GetMainDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1263 // OS.GetAvailableWindowPositioningBounds (gdevice, rect);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1264 // screen.height -= rect.top;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1265 // screen.y += rect.top;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1266 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1267 // Rect rect = new Rect ();
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1268 // OS.SetRect (rect, cast(short) screen.x, cast(short) screen.y, cast(short) (screen.x + screen.width), cast(short) (screen.y + screen.height));
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1269 // OS.SetWindowBounds (shellHandle, cast(short) OS.kWindowStructureRgn, rect);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1270 // } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1271 // int attributes = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1272 // if ((style & DWT.RESIZE) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1273 // attributes \|= OS.kWindowResizableAttribute;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1274 // /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1275 // * Bug in the Macintosh. For some reason, a window has no title bar
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1276 // * and the kWindowResizableAttribute, no rubber banding feedback is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1277 // * given while the window is resizing. The fix is to create the window
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1278 // * with kWindowLiveResizeAttribute in this case. This is inconsistent
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1279 // * with other windows, but the user will get feedback when resizing.
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 // if ((style & DWT.TITLE) is 0) attributes \|= OS.kWindowLiveResizeAttribute;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1282 // if (!OS.__BIG_ENDIAN__()) attributes \|= OS.kWindowLiveResizeAttribute;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1283 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1284 // OS.ChangeWindowAttributes (shellHandle, attributes, OS.kWindowNoTitleBarAttribute);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1285 // OS.SetSystemUIMode (OS.kUIModeNormal, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1286 // if (maximized) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1287 // setMaximized (true);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1288 // } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1289 // Rect rect = new Rect ();
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1290 // if (normalBounds !is null) OS.SetRect (rect, cast(short) normalBounds.x, cast(short) normalBounds.y, cast(short) (normalBounds.x + normalBounds.width), cast(short) (normalBounds.y + normalBounds.height));
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1291 // OS.SetWindowBounds (shellHandle, cast(short) OS.kWindowStructureRgn, rect);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1292 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1293 // normalBounds = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1294 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1295 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1296
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1297 public void setMenuBar (Menu menu) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1298 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1299 super.setMenuBar (menu);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1300 if (display.getActiveShell () is this) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1301 display.setMenuBar (menuBar);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1302 }
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1305 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1306 * Sets the input method editor mode to the argument which
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1307 * should be the result of bitwise OR'ing together one or more
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1308 * of the following constants defined in class <code>DWT</code>:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1309 * <code>NONE</code>, <code>ROMAN</code>, <code>DBCS</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1310 * <code>PHONETIC</code>, <code>NATIVE</code>, <code>ALPHA</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1311 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1312 * @param mode the new IME mode
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1313 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1314 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1315 * <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	1316 * <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	1317 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1318 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1319 * @see DWT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1320 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1321 public void setImeInputMode (int mode) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1322 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1323 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1324
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1325 public void setMaximized (bool maximized) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1326 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1327 super.setMaximized (maximized);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1328 // dwt.internal.carbon.Point pt = new dwt.internal.carbon.Point ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1329 // if (maximized) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1330 // Rect rect = new Rect ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1331 // int gdevice = OS.GetMainDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1332 // OS.GetAvailableWindowPositioningBounds (gdevice, rect);
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1333 // pt.h = cast(short) (rect.right - rect.left);
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1334 // pt.v = cast(short) (rect.bottom - rect.top);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1335 // }
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1336 // short inPartCode = cast(short) (maximized ? OS.inZoomOut : OS.inZoomIn);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1337 // OS.ZoomWindowIdeal (shellHandle, inPartCode, pt);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1338 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1339
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1340 public void setMinimized (bool minimized) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1341 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1342 if (this.minimized is minimized) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1343 super.setMinimized (minimized);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1344 // if (!minimized && OS.IsWindowCollapsed (shellHandle)) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1345 // OS.SelectWindow (shellHandle);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1346 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1347 // OS.CollapseWindow (shellHandle, minimized);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1348 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1349
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1350 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1351 * Sets the receiver's minimum size to the size specified by the arguments.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1352 * If the new minimum size is larger than the current size of the receiver,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1353 * the receiver is resized to the new minimum size.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1354 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1355 * @param width the new minimum width for the receiver
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1356 * @param height the new minimum height for the receiver
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1357 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1358 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1359 * <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	1360 * <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	1361 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1362 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1363 * @since 3.1
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1364 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1365 public void setMinimumSize (int width, int height) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1366 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1367 // int clientWidth = 0, clientHeight = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1368 // int trim = DWT.TITLE \| DWT.CLOSE \| DWT.MIN \| DWT.MAX;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1369 // if ((style & DWT.NO_TRIM) is 0 && (style & trim) !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1370 // clientWidth = DEFAULT_CLIENT_WIDTH;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1371 // clientHeight = DEFAULT_CLIENT_HEIGHT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1372 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1373 // Rect rect = new Rect ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1374 // OS.GetWindowStructureWidths (shellHandle, rect);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1375 // CGPoint inMinLimits = new CGPoint (), inMaxLimits = new CGPoint ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1376 // OS.GetWindowResizeLimits (shellHandle, inMinLimits, inMaxLimits);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1377 // width = Math.max (width, clientWidth + rect.left + rect.right);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1378 // height = Math.max (height, clientHeight + rect.top + rect.bottom);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1379 // inMinLimits.x = width - (rect.left + rect.right);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1380 // inMinLimits.y = height - (rect.top + rect.bottom);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1381 // OS.SetWindowResizeLimits (shellHandle, inMinLimits, inMaxLimits);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1382 // Point size = getSize ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1383 // int newWidth = Math.max (size.x, width), newHeight = Math.max (size.y, height);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1384 // if (newWidth !is size.x \|\| newHeight !is size.y) setSize (newWidth, newHeight);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1385 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1386
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1387 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1388 * Sets the receiver's minimum size to the size specified by the argument.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1389 * If the new minimum size is larger than the current size of the receiver,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1390 * the receiver is resized to the new minimum size.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1391 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1392 * @param size the new minimum size for the receiver
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1393 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1394 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1395 * <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	1396 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1397 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1398 * <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	1399 * <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	1400 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1401 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1402 * @since 3.1
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1403 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1404 public void setMinimumSize (Point size) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1405 checkWidget();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1406 if (size 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	1407 setMinimumSize (size.x, size.y);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1408 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1409
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1410 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1411 * Sets the shape of the shell to the region specified
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1412 * by the argument. When the argument is null, the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1413 * default shape of the shell is restored. The shell
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1414 * must be created with the style DWT.NO_TRIM in order
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1415 * to specify a region.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1416 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1417 * @param region the region that defines the shape of the shell (or null)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1418 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1419 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1420 * <li>ERROR_INVALID_ARGUMENT - if the region has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1421 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1422 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1423 * <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	1424 * <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	1425 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1426 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1427 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1428 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1429 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1430 public void setRegion (Region region) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1431 checkWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1432 if ((style & DWT.NO_TRIM) is 0) return;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1433 if (window is null) return;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1434 if (region !is null && region.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1435 this.region = region;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1436 if (regionPath !is null) regionPath.release();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1437 regionPath = getPath(region);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1438 if (region !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1439 window.setBackgroundColor(NSColor.clearColor());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1440 window.setOpaque(false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1441 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1442 window.setBackgroundColor(NSColor.windowBackgroundColor());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1443 window.setOpaque(true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1444 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1445 window.contentView().setNeedsDisplay(true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1446 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1447
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1448 NSBezierPath getPath(Region region) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1449 if (region is null) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1450 NSBezierPath path = NSBezierPath.bezierPath();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1451 path.retain();
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	1452 OS.QDRegionToRects(region.handle, OS.kQDParseRegionFromTopLeft, cast(Carbon.RegionToRectsUPP) &regionToRects, path.id);
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1453 if (path.isEmpty()) path.appendBezierPathWithRect(NSRect());
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1454 return path;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1455 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1456
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	1457 extern (C) static Carbon.OSStatus regionToRects(ushort message, Carbon.RgnHandle rgn, Carbon.Rect* r, objc.id path) {
46 cfa563df4fdd Updated Widget and Display to 3.514 Jacob Carlborg <doob@me.com> parents: 45 diff changeset	1458 NSPoint pt = NSPoint();
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	1459 Carbon.Rect rect;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1460 if (message is OS.kQDRegionToRectsMsgParse) {
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	1461 OS.memmove(&rect, r, rect.sizeof * 2);
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1462 pt.x = rect.left;
30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1463 pt.y = rect.top;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1464 OS.objc_msgSend(path, OS.sel_moveToPoint_, pt);
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1465 pt.x = rect.right;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1466 OS.objc_msgSend(path, OS.sel_lineToPoint_, pt);
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1467 pt.x = rect.right;
30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1468 pt.y = rect.bottom;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1469 OS.objc_msgSend(path, OS.sel_lineToPoint_, pt);
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1470 pt.x = rect.left;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1471 OS.objc_msgSend(path, OS.sel_lineToPoint_, pt);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1472 OS.objc_msgSend(path, OS.sel_closePath);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1473 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1474 return 0;
0 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
20 453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	1477 public void setText (String str) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1478 checkWidget();
60 62202ce0039f Updated and fixed many modules to 3.514 Jacob Carlborg <doob@me.com> parents: 50 diff changeset	1479 //if (str is null) error (DWT.ERROR_NULL_ARGUMENT);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1480 if (window is null) return;
20 453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	1481 NSString nsStr = NSString.stringWith(str);
453387bb0706 Ported dwt.widgets.Shell Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	1482 window.setTitle(nsStr);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1483 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1484
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1485 public void setVisible (bool visible) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1486 checkWidget();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1487 int mask = DWT.PRIMARY_MODAL \| DWT.APPLICATION_MODAL \| DWT.SYSTEM_MODAL;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1488 if ((style & mask) !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1489 if (visible) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1490 display.setModalShell (this);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1491 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1492 display.clearModal (this);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1493 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1494 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1495 updateModal ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1496 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1497 if (window is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1498 super.setVisible(visible);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1499 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1500 setWindowVisible (visible, false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1501 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1502 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1503
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1504 void setWindowVisible (bool visible, bool key) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1505 if (visible) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1506 if ((state & HIDDEN) is 0) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1507 state &= ~HIDDEN;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1508 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1509 if ((state & HIDDEN) !is 0) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1510 state \|= HIDDEN;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1511 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1512 if (window !is null && (window.isVisible() is visible)) return;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1513 if (visible) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1514 sendEvent (DWT.Show);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1515 if (isDisposed ()) return;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1516 topView ().setHidden (false);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1517 if (key) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1518 window.makeKeyAndOrderFront (null);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1519 } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1520 window.orderFront (null);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1521 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1522 opened = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1523 if (!moved) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1524 moved = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1525 sendEvent (DWT.Move);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1526 if (isDisposed ()) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1527 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1528 if (!resized) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1529 resized = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1530 sendEvent (DWT.Resize);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1531 if (isDisposed ()) return;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	1532 if (layout_ !is null) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1533 markLayout (false, false);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1534 updateLayout (false);
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 } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1538 window.orderOut (null);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1539 topView ().setHidden (true);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1540 sendEvent (DWT.Hide);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1541 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1542 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1543
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1544 void setZOrder () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1545 if (scrollView !is null) scrollView.setDocumentView (view);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1546 if (window is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1547 window.setContentView (scrollView !is null ? scrollView : view);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1548 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1549
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1550 void setZOrder (Control control, bool above) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1551 // if (above) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1552 // //NOT DONE - move one window above another
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1553 // OS.BringToFront (shellHandle);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1554 // } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1555 // int window = control is null ? 0 : OS.GetControlOwner (control.handle);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1556 // OS.SendBehind (shellHandle, window);
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 bool traverseEscape () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1561 if (parent is null) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1562 if (!isVisible () \|\| !isEnabled ()) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1563 close ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1564 return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1565 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1566
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1567 void updateModal () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1568 // do nothing
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1569 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1570
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1571 void updateSystemUIMode () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1572 if (!getMonitor ().equals (display.getPrimaryMonitor ())) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1573 bool isActive = false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1574 Shell activeShell = display.getActiveShell ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1575 Shell current = this;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1576 while (current !is null) {
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	1577 if (current.opEquals (activeShell)) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1578 isActive = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1579 break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1580 }
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1581 current = cast(Shell) current.parent;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1582 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1583 if (!isActive) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1584 // if (fullScreen) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1585 // int mode = OS.kUIModeAllHidden;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1586 // if (menuBar !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1587 // mode = OS.kUIModeContentHidden;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1588 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1589 // OS.SetSystemUIMode (mode, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1590 // } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1591 // OS.SetSystemUIMode (OS.kUIModeNormal, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1592 // }
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
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1595 void windowDidBecomeKey(objc.id id, objc.SEL sel, objc.id notification) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1596 super.windowDidBecomeKey(id, sel, notification);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1597 Display display = this.display;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1598 display.setMenuBar (menuBar);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1599 sendEvent (DWT.Activate);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1600 fixLevel();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1601 // if (!isDisposed ()) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1602 // if (!restoreFocus () && !traverseGroup (true)) setFocus ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1603 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1604 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1605
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1606 void windowDidMove(objc.id id, objc.SEL sel, objc.id notification) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1607 moved = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1608 sendEvent(DWT.Move);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1609 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1610
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1611 void windowDidResize(objc.id id, objc.SEL sel, objc.id notification) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1612 resized = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1613 sendEvent (DWT.Resize);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1614 if (isDisposed ()) return;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 20 diff changeset	1615 if (layout_ !is null) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1616 markLayout (false, false);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1617 updateLayout (false);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1618 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1619 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1620
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1621 void windowDidResignKey(objc.id id, objc.SEL sel, objc.id notification) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1622 super.windowDidResignKey(id, sel, notification);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 37 diff changeset	1623 // Display display = this.display;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1624 sendEvent (DWT.Deactivate);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1625 if (isDisposed ()) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1626 // saveFocus ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1627 // if (savedFocus !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1628 // /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1629 // * Bug in the Macintosh. When ClearKeyboardFocus() is called,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1630 // * the control that has focus gets two kEventControlSetFocus
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1631 // * events indicating that focus was lost. The fix is to ignore
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1632 // * both of these and send the focus lost event explicitly.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1633 // */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1634 // display.ignoreFocus = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1635 // OS.ClearKeyboardFocus (shellHandle);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1636 // display.ignoreFocus = false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1637 // if (!savedFocus.isDisposed ()) savedFocus.sendFocusEvent (DWT.FocusOut, false);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1638 // }
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
50 30adfb32d4be Updated Shell to 3.514 Jacob Carlborg <doob@me.com> parents: 46 diff changeset	1641 bool windowShouldClose(objc.id id, objc.SEL sel, objc.id window) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1642 closeWidget ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1643 return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1644 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1645
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1646 }

Mercurial > projects > dwt-mac

annotate dwt/widgets/Shell.d @ 60:62202ce0039f