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

annotate dwt/widgets/Display.d @ 45:d8635bb48c7c

Merge with SWT 3.5

author	Jacob Carlborg <doob@me.com>
date	Mon, 01 Dec 2008 17:07:00 +0100
parents	198549365851
children	cfa563df4fdd

rev	line source
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1 /*******************************************************************************
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 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
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	10 *
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	11 * Port to the D programming language:
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 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.Display;
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.DWTError;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	18 import dwt.DWTException;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	19 import dwt.graphics.Color;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	20 import dwt.graphics.Cursor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	21 import dwt.graphics.Device;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	22 import dwt.graphics.DeviceData;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	23 import dwt.graphics.GCData;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	24 import dwt.graphics.Image;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	25 import dwt.graphics.Point;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	26 import dwt.graphics.Rectangle;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	27 import dwt.internal.C;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	28 import dwt.internal.cocoa.CGPoint;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	29 import dwt.internal.cocoa.NSApplication;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	30 import dwt.internal.cocoa.NSArray;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	31 import dwt.internal.cocoa.NSAutoreleasePool;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	32 import dwt.internal.cocoa.NSBundle;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	33 import dwt.internal.cocoa.NSButton;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	34 import dwt.internal.cocoa.NSColor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	35 import dwt.internal.cocoa.NSColorSpace;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	36 import dwt.internal.cocoa.NSComboBox;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	37 import dwt.internal.cocoa.NSDate;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	38 import dwt.internal.cocoa.NSDictionary;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	39 import dwt.internal.cocoa.NSEvent;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	40 import dwt.internal.cocoa.NSGraphicsContext;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	41 import dwt.internal.cocoa.NSImage;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	42 import dwt.internal.cocoa.NSImageView;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	43 import dwt.internal.cocoa.NSMenu;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	44 import dwt.internal.cocoa.NSMenuItem;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	45 import dwt.internal.cocoa.NSMutableDictionary;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	46 import dwt.internal.cocoa.NSNumber;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	47 import dwt.internal.cocoa.NSObject;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	48 import dwt.internal.cocoa.NSPoint;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	49 import dwt.internal.cocoa.NSPopUpButton;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	50 import dwt.internal.cocoa.NSRange;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	51 import dwt.internal.cocoa.NSRect;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	52 import dwt.internal.cocoa.NSResponder;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	53 import dwt.internal.cocoa.NSRunLoop;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	54 import dwt.internal.cocoa.NSScreen;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	55 import dwt.internal.cocoa.NSSearchField;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	56 import dwt.internal.cocoa.NSSize;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	57 import dwt.internal.cocoa.NSSlider;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	58 import dwt.internal.cocoa.NSStepper;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	59 import dwt.internal.cocoa.NSString;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	60 import dwt.internal.cocoa.NSTextField;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	61 import dwt.internal.cocoa.NSTextView;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	62 import dwt.internal.cocoa.NSThread;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	63 import dwt.internal.cocoa.NSTimer;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	64 import dwt.internal.cocoa.NSView;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	65 import dwt.internal.cocoa.NSWindow;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	66 import dwt.internal.cocoa.NSWorkspace;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	67 import dwt.internal.cocoa.OS;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	68 import dwt.internal.cocoa.SWTApplicationDelegate;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	69 import dwt.internal.cocoa.SWTWindowDelegate;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	70 import dwt.internal.cocoa.id;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	71 import dwt.internal.cocoa.objc_super;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	72
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	73 import tango.core.Thread;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	74
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	75 import dwt.dwthelper.Runnable;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	76 import dwt.dwthelper.System;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	77 import dwt.dwthelper.utils;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	78
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	79 import dwt.internal.c.carboncore.MacTypes;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	80 import dwt.internal.cocoa.NSInteger;
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	81 import objc = dwt.internal.objc.runtime;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	82
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	83 import dwt.widgets.Caret;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	84 import dwt.widgets.ColorDialog;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	85 import dwt.widgets.Control;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	86 import dwt.widgets.Dialog;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	87 import dwt.widgets.Event;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	88 import dwt.widgets.EventTable;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	89 import dwt.widgets.FontDialog;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	90 import dwt.widgets.Listener;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	91 import dwt.widgets.Menu;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	92 import dwt.widgets.MenuItem;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	93 import dwt.widgets.Monitor;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	94 import dwt.widgets.Shell;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	95 import dwt.widgets.Synchronizer;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	96 import dwt.widgets.Tray;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	97 import dwt.widgets.Widget;
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	98
38 198549365851 Fixed all the runtime errors, hello world app "works" Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 37 diff changeset	99 //import mambo.io;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	100
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	101 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	102 * Instances of this class are responsible for managing the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	103 * connection between DWT and the underlying operating
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	104 * system. Their most important function is to implement
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	105 * the DWT event loop in terms of the platform event model.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	106 * They also provide various methods for accessing information
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	107 * about the operating system, and have overall control over
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	108 * the operating system resources which DWT allocates.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	109 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	110 * Applications which are built with DWT will <em>almost always</em>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	111 * require only a single display. In particular, some platforms
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	112 * which DWT supports will not allow more than one <em>active</em>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	113 * display. In other words, some platforms do not support
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	114 * creating a new display if one already exists that has not been
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	115 * sent the <code>dispose()</code> message.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	116 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	117 * In DWT, the thread which creates a <code>Display</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	118 * instance is distinguished as the <em>user-interface thread</em>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	119 * for that display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	120 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	121 * The user-interface thread for a particular display has the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	122 * following special attributes:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	123 * <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	124 * <li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	125 * The event loop for that display must be run from the thread.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	126 * </li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	127 * <li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	128 * Some DWT API methods (notably, most of the public methods in
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	129 * <code>Widget</code> and its subclasses), may only be called
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	130 * from the thread. (To support multi-threaded user-interface
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	131 * applications, class <code>Display</code> provides inter-thread
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	132 * communication methods which allow threads other than the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	133 * user-interface thread to request that it perform operations
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	134 * on their behalf.)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	135 * </li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	136 * <li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	137 * The thread is not allowed to construct other
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	138 * <code>Display</code>s until that display has been disposed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	139 * (Note that, this is in addition to the restriction mentioned
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	140 * above concerning platform support for multiple displays. Thus,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	141 * the only way to have multiple simultaneously active displays,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	142 * even on platforms which support it, is to have multiple threads.)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	143 * </li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	144 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	145 * Enforcing these attributes allows DWT to be implemented directly
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	146 * on the underlying operating system's event model. This has
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	147 * numerous benefits including smaller footprint, better use of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	148 * resources, safer memory management, clearer program logic,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	149 * better performance, and fewer overall operating system threads
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	150 * required. The down side however, is that care must be taken
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	151 * (only) when constructing multi-threaded applications to use the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	152 * inter-thread communication mechanisms which this class provides
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	153 * when required.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	154 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	155 * All DWT API methods which may only be called from the user-interface
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	156 * thread are distinguished in their documentation by indicating that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	157 * they throw the "<code>ERROR_THREAD_INVALID_ACCESS</code>"
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	158 * DWT exception.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	159 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	160 * <dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	161 * <dt><b>Styles:</b></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	162 * <dd>(none)</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	163 * <dt><b>Events:</b></dt>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	164 * <dd>Close, Dispose, Settings</dd>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	165 * </dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	166 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	167 * IMPORTANT: This class is <em>not</em> intended to be subclassed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	168 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	169 * @see #syncExec
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	170 * @see #asyncExec
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	171 * @see #wake
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	172 * @see #readAndDispatch
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	173 * @see #sleep
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	174 * @see Device#dispose
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	175 * @see <a href="http://www.eclipse.org/swt/snippets/#display">Display snippets</a>
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	176 * @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	177 */
3 649b8e223d5a fix extends Frank Benoit <benoit@tionex.de> parents: 0 diff changeset	178 public class Display : Device {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	179
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	180 /* Windows and Events */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	181 Event [] eventQueue;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	182 EventTable eventTable, filterTable;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	183 bool disposing;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	184
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	185 /* Sync/Async Widget Communication */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	186 Synchronizer synchronizer;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	187 Thread thread;
36 db5a898b2119 Fixed a lot of compile errors Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	188 bool allowTimers, runAsyncMessages_;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	189
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	190 NSGraphicsContext[] contexts;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	191
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	192 Caret currentCaret;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	193
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	194 bool dragging;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	195 Control currentControl, grabControl, trackingControl;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	196
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	197 NSDictionary markedAttributes;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	198
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	199 Shell [] modalShells;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	200
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	201 Menu menuBar;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	202 Menu[] menus, popups;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	203
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	204 NSApplication application;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	205 int /long/ applicationClass;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	206 NSImage dockImage;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	207 bool isEmbedded;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	208
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	209 Control focusControl;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	210
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	211 NSWindow screenWindow;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	212 NSAutoreleasePool pool;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	213 int loopCounter = 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	214 bool idle;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	215 static final short DWT_IDLE_TYPE = 1;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	216
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	217 int[] screenID = new int[32];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	218 NSPoint[] screenCascade = new NSPoint[32];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	219 static Callback dialogCallback3;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	220 static Callback applicationCallback2, applicationCallback3, applicationCallback6;
0 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 /* Menus */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	223 // Menu menuBar;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	224 // static final int ID_TEMPORARY = 1000;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	225 // static final int ID_START = 1001;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	226
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	227 /* Display Shutdown */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	228 Runnable [] disposeList;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	229
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	230 /* System Tray */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	231 Tray tray;
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 /* System Resources */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	234 Image errorImage, infoImage, warningImage;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	235 Cursor [] cursors;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	236
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	237 /* Key Mappings. */
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	238 static int [] [] KeyTable = [
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	239
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	240 /* Keyboard and Mouse Masks */
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	241 {58, DWT.ALT},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	242 {56, DWT.SHIFT},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	243 {59, DWT.CONTROL},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	244 {55, DWT.COMMAND},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	245 {61, DWT.ALT},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	246 {62, DWT.CONTROL},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	247 {60, DWT.SHIFT},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	248 {54, DWT.COMMAND},
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	249
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	250 /* Non-Numeric Keypad Keys */
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	251 {126, DWT.ARROW_UP},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	252 {125, DWT.ARROW_DOWN},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	253 {123, DWT.ARROW_LEFT},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	254 {124, DWT.ARROW_RIGHT},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	255 {116, DWT.PAGE_UP},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	256 {121, DWT.PAGE_DOWN},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	257 {115, DWT.HOME},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	258 {119, DWT.END},
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	259 // [??, DWT.INSERT],
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	260
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	261 /* Virtual and Ascii Keys */
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	262 {51, DWT.BS},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	263 {36, DWT.CR},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	264 {117, DWT.DEL},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	265 {53, DWT.ESC},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	266 {76, DWT.LF},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	267 {48, DWT.TAB},
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	268
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	269 /* Functions Keys */
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	270 {122, DWT.F1},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	271 {120, DWT.F2},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	272 {99, DWT.F3},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	273 {118, DWT.F4},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	274 {96, DWT.F5},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	275 {97, DWT.F6},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	276 {98, DWT.F7},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	277 {100, DWT.F8},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	278 {101, DWT.F9},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	279 {109, DWT.F10},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	280 {103, DWT.F11},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	281 {111, DWT.F12},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	282 {105, DWT.F13},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	283 {107, DWT.F14},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	284 {113, DWT.F15},
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	285
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	286 /* Numeric Keypad Keys */
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	287 {67, DWT.KEYPAD_MULTIPLY},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	288 {69, DWT.KEYPAD_ADD},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	289 {76, DWT.KEYPAD_CR},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	290 {78, DWT.KEYPAD_SUBTRACT},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	291 {65, DWT.KEYPAD_DECIMAL},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	292 {75, DWT.KEYPAD_DIVIDE},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	293 {82, DWT.KEYPAD_0},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	294 {83, DWT.KEYPAD_1},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	295 {84, DWT.KEYPAD_2},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	296 {85, DWT.KEYPAD_3},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	297 {86, DWT.KEYPAD_4},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	298 {87, DWT.KEYPAD_5},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	299 {88, DWT.KEYPAD_6},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	300 {89, DWT.KEYPAD_7},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	301 {91, DWT.KEYPAD_8},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	302 {92, DWT.KEYPAD_9},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	303 {81, DWT.KEYPAD_EQUAL},
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	304
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	305 /* Other keys */
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	306 {57, DWT.CAPS_LOCK},
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	307 {71, DWT.NUM_LOCK},
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	308 // [??, DWT.SCROLL_LOCK],
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	309 // [??, DWT.PAUSE],
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	310 // [??, DWT.BREAK],
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	311 // [??, DWT.PRINT_SCREEN],
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	312 {114, DWT.HELP},
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	313
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	314 ];
0 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 static String APP_NAME = "DWT";
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	317 static const String ADD_WIDGET_KEY = "dwt.internal.addWidget";
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	318 static const String DWT_OBJECT = "DWT_OBJECT"; //$NON-NLS-1$
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	319
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	320 /* Multiple Displays. */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	321 static Display Default;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	322 static Display [] Displays;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	323
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	324 /* Package Name */
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	325 static const String PACKAGE_PREFIX = "dwt.widgets.";
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	326
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	327 /* Timer */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	328 Runnable timerList [];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	329 NSTimer nsTimers [];
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	330 SWTWindowDelegate timerDelegate;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	331 SWTApplicationDelegate applicationDelegate;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	332
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	333 /* Display Data */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	334 Object data;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	335 String [] keys;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	336 Object [] values;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	337
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	338 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	339 * TEMPORARY CODE. Install the runnable that
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	340 * gets the current display. This code will
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	341 * be removed in the future.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	342 */
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	343 static this () {
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	344 DeviceFinder = new class Runnable {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	345 public void run () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	346 Device device = getCurrent ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	347 if (device is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	348 device = getDefault ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	349 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	350 setDevice (device);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	351 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	352 };
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	353 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	354
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	355 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	356 * TEMPORARY CODE.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	357 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	358 static void setDevice (Device device) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	359 CurrentDevice = device;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	360 }
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 static byte [] ascii (String name) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	363 int length = name.length ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	364 char [] chars = new char [length];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	365 name.getChars (0, length, chars, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	366 byte [] buffer = new byte [length + 1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	367 for (int i=0; i<length; i++) {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	368 buffer [i] = cast(byte) chars [i];
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	369 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	370 return buffer;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	371 }
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 static int translateKey (int key) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	374 for (int i=0; i<KeyTable.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	375 if (KeyTable [i] [0] is key) return KeyTable [i] [1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	376 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	377 return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	378 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	379
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	380 static int untranslateKey (int key) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	381 for (int i=0; i<KeyTable.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	382 if (KeyTable [i] [1] is key) return KeyTable [i] [0];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	383 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	384 return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	385 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	386
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	387 void addContext (NSGraphicsContext context) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	388 if (contexts is null) contexts = new NSGraphicsContext [12];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	389 for (int i=0; i<contexts.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	390 if (contexts[i] !is null && contexts [i].id is context.id) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	391 contexts [i] = context;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	392 return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	393 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	394 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	395 NSGraphicsContext [] newContexts = new NSGraphicsContext [contexts.length + 12];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	396 newContexts [contexts.length] = context;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	397 System.arraycopy (contexts, 0, newContexts, 0, contexts.length);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	398 contexts = newContexts;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	399 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	400
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	401 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	402 * 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	403 * be notified when an event of the given type occurs anywhere
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	404 * in a widget. The event type is one of the event constants
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	405 * defined in class <code>DWT</code>. When the event does occur,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	406 * the listener is notified by sending it the <code>handleEvent()</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	407 * message.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	408 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	409 * Setting the type of an event to <code>DWT.None</code> from
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	410 * within the <code>handleEvent()</code> method can be used to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	411 * change the event type and stop subsequent Java listeners
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	412 * from running. Because event filters run before other listeners,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	413 * event filters can both block other listeners and set arbitrary
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	414 * fields within an event. For this reason, event filters are both
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	415 * powerful and dangerous. They should generally be avoided for
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	416 * performance, debugging and code maintenance reasons.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	417 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	418 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	419 * @param eventType the type of event to listen for
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	420 * @param listener the listener which should be notified when the event occurs
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	421 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	422 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	423 * <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	424 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	425 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	426 * <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	427 * <li>ERROR_DEVICE_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	428 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	429 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	430 * @see Listener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	431 * @see DWT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	432 * @see #removeFilter
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	433 * @see #removeListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	434 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	435 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	436 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	437 public void addFilter (int eventType, Listener listener) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	438 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	439 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	440 if (filterTable is null) filterTable = new EventTable ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	441 filterTable.hook (eventType, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	442 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	443
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	444 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	445 * 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	446 * be notified when an event of the given type occurs. The event
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	447 * type is one of the event 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	448 * When the event does occur in the display, the listener is notified by
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	449 * sending it the <code>handleEvent()</code> message.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	450 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	451 * @param eventType the type of event to listen for
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	452 * @param listener the listener which should be notified when the event occurs
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 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	455 * <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	456 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	457 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	458 * <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	459 * <li>ERROR_DEVICE_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	460 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	461 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	462 * @see Listener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	463 * @see DWT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	464 * @see #removeListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	465 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	466 * @since 2.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	467 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	468 public void addListener (int eventType, Listener listener) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	469 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	470 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	471 if (eventTable is null) eventTable = new EventTable ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	472 eventTable.hook (eventType, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	473 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	474
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	475 void addMenu (Menu menu) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	476 if (menus is null) menus = new Menu [12];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	477 for (int i=0; i<menus.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	478 if (menus [i] is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	479 menus [i] = menu;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	480 return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	481 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	482 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	483 Menu [] newMenus = new Menu [menus.length + 12];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	484 newMenus [menus.length] = menu;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	485 System.arraycopy (menus, 0, newMenus, 0, menus.length);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	486 menus = newMenus;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	487 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	488
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	489 void addPopup (Menu menu) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	490 if (popups is null) popups = new Menu [4];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	491 int length = popups.length;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	492 for (int i=0; i<length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	493 if (popups [i] is menu) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	494 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	495 int index = 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	496 while (index < length) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	497 if (popups [index] is null) break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	498 index++;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	499 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	500 if (index is length) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	501 Menu [] newPopups = new Menu [length + 4];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	502 System.arraycopy (popups, 0, newPopups, 0, length);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	503 popups = newPopups;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	504 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	505 popups [index] = menu;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	506 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	507
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	508 void addWidget (NSObject view, Widget widget) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	509 if (view is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	510 OS.object_setInstanceVariable (view.id, DWT_OBJECT, widget.jniRef);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	511 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	512
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	513 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	514 * Causes the <code>run()</code> method of the runnable to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	515 * be invoked by the user-interface thread at the next
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	516 * reasonable opportunity. The caller of this method continues
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	517 * to run in parallel, and is not notified when the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	518 * runnable has completed. Specifying <code>null</code> as the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	519 * runnable simply wakes the user-interface thread when run.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	520 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	521 * Note that at the time the runnable is invoked, widgets
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	522 * that have the receiver as their display may have been
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	523 * disposed. Therefore, it is necessary to check for this
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	524 * case inside the runnable before accessing the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	525 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	526 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	527 * @param runnable code to run on the user-interface thread or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	528 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	529 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	530 * <li>ERROR_DEVICE_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	531 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	532 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	533 * @see #syncExec
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	534 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	535 public void asyncExec (Runnable runnable) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	536 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	537 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	538 synchronizer.asyncExec (runnable);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	539 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	540 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	541
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	542 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	543 * Causes the system hardware to emit a short sound
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	544 * (if it supports this capability).
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	545 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	546 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	547 * <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	548 * <li>ERROR_DEVICE_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	549 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	550 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	551 public void beep () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	552 checkDevice ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	553 OS.NSBeep ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	554 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	555
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	556 void cascadeWindow (NSWindow window, NSScreen screen) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	557 NSDictionary dictionary = screen.deviceDescription();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	558 int screenNumber = new NSNumber(dictionary.objectForKey(NSString.stringWith("NSScreenNumber")).id).intValue();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	559 int index = 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	560 while (screenID[index] !is 0 && screenID[index] !is screenNumber) index++;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	561 screenID[index] = screenNumber;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	562 NSPoint cascade = screenCascade[index];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	563 if (cascade is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	564 NSRect frame = screen.frame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	565 cascade = new NSPoint();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	566 cascade.x = frame.x;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	567 cascade.y = frame.y + frame.height;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	568 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	569 screenCascade[index] = window.cascadeTopLeftFromPoint(cascade);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	570 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	571
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	572 protected void checkDevice () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	573 if (thread is null) error (DWT.ERROR_WIDGET_DISPOSED);
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	574 if (thread !is Thread.getThis ()) error (DWT.ERROR_THREAD_INVALID_ACCESS);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	575 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	576 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	577
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	578 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	579 * Checks that this class can be subclassed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	580 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	581 * IMPORTANT: See the comment in <code>Widget.checkSubclass()</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	582 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	583 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	584 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	585 * <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	586 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	587 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	588 * @see Widget#checkSubclass
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	589 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	590 protected void checkSubclass () {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	591 if (!Display.isValidClass (this.classinfo)) error (DWT.ERROR_INVALID_SUBCLASS);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	592 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	593
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	594 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	595 * Constructs a new instance of this class.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	596 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	597 * Note: The resulting display is marked as the <em>current</em>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	598 * display. If this is the first display which has been
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	599 * constructed since the application started, it is also
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	600 * marked as the <em>default</em> display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	601 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	602 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	603 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	604 * <li>ERROR_THREAD_INVALID_ACCESS - if called from a thread that already created an existing display</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	605 * <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	606 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	607 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	608 * @see #getCurrent
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	609 * @see #getDefault
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	610 * @see Widget#checkSubclass
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	611 * @see Shell
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	612 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	613 public this () {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	614 this (null);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	615 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	616
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	617 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	618 * Constructs a new instance of this class using the parameter.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	619 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	620 * @param data the device data
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	621 */
5 1a8b3cb347e0 Fix Ctors to 'this' Frank Benoit <benoit@tionex.de> parents: 3 diff changeset	622 public this (DeviceData data) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	623 super (data);
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	624 cursors = new Cursor [DWT.CURSOR_HAND + 1];
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	625 Displays = new Display [4];
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	626 timerDelegate = cast(SWTWindowDelegate)(new SWTWindowDelegate()).alloc().init();
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	627
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	628 caretTimer = new class(currentCaret) Runnable {
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	629 Caret currentCaret;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	630
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	631 this (Caret currentCaret)
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	632 {
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	633 this.currentCaret = currentCaret;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	634 }
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	635
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	636 public void run () {
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	637 if (currentCaret !is null) {
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	638 if (currentCaret is null \|\| currentCaret.isDisposed()) return;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	639 if (currentCaret.blinkCaret ()) {
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	640 int blinkRate = currentCaret.blinkRate;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	641 if (blinkRate !is 0) timerExec (blinkRate, this);
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	642 } else {
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	643 currentCaret = null;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	644 }
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	645 }
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	646
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	647 }
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	648 };
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	649 }
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 static void checkDisplay (Thread thread, bool multiple) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	652 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	653 for (int i=0; i<Displays.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	654 if (Displays [i] !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	655 if (!multiple) DWT.error (DWT.ERROR_NOT_IMPLEMENTED, null, " [multiple displays]");
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	656 if (Displays [i].thread is thread) DWT.error (DWT.ERROR_THREAD_INVALID_ACCESS);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	657 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	658 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	659 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	660 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	661
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	662 static String convertToLf(String text) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	663 char Cr = '\r';
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	664 char Lf = '\n';
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	665 int length = text.length ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	666 if (length is 0) return text;
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 /* Check for an LF or CR/LF. Assume the rest of the string
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	669 * is formated that way. This will not work if the string
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	670 * contains mixed delimiters. */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	671 int i = text.indexOf (Lf, 0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	672 if (i is -1 \|\| i is 0) return text;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	673 if (text.charAt (i - 1) !is Cr) return text;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	674
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	675 /* The string is formatted with CR/LF.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	676 * Create a new string with the LF line delimiter. */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	677 i = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	678 StringBuffer result = new StringBuffer ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	679 while (i < length) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	680 int j = text.indexOf (Cr, i);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	681 if (j is -1) j = length;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	682 String s = text.substring (i, j);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	683 result.append (s);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	684 i = j + 2;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	685 result.append (Lf);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	686 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	687 return result.toString ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	688 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	689
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	690 void clearModal (Shell shell) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	691 if (modalShells is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	692 int index = 0, length = modalShells.length;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	693 while (index < length) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	694 if (modalShells [index] is shell) break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	695 if (modalShells [index] is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	696 index++;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	697 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	698 if (index is length) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	699 System.arraycopy (modalShells, index + 1, modalShells, index, --length - index);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	700 modalShells [length] = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	701 if (index is 0 && modalShells [0] is null) modalShells = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	702 Shell [] shells = getShells ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	703 for (int i=0; i<shells.length; i++) shells [i].updateModal ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	704 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	705
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	706 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	707 * Requests that the connection between DWT and the underlying
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	708 * operating system be closed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	709 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	710 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	711 * <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	712 * <li>ERROR_DEVICE_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	713 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	714 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	715 * @see Device#dispose
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 * @since 2.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	718 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	719 public void close () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	720 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	721 Event event = new Event ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	722 sendEvent (DWT.Close, event);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	723 if (event.doit) dispose ();
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	726 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	727 * Creates the device in the operating system. If the device
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	728 * does not have a handle, this method may do nothing depending
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	729 * on the device.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	730 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	731 * This method is called before <code>init</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	732 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	733 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	734 * @param data the DeviceData which describes the receiver
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	735 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	736 * @see #init
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	737 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	738 protected void create (DeviceData data) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	739 checkSubclass ();
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	740 checkDisplay (thread = Thread.getThis (), false);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	741 createDisplay (data);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	742 register (this);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	743 synchronizer = new Synchronizer (this);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	744 if (Default is null) Default = this;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	745 }
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 void createDisplay (DeviceData data) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	748 if (OS.VERSION < 0x1050) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	749 System.Out.println ("***WARNING: DWT requires MacOS X version {}{}{}{}" , 10 , "." , 5 , " or greater"); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$
2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	750 System.Out.println ("***WARNING: Detected: {}{}{}{}{}" , Integer.toHexString((OS.VERSION & 0xFF00) >> 8) , "." , Integer.toHexString((OS.VERSION & 0xF0) >> 4) , "." , Integer.toHexString(OS.VERSION & 0xF)); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	751 error(DWT.ERROR_NOT_IMPLEMENTED);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	752 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	753
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	754 NSThread nsthread = NSThread.currentThread();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	755 NSMutableDictionary dictionary = nsthread.threadDictionary();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	756 NSString key = NSString.stringWith("DWT_NSAutoreleasePool");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	757 pool = new NSAutoreleasePool(dictionary.objectForKey(key));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	758
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	759 application = NSApplication.sharedApplication();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	760
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	761 /*
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	762 * TODO: If an NSApplication is already running we don't want to create another NSApplication.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	763 * But if we don't we won't get mouse events, since we currently need to subclass NSApplication and intercept sendEvent to
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	764 * deliver mouse events correctly to widgets.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	765 */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	766 if (!application.isRunning()) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	767 /*
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	768 * Feature in the Macintosh. On OS 10.2, it is necessary
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	769 * to explicitly check in with the Process Manager and set
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	770 * the current process to be the front process in order for
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	771 * windows to come to the front by default. The fix is call
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	772 * both GetCurrentProcess() and SetFrontProcess().
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	773 *
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	774 * NOTE: It is not actually necessary to use the process
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	775 * serial number returned by GetCurrentProcess() in the
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	776 * call to SetFrontProcess() (ie. kCurrentProcess can be
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	777 * used) but both functions must be called in order for
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	778 * windows to come to the front.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	779 */
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	780 ProcessSerialNumber* psn;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	781 if (OS.GetCurrentProcess (psn) is OS.noErr) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	782 int pid = OS.getpid ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	783 int /long/ ptr = OS.getenv (ascii ("APP_NAME_" + pid));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	784 if (ptr is 0 && APP_NAME !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	785 ptr = NSString.stringWith(APP_NAME).UTF8String();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	786 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	787 if (ptr !is 0) OS.CPSSetProcessName (psn, ptr);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	788 OS.TransformProcessType (psn, OS.kProcessTransformToForegroundApplication);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	789 OS.SetFrontProcess (psn);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	790 ptr = OS.getenv (ascii ("APP_ICON_" + pid));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	791 if (ptr !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	792 NSString path = NSString.stringWithUTF8String (ptr);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	793 NSImage image = (NSImage) new NSImage().alloc();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	794 image = image.initByReferencingFile(path);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	795 dockImage = image;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	796 application.setApplicationIconImage(image);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	797 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	798 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	799
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	800 String className = "SWTApplication";
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	801 int /long/ cls;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	802 if ((cls = OS.objc_lookUpClass (className)) is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	803 Class clazz = getClass();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	804 applicationCallback2 = new Callback(clazz, "applicationProc", 2);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	805 int /long/ proc2 = applicationCallback2.getAddress();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	806 if (proc2 is 0) error (DWT.ERROR_NO_MORE_CALLBACKS);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	807 applicationCallback3 = new Callback(clazz, "applicationProc", 3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	808 int /long/ proc3 = applicationCallback3.getAddress();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	809 if (proc3 is 0) error (DWT.ERROR_NO_MORE_CALLBACKS);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	810 applicationCallback6 = new Callback(clazz, "applicationProc", 6);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	811 int /long/ proc6 = applicationCallback6.getAddress();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	812 if (proc6 is 0) error (DWT.ERROR_NO_MORE_CALLBACKS);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	813 cls = OS.objc_allocateClassPair(OS.class_NSApplication, className, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	814 OS.class_addMethod(cls, OS.sel_sendEvent_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	815 OS.class_addMethod(cls, OS.sel_nextEventMatchingMask_untilDate_inMode_dequeue_, proc6, "@:i@@B");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	816 OS.class_addMethod(cls, OS.sel_isRunning, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	817 OS.objc_registerClassPair(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	818 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	819 applicationClass = OS.object_setClass(application.id, cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	820 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	821 isEmbedded = true;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	822 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	823
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	824 // application = new NSApplication(OS.objc_msgSend(cls, OS.sel_sharedApplication));
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	825 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	826
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	827 static void deregister (Display display) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	828 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	829 for (int i=0; i<Displays.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	830 if (display is Displays [i]) Displays [i] = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	831 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	832 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	833 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	834
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	835 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	836 * Destroys the device in the operating system and releases
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	837 * the device's handle. If the device does not have a handle,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	838 * this method may do nothing depending on the device.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	839 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	840 * This method is called after <code>release</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	841 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	842 * @see Device#dispose
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	843 * @see #release
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	844 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	845 protected void destroy () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	846 if (this is Default) Default = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	847 deregister (this);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	848 destroyDisplay ();
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	851 void destroyDisplay () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	852 application = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	853 }
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 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	856 * Causes the <code>run()</code> method of the runnable to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	857 * be invoked by the user-interface thread just before the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	858 * receiver is disposed. Specifying a <code>null</code> runnable
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	859 * is ignored.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	860 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	861 * @param runnable code to run at dispose time.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	862 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	863 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	864 * <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	865 * <li>ERROR_DEVICE_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	866 * </ul>
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 public void disposeExec (Runnable runnable) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	869 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	870 if (disposeList is null) disposeList = new Runnable [4];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	871 for (int i=0; i<disposeList.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	872 if (disposeList [i] is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	873 disposeList [i] = runnable;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	874 return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	875 }
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 Runnable [] newDisposeList = new Runnable [disposeList.length + 4];
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	878 SimpleType!(Runnable).arraycopy (disposeList, 0, newDisposeList, 0, disposeList.length);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	879 newDisposeList [disposeList.length] = runnable;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	880 disposeList = newDisposeList;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	881 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	882
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	883 void error (int code) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	884 DWT.error(code);
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 bool filterEvent (Event event) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	888 if (filterTable !is null) filterTable.sendEvent (event);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	889 return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	890 }
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 bool filters (int eventType) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	893 if (filterTable is null) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	894 return filterTable.hooks (eventType);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	895 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	896
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 * Given the operating system handle for a widget, returns
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	899 * the instance of the <code>Widget</code> subclass which
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	900 * represents it in the currently running application, if
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	901 * such exists, or null if no matching widget can be found.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	902 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	903 * <b>IMPORTANT:</b> This method should not be called from
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	904 * application code. The arguments are platform-specific.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	905 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	906 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	907 * @param handle the handle for the widget
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	908 * @return the DWT widget that the handle represents
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	909 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	910 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	911 * <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	912 * <li>ERROR_DEVICE_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	913 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	914 */
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	915 public Widget findWidget (objc.id handle) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	916 checkDevice ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	917 return getWidget (handle);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	918 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	919
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	920 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	921 * Given the operating system handle for a widget,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	922 * and widget-specific id, returns the instance of
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	923 * the <code>Widget</code> subclass which represents
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	924 * the handle/id pair in the currently running application,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	925 * if such exists, or null if no matching widget can be found.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	926 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	927 * <b>IMPORTANT:</b> This method should not be called from
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	928 * application code. The arguments are platform-specific.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	929 * </p>
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 * @param handle the handle for the widget
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	932 * @param id the id for the subwidget (usually an item)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	933 * @return the DWT widget that the handle/id pair represents
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	934 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	935 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	936 * <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	937 * <li>ERROR_DEVICE_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	938 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	939 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	940 * @since 3.1
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	941 */
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	942 public Widget findWidget (objc.id handle, int id) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	943 checkDevice ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	944 return getWidget (handle);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	945 }
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 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	948 * Given a widget and a widget-specific id, returns the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	949 * instance of the <code>Widget</code> subclass which represents
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	950 * the widget/id pair in the currently running application,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	951 * if such exists, or null if no matching widget can be found.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	952 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	953 * @param widget the widget
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	954 * @param id the id for the subwidget (usually an item)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	955 * @return the DWT subwidget (usually an item) that the widget/id pair represents
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 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	958 * <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	959 * <li>ERROR_DEVICE_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	960 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	961 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	962 * @since 3.3
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 public Widget findWidget (Widget widget, int id) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	965 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	966 return null;
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	969 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	970 * Returns the display which the given thread is the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	971 * user-interface thread for, or null if the given thread
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	972 * is not a user-interface thread for any display. Specifying
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	973 * <code>null</code> as the thread will return <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	974 * for the display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	975 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	976 * @param thread the user-interface thread
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	977 * @return the display for the given thread
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	978 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	979 public static Display findDisplay (Thread thread) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	980 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	981 for (int i=0; i<Displays.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	982 Display display = Displays [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	983 if (display !is null && display.thread is thread) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	984 return display;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	985 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	986 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	987 return null;
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 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	990
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	991 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	992 * Returns the currently active <code>Shell</code>, or null
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	993 * if no shell belonging to the currently running application
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	994 * is 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 * @return the active shell or null
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	997 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	998 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	999 * <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	1000 * <li>ERROR_DEVICE_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	1001 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1002 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1003 public Shell getActiveShell () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1004 checkDevice ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1005 NSArray windows = application.windows();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1006 int count = (int)/64/windows.count();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1007 for (int i = 0; i < count; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1008 NSWindow win = new NSWindow(windows.objectAtIndex(i));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1009 if (win.isKeyWindow()) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1010 Widget widget = getWidget(win.contentView());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1011 if (widget instanceof Shell) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1012 return cast(Shell)widget;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1013 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1014 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1015 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1016 return null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1017 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1018
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1019 /**
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1020 * Returns a rectangle describing the receiver's size and location. Note that
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1021 * on multi-monitor systems the origin can be negative.
0 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 * @return the bounding rectangle
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1024 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1025 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1026 * <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	1027 * <li>ERROR_DEVICE_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	1028 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1029 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1030 public Rectangle getBounds () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1031 checkDevice ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1032 NSArray screens = NSScreen.screens();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1033 return getBounds (screens);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1034 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1035
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1036 Rectangle getBounds (NSArray screens) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1037 NSRect primaryFrame = new NSScreen(screens.objectAtIndex(0)).frame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1038 float /double/ minX = Float.MAX_VALUE, maxX = Float.MIN_VALUE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1039 float /double/ minY = Float.MAX_VALUE, maxY = Float.MIN_VALUE;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1040 int /long/ count = screens.count();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1041 for (int i = 0; i < count; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1042 NSScreen screen = new NSScreen(screens.objectAtIndex(i));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1043 NSRect frame = screen.frame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1044 float /double/ x1 = frame.x, x2 = frame.x + frame.width;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1045 float /double/ y1 = primaryFrame.height - frame.y, y2 = primaryFrame.height - (frame.y + frame.height);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1046 if (x1 < minX) minX = x1;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1047 if (x2 < minX) minX = x2;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1048 if (x1 > maxX) maxX = x1;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1049 if (x2 > maxX) maxX = x2;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1050 if (y1 < minY) minY = y1;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1051 if (y2 < minY) minY = y2;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1052 if (y1 > maxY) maxY = y1;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1053 if (y2 > maxY) maxY = y2;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1054 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1055 return new Rectangle ((int)minX, (int)minY, (int)(maxX - minX), (int)(maxY - minY));
0 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 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1059 * Returns the display which the currently running thread is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1060 * the user-interface thread for, or null if the currently
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1061 * running thread is not a user-interface thread for any display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1062 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1063 * @return the current display
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1064 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1065 public static Display getCurrent () {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1066 return findDisplay (Thread.getThis ());
0 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 int getCaretBlinkTime () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1070 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1071 return 560;
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1074 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1075 * Returns a rectangle which describes the area of the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1076 * receiver which is capable of displaying data.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1077 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1078 * @return the client area
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1079 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1080 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1081 * <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	1082 * <li>ERROR_DEVICE_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	1083 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1084 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1085 * @see #getBounds
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1086 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1087 public Rectangle getClientArea () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1088 checkDevice ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1089 NSArray screens = NSScreen.screens();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1090 if (screens.count() !is 1) return getBounds (screens);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1091 NSScreen screen = new NSScreen(screens.objectAtIndex(0));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1092 NSRect frame = screen.frame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1093 NSRect visibleFrame = screen.visibleFrame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1094 float /double/ y = frame.height - (visibleFrame.y + visibleFrame.height);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1095 return new Rectangle((int)visibleFrame.x, (int)y, (int)visibleFrame.width, (int)visibleFrame.height);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1096 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1097
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 * Returns the control which the on-screen pointer is currently
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1100 * over top of, or null if it is not currently over one of the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1101 * controls built by the currently running application.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1102 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1103 * @return the control under the cursor
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1104 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1105 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1106 * <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	1107 * <li>ERROR_DEVICE_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	1108 * </ul>
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 public Control getCursorControl () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1111 checkDevice();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1112 return findControl(null, false, false, true);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1113 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1114
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1115 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1116 * Returns the location of the on-screen pointer relative
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1117 * to the top left corner of the screen.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1118 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1119 * @return the cursor location
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1120 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1121 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1122 * <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	1123 * <li>ERROR_DEVICE_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	1124 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1125 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1126 public Point getCursorLocation () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1127 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1128 NSPoint location = NSEvent.mouseLocation();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1129 NSRect primaryFrame = getPrimaryFrame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1130 return new Point (cast(int) location.x, cast(int) (primaryFrame.height - location.y));
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1131 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1132
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1133 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1134 * Returns an array containing the recommended cursor sizes.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1135 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1136 * @return the array of cursor sizes
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 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1139 * <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	1140 * <li>ERROR_DEVICE_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	1141 * </ul>
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 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1144 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1145 public Point [] getCursorSizes () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1146 checkDevice ();
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1147 return [new Point (16, 16)];
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1148 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1149
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1150 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1151 * Returns the default display. One is created (making the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1152 * thread that invokes this method its user-interface thread)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1153 * if it did not already exist.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1154 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1155 * @return the default display
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 public static Display getDefault () {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1158 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1159 if (Default is null) Default = new Display ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1160 return Default;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1161 }
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1164 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1165 * Returns the application defined property of the receiver
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1166 * with the specified name, or null if it has not been set.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1167 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1168 * Applications may have associated arbitrary objects with the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1169 * receiver in this fashion. If the objects stored in the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1170 * properties need to be notified when the display is disposed
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1171 * of, it is the application's responsibility to provide a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1172 * <code>disposeExec()</code> handler which does so.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1173 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1174 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1175 * @param key the name of the property
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1176 * @return the value of the property or null if it has not been set
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1177 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1178 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1179 * <li>ERROR_NULL_ARGUMENT - if the key is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1180 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1181 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1182 * <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	1183 * <li>ERROR_DEVICE_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	1184 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1185 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1186 * @see #setData(String, Object)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1187 * @see #disposeExec(Runnable)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1188 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1189 public Object getData (String key) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1190 checkDevice ();
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1191 //if (key is null) error (DWT.ERROR_NULL_ARGUMENT);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1192 if (keys is null) return null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1193 for (int i=0; i<keys.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1194 if (keys [i].equals (key)) return values [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1195 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1196 return null;
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1199 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1200 * Returns the application defined, display specific data
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1201 * associated with the receiver, or null if it has not been
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1202 * set. The <em>display specific data</em> is a single,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1203 * unnamed field that is stored with every display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1204 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1205 * Applications may put arbitrary objects in this field. If
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1206 * the object stored in the display specific data needs to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1207 * be notified when the display is disposed of, it is the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1208 * application's responsibility to provide a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1209 * <code>disposeExec()</code> handler which does so.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1210 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1211 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1212 * @return the display specific data
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1213 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1214 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1215 * <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	1216 * <li>ERROR_DEVICE_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	1217 * </ul>
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 * @see #setData(Object)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1220 * @see #disposeExec(Runnable)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1221 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1222 public Object getData () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1223 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1224 return data;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1225 }
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 * Returns the button dismissal alignment, one of <code>LEFT</code> or <code>RIGHT</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1229 * The button dismissal alignment is the ordering that should be used when positioning the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1230 * default dismissal button for a dialog. For example, in a dialog that contains an OK and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1231 * CANCEL button, on platforms where the button dismissal alignment is <code>LEFT</code>, the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1232 * button ordering should be OK/CANCEL. When button dismissal alignment is <code>RIGHT</code>,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1233 * the button ordering should be CANCEL/OK.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1234 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1235 * @return the button dismissal order
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1236 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1237 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1238 * <li>ERROR_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	1239 * <li>ERROR_DEVICE_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	1240 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1241 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1242 * @since 2.1
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1243 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1244 public int getDismissalAlignment () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1245 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1246 return DWT.RIGHT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1247 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1248
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1249 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1250 * Returns the longest duration, in milliseconds, between
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1251 * two mouse button clicks that will be considered a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1252 * <em>double click</em> by the underlying operating system.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1253 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1254 * @return the double click time
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1255 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1256 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1257 * <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	1258 * <li>ERROR_DEVICE_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	1259 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1260 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1261 public int getDoubleClickTime () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1262 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1263 return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1264 // return OS.GetDblTime () * 1000 / 60;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1265 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1266
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1267 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1268 * Returns the control which currently has keyboard focus,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1269 * or null if keyboard events are not currently going to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1270 * any of the controls built by the currently running
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1271 * application.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1272 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1273 * @return the control under the cursor
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 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1276 * <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	1277 * <li>ERROR_DEVICE_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	1278 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1279 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1280 public Control getFocusControl () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1281 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1282 NSWindow window = application.keyWindow();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1283 return GetFocusControl(window);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1284 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1285
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1286 static Control GetFocusControl(NSWindow window) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1287 if (window !is null) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1288 NSResponder responder = window.firstResponder();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1289 if (responder !is null && !responder.respondsToSelector(OS.sel_superview)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1290 return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1291 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1292 NSView view = new NSView(responder.id);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1293 if (view !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1294 do {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1295 Widget widget = GetWidget (view.id);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1296 if (widget instanceof Control) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1297 return (Control)widget;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1298 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1299 view = view.superview();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1300 } while (view !is null);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1301 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1302 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1303 return null;
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 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1307 * Returns true when the high contrast mode is enabled.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1308 * Otherwise, false is returned.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1309 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1310 * Note: This operation is a hint and is not supported on
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1311 * platforms that do not have this concept.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1312 * </p>
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 * @return the high contrast mode
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1315 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1316 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1317 * <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	1318 * <li>ERROR_DEVICE_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	1319 * </ul>
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 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1322 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1323 public bool getHighContrast () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1324 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1325 return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1326 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1327
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1328 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1329 * Returns the maximum allowed depth of icons on this display, in bits per pixel.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1330 * On some platforms, this may be different than the actual depth of the display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1331 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1332 * @return the maximum icon depth
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1333 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1334 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1335 * <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	1336 * <li>ERROR_DEVICE_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	1337 * </ul>
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 * @see Device#getDepth
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1340 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1341 public int getIconDepth () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1342 return getDepth ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1343 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1344
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1345 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1346 * Returns an array containing the recommended icon sizes.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1347 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1348 * @return the array of icon sizes
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 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1351 * <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	1352 * <li>ERROR_DEVICE_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	1353 * </ul>
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 * @see Decorations#setImages(Image[])
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1356 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1357 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1358 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1359 public Point [] getIconSizes () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1360 checkDevice ();
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1361 return [
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1362 new Point (16, 16), new Point (32, 32),
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1363 new Point (64, 64), new Point (128, 128)];
0 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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1366 int getLastEventTime () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1367 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1368 * This code is intentionally commented. Event time is
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1369 * in seconds and we need an accurate time in milliseconds.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1370 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1371 // return (int) (OS.GetLastUserEventTime () * 1000.0);
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1372 return cast(int) System.currentTimeMillis ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1373 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1374
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1375 Menu [] getMenus (Decorations shell) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1376 if (menus is null) return new Menu [0];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1377 int count = 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1378 for (int i = 0; i < menus.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1379 Menu menu = menus[i];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1380 if (menu !is null && menu.parent is shell) count++;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1381 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1382 int index = 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1383 Menu[] result = new Menu[count];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1384 for (int i = 0; i < menus.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1385 Menu menu = menus[i];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1386 if (menu !is null && menu.parent is shell) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1387 result[index++] = menu;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1388 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1389 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1390 return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1391 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1392
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1393 int getMessageCount () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1394 return synchronizer.getMessageCount ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1395 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1396
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1397 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1398 * Returns an array of monitors attached to the device.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1399 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1400 * @return the array of monitors
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.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1403 */
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1404 public dwt.widgets.Monitor.Monitor [] getMonitors () {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1405 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1406 NSArray screens = NSScreen.screens();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1407 NSRect primaryFrame = new NSScreen(screens.objectAtIndex(0)).frame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1408 int count = (int)/64/screens.count();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1409 for (int i=0; i<count; i++) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1410 dwt.widgets.Monitor.Monitor monitor = new dwt.widgets.Monitor.Monitor ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1411 NSScreen screen = new NSScreen(screens.objectAtIndex(i));
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1412 NSRect frame = screen.frame();
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1413 monitor.x = cast(int)frame.x;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1414 monitor.y = (int)(primaryFrame.height - (frame.y + frame.height));
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1415 monitor.width = cast(int)frame.width;
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1416 monitor.height = cast(int)frame.height;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1417 NSRect visibleFrame = screen.visibleFrame();
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1418 monitor.clientX = cast(int)visibleFrame.x;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1419 monitor.clientY = (int)(primaryFrame.height - (visibleFrame.y + visibleFrame.height));
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1420 monitor.clientWidth = cast(int)visibleFrame.width;
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1421 monitor.clientHeight = cast(int)visibleFrame.height;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1422 monitors [i] = monitor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1423 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1424 return monitors;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1425 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1426
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1427 NSRect getPrimaryFrame () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1428 NSArray screens = NSScreen.screens();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1429 return new NSScreen(screens.objectAtIndex(0)).frame();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1430 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1431
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1432 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1433 * Returns the primary monitor for that device.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1434 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1435 * @return the primary monitor
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1436 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1437 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1438 */
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1439 public dwt.widgets.Monitor.Monitor getPrimaryMonitor () {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1440 checkDevice ();
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1441 dwt.widgets.Monitor.Monitor monitor = new dwt.widgets.Monitor.Monitor ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1442 NSArray screens = NSScreen.screens();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1443 NSScreen screen = new NSScreen(screens.objectAtIndex(0));
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1444 NSRect frame = screen.frame();
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1445 monitor.x = cast(int)frame.x;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1446 monitor.y = (int)(frame.height - (frame.y + frame.height));
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1447 monitor.width = cast(int)frame.width;
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1448 monitor.height = cast(int)frame.height;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1449 NSRect visibleFrame = screen.visibleFrame();
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1450 monitor.clientX = cast(int)visibleFrame.x;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1451 monitor.clientY = (int)(frame.height - (visibleFrame.y + visibleFrame.height));
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1452 monitor.clientWidth = cast(int)visibleFrame.width;
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	1453 monitor.clientHeight = cast(int)visibleFrame.height;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1454 return monitor;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1455 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1456
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1457 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1458 * Returns a (possibly empty) array containing all shells which have
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1459 * not been disposed and have the receiver as their display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1460 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1461 * @return the receiver's shells
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1462 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1463 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1464 * <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	1465 * <li>ERROR_DEVICE_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	1466 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1467 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1468 public Shell [] getShells () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1469 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1470 NSArray windows = application.windows();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1471 int index = 0;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1472 Shell [] result = new Shell [(int)/64/windows.count()];
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1473 for (int i = 0; i < result.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1474 NSWindow window = new NSWindow(windows.objectAtIndex(i));
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1475 Widget widget = getWidget(window.contentView());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1476 if (widget instanceof Shell) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1477 result[index++] = (Shell)widget;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1478 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1479 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1480 if (index is result.length) return result;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1481 Shell [] newResult = new Shell [index];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1482 System.arraycopy (result, 0, newResult, 0, index);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1483 return newResult;
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
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1486 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1487 * Gets the synchronizer used by the display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1488 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1489 * @return the receiver's synchronizer
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1490 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1491 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1492 * <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	1493 * <li>ERROR_DEVICE_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	1494 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1495 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1496 * @since 3.4
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1497 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1498 public Synchronizer getSynchronizer () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1499 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1500 return synchronizer;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1501 }
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 * Returns the thread that has invoked <code>syncExec</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1505 * or null if no such runnable is currently being invoked by
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1506 * the user-interface thread.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1507 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1508 * Note: If a runnable invoked by asyncExec is currently
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1509 * running, this method will return null.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1510 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1511 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1512 * @return the receiver's sync-interface thread
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1513 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1514 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1515 * <li>ERROR_DEVICE_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	1516 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1517 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1518 public Thread getSyncThread () {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1519 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1520 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1521 return synchronizer.syncThread;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1522 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1523 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1524
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1525 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1526 * Returns the matching standard color for the given
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1527 * constant, which should be one of the color constants
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1528 * specified in class <code>DWT</code>. Any value other
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1529 * than one of the DWT color constants which is passed
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1530 * in will result in the color black. This color should
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1531 * not be free'd because it was allocated by the system,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1532 * not the application.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1533 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1534 * @param id the color constant
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1535 * @return the matching color
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 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1538 * <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	1539 * <li>ERROR_DEVICE_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	1540 * </ul>
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 * @see DWT
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 public Color getSystemColor (int id) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1545 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1546 NSColor color = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1547 switch (id) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1548 case DWT.COLOR_INFO_FOREGROUND: return super.getSystemColor (DWT.COLOR_BLACK);
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1549 case DWT.COLOR_INFO_BACKGROUND: return Color.cocoa_new (this, [0xFF / 255f, 0xFF / 255f, 0xE1 / 255f, 1]);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1550 case DWT.COLOR_TITLE_FOREGROUND: color = NSColor.windowFrameTextColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1551 case DWT.COLOR_TITLE_BACKGROUND: color = NSColor.secondarySelectedControlColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1552 case DWT.COLOR_TITLE_BACKGROUND_GRADIENT: color = NSColor.windowFrameColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1553 case DWT.COLOR_TITLE_INACTIVE_FOREGROUND: color = NSColor.disabledControlTextColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1554 case DWT.COLOR_TITLE_INACTIVE_BACKGROUND: color = NSColor.secondarySelectedControlColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1555 case DWT.COLOR_TITLE_INACTIVE_BACKGROUND_GRADIENT: color = NSColor.secondarySelectedControlColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1556 case DWT.COLOR_WIDGET_DARK_SHADOW: color = NSColor.controlDarkShadowColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1557 case DWT.COLOR_WIDGET_NORMAL_SHADOW: color = NSColor.controlShadowColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1558 case DWT.COLOR_WIDGET_LIGHT_SHADOW: color = NSColor.controlHighlightColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1559 case DWT.COLOR_WIDGET_HIGHLIGHT_SHADOW: color = NSColor.controlLightHighlightColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1560 case DWT.COLOR_WIDGET_BACKGROUND: color = NSColor.controlHighlightColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1561 case DWT.COLOR_WIDGET_FOREGROUND: color = NSColor.controlTextColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1562 case DWT.COLOR_WIDGET_BORDER: return super.getSystemColor (DWT.COLOR_BLACK);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1563 case DWT.COLOR_LIST_FOREGROUND: color = NSColor.textColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1564 case DWT.COLOR_LIST_BACKGROUND: color = NSColor.textBackgroundColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1565 case DWT.COLOR_LIST_SELECTION_TEXT: color = NSColor.selectedTextColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1566 case DWT.COLOR_LIST_SELECTION: color = NSColor.selectedTextBackgroundColor(); break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1567 default:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1568 return super.getSystemColor (id);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1569 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1570 if (color is null) return super.getSystemColor(id);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1571 color = color.colorUsingColorSpace(NSColorSpace.deviceRGBColorSpace());
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1572 if (color is null) return super.getSystemColor(id);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1573 float /double/[] components = new float /double/[(int)/64/color.numberOfComponents()];
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1574 color.getComponents(components);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1575 return Color.cocoa_new (this, [cast(float)/64/ components[0], cast(float)/64/ components[1], cast(float)/64/ components[2], cast(float)/64/ components[3]]);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1576 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1577
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1578 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1579 * Returns the matching standard platform cursor for the given
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1580 * constant, which should be one of the cursor constants
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1581 * specified in class <code>DWT</code>. This cursor should
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1582 * not be free'd because it was allocated by the system,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1583 * not the application. A value of <code>null</code> will
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1584 * be returned if the supplied constant is not an DWT cursor
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1585 * constant.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1586 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1587 * @param id the DWT cursor constant
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1588 * @return the corresponding cursor or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1589 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1590 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1591 * <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	1592 * <li>ERROR_DEVICE_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	1593 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1594 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1595 * @see DWT#CURSOR_ARROW
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1596 * @see DWT#CURSOR_WAIT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1597 * @see DWT#CURSOR_CROSS
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1598 * @see DWT#CURSOR_APPSTARTING
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1599 * @see DWT#CURSOR_HELP
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1600 * @see DWT#CURSOR_SIZEALL
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1601 * @see DWT#CURSOR_SIZENESW
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1602 * @see DWT#CURSOR_SIZENS
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1603 * @see DWT#CURSOR_SIZENWSE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1604 * @see DWT#CURSOR_SIZEWE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1605 * @see DWT#CURSOR_SIZEN
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1606 * @see DWT#CURSOR_SIZES
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1607 * @see DWT#CURSOR_SIZEE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1608 * @see DWT#CURSOR_SIZEW
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1609 * @see DWT#CURSOR_SIZENE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1610 * @see DWT#CURSOR_SIZESE
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1611 * @see DWT#CURSOR_SIZESW
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1612 * @see DWT#CURSOR_SIZENW
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1613 * @see DWT#CURSOR_UPARROW
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1614 * @see DWT#CURSOR_IBEAM
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1615 * @see DWT#CURSOR_NO
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1616 * @see DWT#CURSOR_HAND
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1617 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1618 * @since 3.0
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 public Cursor getSystemCursor (int id) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1621 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1622 if (!(0 <= id && id < cursors.length)) return null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1623 if (cursors [id] is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1624 cursors [id] = new Cursor (this, id);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1625 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1626 return cursors [id];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1627 }
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 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1630 * Returns the matching standard platform image for the given
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1631 * constant, which should be one of the icon constants
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1632 * specified in class <code>DWT</code>. This image should
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1633 * not be free'd because it was allocated by the system,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1634 * not the application. A value of <code>null</code> will
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1635 * be returned either if the supplied constant is not an
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1636 * DWT icon constant or if the platform does not define an
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1637 * image that corresponds to the constant.
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 * @param id the DWT icon constant
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1640 * @return the corresponding image or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1641 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1642 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1643 * <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	1644 * <li>ERROR_DEVICE_DISPOSED - if the receiver has been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1645 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1646 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1647 * @see DWT#ICON_ERROR
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1648 * @see DWT#ICON_INFORMATION
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1649 * @see DWT#ICON_QUESTION
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1650 * @see DWT#ICON_WARNING
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1651 * @see DWT#ICON_WORKING
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1652 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1653 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1654 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1655 public Image getSystemImage (int id) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1656 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1657 switch(id) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1658 case DWT.ICON_ERROR: {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1659 if (errorImage !is null) return errorImage;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1660 NSImage nsImage = NSWorkspace.sharedWorkspace ().iconForFileType (new NSString (OS.NSFileTypeForHFSTypeCode (OS.kAlertStopIcon)));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1661 if (nsImage is null) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1662 nsImage.retain ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1663 return errorImage = Image.cocoa_new (this, DWT.ICON, nsImage);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1664 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1665 case DWT.ICON_INFORMATION:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1666 case DWT.ICON_QUESTION:
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1667 case DWT.ICON_WORKING: {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1668 if (infoImage !is null) return infoImage;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1669 NSImage nsImage = NSWorkspace.sharedWorkspace ().iconForFileType (new NSString (OS.NSFileTypeForHFSTypeCode (OS.kAlertNoteIcon)));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1670 if (nsImage is null) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1671 nsImage.retain ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1672 return infoImage = Image.cocoa_new (this, DWT.ICON, nsImage);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1673 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1674 case DWT.ICON_WARNING: {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1675 if (warningImage !is null) return warningImage;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1676 NSImage nsImage = NSWorkspace.sharedWorkspace ().iconForFileType (new NSString (OS.NSFileTypeForHFSTypeCode (OS.kAlertCautionIcon)));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1677 if (nsImage is null) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1678 nsImage.retain ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1679 return warningImage = Image.cocoa_new (this, DWT.ICON, nsImage);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1680 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1681 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1682 return null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1683 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1684
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1685 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1686 * Returns the single instance of the system tray or null
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1687 * when there is no system tray available for the platform.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1688 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1689 * @return the system tray or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1690 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1691 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1692 * <li>ERROR_DEVICE_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	1693 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1694 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1695 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1696 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1697 public Tray getSystemTray () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1698 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1699 if (tray !is null) return tray;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1700 return tray = new Tray (this, DWT.NONE);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1701 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1702
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1703 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1704 * Returns the user-interface thread for the receiver.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1705 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1706 * @return the receiver's user-interface thread
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1707 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1708 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1709 * <li>ERROR_DEVICE_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	1710 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1711 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1712 public Thread getThread () {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	1713 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1714 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1715 return thread;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1716 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1717 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1718
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1719 int getToolTipTime () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1720 checkDevice ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1721 //TODO get OS value (NSTooltipManager?)
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1722 return 560;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1723 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1724
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1725 Widget getWidget (int /long/ id) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1726 return GetWidget (id);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1727 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1728
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1729 static Widget GetWidget (int /long/ id) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1730 if (id is 0) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1731 int /long/ [] jniRef = new int /long/ [1];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1732 OS.object_getInstanceVariable(id, DWT_OBJECT, jniRef);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1733 if (jniRef[0] is 0) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1734 return (Widget)OS.JNIGetObject(jniRef[0]);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1735 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1736
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1737 Widget getWidget (NSView view) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1738 if (view is null) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1739 return getWidget(view.id);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1740 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1741
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1742 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1743 * Initializes any internal resources needed by the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1744 * device.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1745 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1746 * This method is called after <code>create</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1747 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1748 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1749 * @see #create
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1750 */
36 db5a898b2119 Fixed a lot of compile errors Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	1751 protected void init_ () {
db5a898b2119 Fixed a lot of compile errors Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 19 diff changeset	1752 super.init_ ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1753 initClasses ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1754
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1755 if (!isEmbedded) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1756 initApplicationDelegate();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1757 application.finishLaunching();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1758 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1759
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1760 timerDelegate = (SWTWindowDelegate)new SWTWindowDelegate().alloc().init();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1761
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1762 NSTextView textView = cast(NSTextView)(new NSTextView()).alloc();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1763 textView.initWithFrame (NSRect ());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1764 markedAttributes = textView.markedTextAttributes ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1765 markedAttributes.retain ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1766 textView.release ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1767 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1768
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1769 void initApplicationDelegate() {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1770 String className = "SWTApplicationDelegate";
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1771 if (OS.objc_lookUpClass (className) is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1772 Class clazz = getClass ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1773 applicationDelegateCallback3 = new Callback(clazz, "applicationDelegateProc", 3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1774 int /long/ appProc3 = applicationDelegateCallback3.getAddress();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1775 if (appProc3 is 0) error (DWT.ERROR_NO_MORE_CALLBACKS);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1776 int /long/ cls = OS.objc_allocateClassPair(OS.class_NSObject, className, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1777 OS.class_addMethod(cls, OS.sel_applicationWillFinishLaunching_, appProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1778 OS.class_addMethod(cls, OS.sel_terminate_, appProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1779 OS.class_addMethod(cls, OS.sel_orderFrontStandardAboutPanel_, appProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1780 OS.class_addMethod(cls, OS.sel_hideOtherApplications_, appProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1781 OS.class_addMethod(cls, OS.sel_hide_, appProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1782 OS.class_addMethod(cls, OS.sel_unhideAllApplications_, appProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1783 OS.class_addMethod(cls, OS.sel_applicationShouldTerminate_, appProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1784 OS.class_addMethod(cls, OS.sel_applicationWillTerminate_, appProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1785 OS.class_addMethod(cls, OS.sel_applicationWillResignActive_, appProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1786 OS.objc_registerClassPair(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1787 }
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	1788 applicationDelegate = cast(SWTApplicationDelegate)(new SWTApplicationDelegate()).alloc().init();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1789 application.setDelegate(applicationDelegate);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1790 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1791
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1792 void addEventMethods (int /long/ cls, int /long/ proc2, int /long/ proc3, int /long/ drawRectProc) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1793 OS.class_addMethod(cls, OS.sel_mouseDown_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1794 OS.class_addMethod(cls, OS.sel_mouseUp_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1795 OS.class_addMethod(cls, OS.sel_scrollWheel_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1796 OS.class_addMethod(cls, OS.sel_rightMouseDown_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1797 OS.class_addMethod(cls, OS.sel_rightMouseUp_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1798 OS.class_addMethod(cls, OS.sel_otherMouseDown_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1799 OS.class_addMethod(cls, OS.sel_otherMouseUp_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1800 OS.class_addMethod(cls, OS.sel_mouseDragged_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1801 OS.class_addMethod(cls, OS.sel_mouseMoved_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1802 OS.class_addMethod(cls, OS.sel_mouseEntered_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1803 OS.class_addMethod(cls, OS.sel_mouseExited_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1804 OS.class_addMethod(cls, OS.sel_menuForEvent_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1805 OS.class_addMethod(cls, OS.sel_resignFirstResponder, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1806 OS.class_addMethod(cls, OS.sel_becomeFirstResponder, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1807 OS.class_addMethod(cls, OS.sel_keyDown_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1808 OS.class_addMethod(cls, OS.sel_keyUp_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1809 OS.class_addMethod(cls, OS.sel_flagsChanged_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1810 OS.class_addMethod(cls, OS.sel_drawRect_, drawRectProc, "@:{NSRect}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1811 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1812
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1813 void addFrameMethods(int /long/ cls, int /long/ setFrameOriginProc, int /long/ setFrameSizeProc) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1814 OS.class_addMethod(cls, OS.sel_setFrameOrigin_, setFrameOriginProc, "@:{NSPoint}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1815 OS.class_addMethod(cls, OS.sel_setFrameSize_, setFrameSizeProc, "@:{NSSize}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1816 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1817
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1818 void addAccessibilityMethods(int /long/ cls, int /long/ proc2, int /long/ proc3, int /long/ proc4, int /long/ accessibilityHitTestProc) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1819 OS.class_addMethod(cls, OS.sel_accessibilityActionNames, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1820 OS.class_addMethod(cls, OS.sel_accessibilityAttributeNames, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1821 OS.class_addMethod(cls, OS.sel_accessibilityParameterizedAttributeNames, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1822 OS.class_addMethod(cls, OS.sel_accessibilityFocusedUIElement, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1823 OS.class_addMethod(cls, OS.sel_accessibilityIsIgnored, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1824 OS.class_addMethod(cls, OS.sel_accessibilityAttributeValue_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1825 OS.class_addMethod(cls, OS.sel_accessibilityIsAttributeSettable_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1826 OS.class_addMethod(cls, OS.sel_accessibilityHitTest_, accessibilityHitTestProc, "@:{NSPoint}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1827 OS.class_addMethod(cls, OS.sel_accessibilityAttributeValue_forParameter_, proc4, "@:@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1828 OS.class_addMethod(cls, OS.sel_accessibilityPerformAction_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1829 OS.class_addMethod(cls, OS.sel_accessibilityActionDescription_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1830 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1831
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1832 int registerCellSubclass(int cellClass, int size, int align, String types) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1833 String cellClassName = OS.class_getName(cellClass);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1834 int cls = OS.objc_allocateClassPair(cellClass, "DWT" + cellClassName, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1835 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1836 OS.objc_registerClassPair(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1837 return cls;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1838 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1839
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1840 void initClasses () {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1841 if (OS.objc_lookUpClass ("SWTView") !is null) return;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1842
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1843 Class clazz = getClass ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1844 dialogCallback3 = new Callback(clazz, "dialogProc", 3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1845 int /long/ dialogProc3 = dialogCallback3.getAddress();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1846 if (dialogProc3 is 0) error (DWT.ERROR_NO_MORE_CALLBACKS);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1847 windowDelegateCallback3 = new Callback(clazz, "windowDelegateProc", 3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1848 int /long/ proc3 = windowDelegateCallback3.getAddress();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1849
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1850 objc.IMP drawRectProc = OS.drawRect_CALLBACK(proc3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1851 int /long/ drawInteriorWithFrameInViewProc = OS.drawInteriorWithFrame_inView_CALLBACK (proc4);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1852 int /long/ setFrameOriginProc = OS.setFrameOrigin_CALLBACK(proc3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1853 int /long/ setFrameSizeProc = OS.setFrameSize_CALLBACK(proc3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1854 int /long/ hitTestProc = OS.hitTest_CALLBACK(proc3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1855 int /long/ markedRangeProc = OS.markedRange_CALLBACK(proc2);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1856 int /long/ selectedRangeProc = OS.selectedRange_CALLBACK(proc2);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1857 int /long/ highlightSelectionInClipRectProc = OS.highlightSelectionInClipRect_CALLBACK(proc3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1858 int /long/ setMarkedText_selectedRangeProc = OS.setMarkedText_selectedRange_CALLBACK(proc4);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1859 int /long/ attributedSubstringFromRangeProc = OS.attributedSubstringFromRange_CALLBACK(proc3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1860 int /long/ characterIndexForPointProc = OS.characterIndexForPoint_CALLBACK(proc3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1861 int /long/ firstRectForCharacterRangeProc = OS.firstRectForCharacterRange_CALLBACK(proc3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1862 int /long/ textWillChangeSelectionProc = OS.textView_willChangeSelectionFromCharacterRange_toCharacterRange_CALLBACK(proc5);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1863 int /long/ accessibilityHitTestProc = OS.accessibilityHitTest_CALLBACK(proc3);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1864
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1865 String types = "*";
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1866 int size = C.PTR_SIZEOF, align = C.PTR_SIZEOF is 4 ? 2 : 3;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1867
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1868 String className = "SWTWindowDelegate";
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1869 int /long/ cls = OS.objc_allocateClassPair(OS.class_NSObject, className, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1870 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1871 OS.class_addMethod(cls, OS.sel_windowDidResize_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1872 OS.class_addMethod(cls, OS.sel_windowDidMove_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1873 OS.class_addMethod(cls, OS.sel_windowShouldClose_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1874 OS.class_addMethod(cls, OS.sel_windowWillClose_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1875 OS.class_addMethod(cls, OS.sel_windowDidResignKey_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1876 OS.class_addMethod(cls, OS.sel_windowDidBecomeKey_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1877 OS.class_addMethod(cls, OS.sel_timerProc_, proc3, "@:@");
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1878 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1879
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1880 className = "SWTPanelDelegate";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1881 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSObject, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1882 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1883 OS.class_addMethod(cls, OS.sel_windowWillClose_, dialogProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1884 OS.class_addMethod(cls, OS.sel_changeColor_, dialogProc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1885 OS.class_addMethod(cls, OS.sel_changeFont_, dialogProc3, "@:@");
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1886 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1887
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1888 className = "SWTMenu";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1889 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSMenu, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1890 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1891 OS.class_addMethod(cls, OS.sel_menuWillOpen_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1892 OS.class_addMethod(cls, OS.sel_menuDidClose_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1893 OS.class_addMethod(cls, OS.sel_menu_willHighlightItem_, proc4, "@:@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1894 OS.class_addMethod(cls, OS.sel_menuNeedsUpdate_, proc3, "@:@");
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1895 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1896
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1897 className = "SWTView";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1898 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSView, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1899 OS.class_addProtocol(cls, OS.objc_getProtocol("NSTextInput"));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1900 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1901 OS.class_addMethod(cls, OS.sel_isFlipped, proc2, "@:");
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1902 OS.class_addMethod(cls, OS.sel_acceptsFirstResponder, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1903 OS.class_addMethod(cls, OS.sel_isOpaque, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1904 OS.class_addMethod(cls, OS.sel_hitTest_, hitTestProc, "@:{NSPoint}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1905
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1906 //NSTextInput protocol
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1907 OS.class_addMethod(cls, OS.sel_hasMarkedText, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1908 OS.class_addMethod(cls, OS.sel_markedRange, markedRangeProc, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1909 OS.class_addMethod(cls, OS.sel_selectedRange, selectedRangeProc, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1910 OS.class_addMethod(cls, OS.sel_setMarkedText_selectedRange_, setMarkedText_selectedRangeProc, "@:@{NSRange}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1911 OS.class_addMethod(cls, OS.sel_unmarkText, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1912 OS.class_addMethod(cls, OS.sel_validAttributesForMarkedText, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1913 OS.class_addMethod(cls, OS.sel_attributedSubstringFromRange_, attributedSubstringFromRangeProc, "@:{NSRange}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1914 OS.class_addMethod(cls, OS.sel_insertText_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1915 OS.class_addMethod(cls, OS.sel_characterIndexForPoint_, characterIndexForPointProc, "@:{NSPoint}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1916 OS.class_addMethod(cls, OS.sel_firstRectForCharacterRange_, firstRectForCharacterRangeProc, "@:{NSRange}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1917 OS.class_addMethod(cls, OS.sel_doCommandBySelector_, proc3, "@::");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1918
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1919 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1920 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1921 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1922 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1923
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1924 className = "SWTScrollView";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1925 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSScrollView, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1926 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1927 OS.class_addMethod(cls, OS.sel_sendVerticalSelection, proc2, "@:");
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1928 OS.class_addMethod(cls, OS.sel_sendHorizontalSelection, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1929 OS.class_addMethod(cls, OS.sel_pageDown_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1930 OS.class_addMethod(cls, OS.sel_pageUp_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1931 OS.class_addMethod(cls, OS.sel_reflectScrolledClipView_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1932 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1933 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1934 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1935 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1936
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1937 className = "SWTButton";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1938 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSButton, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1939 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1940 OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1941 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1942 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1943 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1944 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1945
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1946 cls = registerCellSubclass(NSButton.cellClass(), size, align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1947 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1948 NSButton.setCellClass(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1949
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1950 className = "SWTTableView";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1951 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSTableView, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1952 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1953 OS.class_addMethod(cls, OS.sel_highlightSelectionInClipRect_, highlightSelectionInClipRectProc, "@:{NSRect}");
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1954 OS.class_addMethod(cls, OS.sel_sendDoubleSelection, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1955 OS.class_addMethod(cls, OS.sel_numberOfRowsInTableView_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1956 OS.class_addMethod(cls, OS.sel_tableView_objectValueForTableColumn_row_, proc5, "@:@:@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1957 OS.class_addMethod(cls, OS.sel_tableView_shouldEditTableColumn_row_, proc5, "@:@:@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1958 OS.class_addMethod(cls, OS.sel_tableViewSelectionDidChange_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1959 OS.class_addMethod(cls, OS.sel_tableView_willDisplayCell_forTableColumn_row_, proc6, "@:@@@i");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1960 OS.class_addMethod(cls, OS.sel_tableView_setObjectValue_forTableColumn_row_, proc6, "@:@@@i");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1961 OS.class_addMethod(cls, OS.sel_tableViewColumnDidMove_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1962 OS.class_addMethod(cls, OS.sel_tableViewColumnDidResize_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1963 OS.class_addMethod(cls, OS.sel_tableView_didClickTableColumn_, proc4, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1964 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1965 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1966 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1967 OS.objc_registerClassPair(cls);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1968
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1969 className = "SWTTableHeaderCell";
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1970 cls = OS.objc_allocateClassPair (OS.class_NSTableHeaderCell, className, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1971 OS.class_addIvar (cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1972 OS.class_addMethod (cls, OS.sel_drawInteriorWithFrame_inView_, drawInteriorWithFrameInViewProc, "@:{NSRect}@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1973 OS.objc_registerClassPair (cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1974
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1975 className = "SWTBrowserCell";
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1976 cls = OS.objc_allocateClassPair (OS.class_NSBrowserCell, className, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1977 OS.class_addIvar (cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1978 OS.class_addMethod (cls, OS.sel_drawInteriorWithFrame_inView_, drawInteriorWithFrameInViewProc, "@:{NSRect}@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1979 OS.objc_registerClassPair (cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1980
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1981 className = "SWTTableHeaderView";
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1982 cls = OS.objc_allocateClassPair(OS.class_NSTableHeaderView, className, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1983 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1984 OS.class_addMethod(cls, OS.sel_mouseDown_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1985 OS.objc_registerClassPair(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1986
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1987 className = "SWTOutlineView";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	1988 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSOutlineView, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1989 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1990 OS.class_addMethod(cls, OS.sel_highlightSelectionInClipRect_, highlightSelectionInClipRectProc, "@:{NSRect}");
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	1991 OS.class_addMethod(cls, OS.sel_sendDoubleSelection, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1992 OS.class_addMethod(cls, OS.sel_outlineViewSelectionDidChange_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1993 OS.class_addMethod(cls, OS.sel_outlineViewItemDidExpand_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1994 OS.class_addMethod(cls, OS.sel_outlineView_shouldCollapseItem_, proc4, "@:@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1995 OS.class_addMethod(cls, OS.sel_outlineView_shouldExpandItem_, proc4, "@:@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1996 OS.class_addMethod(cls, OS.sel_outlineView_child_ofItem_, proc5, "@:@i@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1997 OS.class_addMethod(cls, OS.sel_outlineView_isItemExpandable_, proc4, "@:@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1998 OS.class_addMethod(cls, OS.sel_outlineView_numberOfChildrenOfItem_, proc4, "@:@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	1999 OS.class_addMethod(cls, OS.sel_outlineView_objectValueForTableColumn_byItem_, proc5, "@:@@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2000 OS.class_addMethod(cls, OS.sel_outlineView_willDisplayCell_forTableColumn_item_, proc6, "@:@@@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2001 OS.class_addMethod(cls, OS.sel_outlineView_setObjectValue_forTableColumn_byItem_, proc6, "@:@@@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2002 OS.class_addMethod(cls, OS.sel_outlineViewColumnDidMove_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2003 OS.class_addMethod(cls, OS.sel_outlineViewColumnDidResize_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2004 OS.class_addMethod(cls, OS.sel_outlineView_didClickTableColumn_, proc4, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2005 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2006 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2007 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2008 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2009
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2010 className = "SWTTreeItem";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2011 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSObject, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2012 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2013 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2014
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2015 className = "SWTTabView";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2016 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSTabView, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2017 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2018 OS.class_addMethod(cls, OS.sel_tabView_willSelectTabViewItem_, proc4, "@:@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2019 OS.class_addMethod(cls, OS.sel_tabView_didSelectTabViewItem_, proc4, "@:@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2020 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2021 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2022 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2023 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2024
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2025 className = "SWTBox";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2026 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSBox, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2027 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2028 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2029 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2030 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2031 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2032
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2033 className = "SWTProgressIndicator";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2034 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSProgressIndicator, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2035 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2036 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2037 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2038 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2039 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2040
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2041 className = "SWTSlider";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2042 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSSlider, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2043 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2044 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2045 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2046 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2047 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2048
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2049 cls = registerCellSubclass(NSSlider.cellClass(), size, align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2050 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2051 NSSlider.setCellClass(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2052
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2053 className = "SWTPopUpButton";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2054 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSPopUpButton, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2055 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2056 OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2057 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2058 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2059 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2060 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2061
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2062 cls = registerCellSubclass(NSPopUpButton.cellClass(), size, align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2063 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2064 NSPopUpButton.setCellClass(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2065
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2066 className = "SWTComboBox";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2067 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSComboBox, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2068 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2069 OS.class_addMethod(cls, OS.sel_comboBoxSelectionDidChange_, proc3, "@:@");
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2070 OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2071 OS.class_addMethod(cls, OS.sel_textDidChange_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2072 OS.class_addMethod(cls, OS.sel_textViewDidChangeSelection_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2073 OS.class_addMethod(cls, OS.sel_textView_willChangeSelectionFromCharacterRange_toCharacterRange_, textWillChangeSelectionProc, "@:@{NSRange}{NSRange}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2074 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2075 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2076 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2077 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2078
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2079 cls = registerCellSubclass(NSComboBox.cellClass(), size, align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2080 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2081 NSComboBox.setCellClass(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2082
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2083 className = "SWTDatePicker";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2084 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSDatePicker, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2085 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2086 OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2087 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2088 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2089 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2090 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2091
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2092 className = "SWTImageView";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2093 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSImageView, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2094 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2095 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2096 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2097 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2098 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2099
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2100 cls = registerCellSubclass(NSImageView.cellClass(), size, align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2101 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2102 NSImageView.setCellClass(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2103
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2104 className = "SWTStepper";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2105 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSStepper, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2106 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2107 OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2108 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2109 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2110 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2111 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2112
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2113 cls = registerCellSubclass(NSStepper.cellClass(), size, align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2114 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2115 NSStepper.setCellClass(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2116
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2117 className = "SWTScroller";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2118 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSScroller, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2119 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2120 OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2121 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2122 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2123 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2124 OS.objc_registerClassPair(cls);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2125
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2126 className = "SWTMenuItem";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2127 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSMenuItem, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2128 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2129 OS.class_addMethod(cls, OS.sel_sendSelection, proc2, "@:");
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2130 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2131
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2132 className = "SWTTextView";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2133 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSTextView, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2134 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2135 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2136 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2137 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2138 OS.class_addMethod(cls, OS.sel_insertText_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2139 OS.class_addMethod(cls, OS.sel_doCommandBySelector_, proc3, "@::");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2140 OS.class_addMethod(cls, OS.sel_textDidChange_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2141 OS.class_addMethod(cls, OS.sel_textView_clickedOnLink_atIndex_, proc5, "@:@@@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2142 OS.objc_registerClassPair(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2143
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2144 className = "SWTEditorView";
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2145 cls = OS.objc_allocateClassPair(OS.class_NSTextView, className, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2146 OS.class_addMethod(cls, OS.sel_keyDown_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2147 OS.class_addMethod(cls, OS.sel_keyUp_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2148 OS.class_addMethod(cls, OS.sel_insertText_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2149 OS.class_addMethod(cls, OS.sel_doCommandBySelector_, proc3, "@::");
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2150 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2151
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2152 className = "SWTTextField";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2153 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSTextField, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2154 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2155 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2156 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2157 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2158 OS.class_addMethod(cls, OS.sel_textDidChange_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2159 OS.class_addMethod(cls, OS.sel_textViewDidChangeSelection_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2160 OS.class_addMethod(cls, OS.sel_textView_willChangeSelectionFromCharacterRange_toCharacterRange_, textWillChangeSelectionProc, "@:@{NSRange}{NSRange}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2161 OS.objc_registerClassPair(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2162
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2163 cls = registerCellSubclass(NSTextField.cellClass(), size, align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2164 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2165 NSTextField.setCellClass(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2166
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2167 className = "SWTSearchField";
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2168 cls = OS.objc_allocateClassPair(OS.class_NSSearchField, className, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2169 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2170 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2171 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2172 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2173 OS.class_addMethod(cls, OS.sel_textDidChange_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2174 OS.class_addMethod(cls, OS.sel_textViewDidChangeSelection_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2175 OS.class_addMethod(cls, OS.sel_textView_willChangeSelectionFromCharacterRange_toCharacterRange_, textWillChangeSelectionProc, "@:@{NSRange}{NSRange}");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2176 OS.objc_registerClassPair(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2177
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2178 cls = registerCellSubclass(NSSearchField.cellClass(), size, align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2179 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2180 NSSearchField.setCellClass(cls);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2181
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2182 className = "SWTSecureTextField";
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2183 cls = OS.objc_allocateClassPair(OS.class_NSSecureTextField, className, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2184 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2185 addEventMethods(cls, proc2, proc3, drawRectProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2186 addFrameMethods(cls, setFrameOriginProc, setFrameSizeProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2187 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2188 OS.class_addMethod(cls, OS.sel_textDidChange_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2189 OS.class_addMethod(cls, OS.sel_textViewDidChangeSelection_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2190 OS.class_addMethod(cls, OS.sel_textView_willChangeSelectionFromCharacterRange_toCharacterRange_, textWillChangeSelectionProc, "@:@{NSRange}{NSRange}");
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2191 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2192
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2193 // Don't subclass NSSecureTextFieldCell -- you'll get an NSException from [NSSecureTextField setCellClass:]!
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2194
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2195 className = "SWTWindow";
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2196 cls = OS.objc_allocateClassPair(cast(objc.Class) OS.class_NSWindow, className, 0);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2197 OS.class_addIvar(cls, DWT_OBJECT, size, (byte)align, types);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2198 OS.class_addMethod(cls, OS.sel_sendEvent_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2199 OS.class_addMethod(cls, OS.sel_helpRequested_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2200 OS.class_addMethod(cls, OS.sel_canBecomeKeyWindow, proc2, "@:");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2201 OS.class_addMethod(cls, OS.sel_makeFirstResponder_, proc3, "@:@");
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2202 addAccessibilityMethods(cls, proc2, proc3, proc4, accessibilityHitTestProc);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2203 OS.objc_registerClassPair(cls);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2204 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2205
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2206 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2207 * Invokes platform specific functionality to allocate a new GC handle.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2208 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2209 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2210 * API for <code>Display</code>. It is marked public only so that it
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2211 * can be shared within the packages provided by DWT. It is not
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2212 * available on all platforms, and should never be called from
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2213 * application code.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2214 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2215 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2216 * @param data the platform specific GC data
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2217 * @return the platform specific GC handle
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2218 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2219 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2220 * <li>ERROR_DEVICE_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	2221 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2222 * @exception DWTError <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2223 * <li>ERROR_NO_HANDLES if a handle could not be obtained for gc creation</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2224 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2225 */
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2226 public objc.id internal_new_GC (GCData data) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2227 if (isDisposed()) DWT.error(DWT.ERROR_DEVICE_DISPOSED);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2228 if (screenWindow is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2229 NSWindow window = (NSWindow) new NSWindow ().alloc ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2230 NSRect rect = new NSRect();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2231 window = window.initWithContentRect(rect, OS.NSBorderlessWindowMask, OS.NSBackingStoreBuffered, false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2232 window.setReleasedWhenClosed(false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2233 screenWindow = window;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2234 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2235 NSGraphicsContext context = screenWindow.graphicsContext();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2236 // NSAffineTransform transform = NSAffineTransform.transform();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2237 // NSSize size = handle.size();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2238 // transform.translateXBy(0, size.height);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2239 // transform.scaleXBy(1, -1);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2240 // transform.set();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2241 if (data !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2242 int mask = DWT.LEFT_TO_RIGHT \| DWT.RIGHT_TO_LEFT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2243 if ((data.style & mask) is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2244 data.style \|= DWT.LEFT_TO_RIGHT;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2245 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2246 data.device = this;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2247 data.background = getSystemColor(DWT.COLOR_WHITE).handle;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2248 data.foreground = getSystemColor(DWT.COLOR_BLACK).handle;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2249 data.font = getSystemFont();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2250 }
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2251 return context.id_;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2252 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2253
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2254 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2255 * Invokes platform specific functionality to dispose a GC handle.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2256 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2257 * <b>IMPORTANT:</b> This method is <em>not</em> part of the public
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2258 * API for <code>Display</code>. It is marked public only so that it
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2259 * can be shared within the packages provided by DWT. It is not
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2260 * available on all platforms, and should never be called from
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2261 * application code.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2262 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2263 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2264 * @param hDC the platform specific GC handle
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2265 * @param data the platform specific GC data
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2266 */
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2267 public void internal_dispose_GC (objc.id context, GCData data) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2268 if (isDisposed()) DWT.error(DWT.ERROR_DEVICE_DISPOSED);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2269
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2270 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2271
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2272 static bool isValidClass (ClassInfo clazz) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2273 String name = clazz.name;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2274 int index = name.lastIndexOf ('.');
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2275 name = name[0 .. index];
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	2276 index = name.lastIndexOf ('.');
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2277 return name.substring (0, index + 1).equals (PACKAGE_PREFIX);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2278 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2279
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2280 bool isValidThread () {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2281 return thread is Thread.getThis ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2282 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2283
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2284 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2285 * Generate a low level system event.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2286 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2287 * <code>post</code> is used to generate low level keyboard
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2288 * and mouse events. The intent is to enable automated UI
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2289 * testing by simulating the input from the user. Most
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2290 * DWT applications should never need to call this method.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2291 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2292 * Note that this operation can fail when the operating system
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2293 * fails to generate the event for any reason. For example,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2294 * this can happen when there is no such key or mouse button
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2295 * or when the system event queue is full.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2296 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2297 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2298 * <b>Event Types:</b>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2299 * <p>KeyDown, KeyUp
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2300 * <p>The following fields in the <code>Event</code> apply:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2301 * <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2302 * <li>(in) type KeyDown or KeyUp</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2303 * <p> Either one of:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2304 * <li>(in) character a character that corresponds to a keyboard key</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2305 * <li>(in) keyCode the key code of the key that was typed,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2306 * as defined by the key code constants in class <code>DWT</code></li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2307 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2308 * <p>MouseDown, MouseUp</p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2309 * <p>The following fields in the <code>Event</code> apply:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2310 * <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2311 * <li>(in) type MouseDown or MouseUp
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2312 * <li>(in) button the button that is pressed or released
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2313 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2314 * <p>MouseMove</p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2315 * <p>The following fields in the <code>Event</code> apply:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2316 * <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2317 * <li>(in) type MouseMove
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2318 * <li>(in) x the x coordinate to move the mouse pointer to in screen coordinates
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2319 * <li>(in) y the y coordinate to move the mouse pointer to in screen coordinates
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2320 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2321 * </dl>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2322 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2323 * @param event the event to be generated
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2324 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2325 * @return true if the event was generated or false otherwise
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2326 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2327 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2328 * <li>ERROR_NULL_ARGUMENT - if the event is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2329 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2330 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2331 * <li>ERROR_DEVICE_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	2332 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2333 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2334 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2335 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2336 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2337 public bool post(Event event) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2338 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2339 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2340 if (event 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	2341 // int type = event.type;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2342 // switch (type) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2343 // case DWT.KeyDown:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2344 // case DWT.KeyUp: {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2345 // int vKey = Display.untranslateKey (event.keyCode);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2346 // if (vKey !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2347 // return OS.CGPostKeyboardEvent (0, vKey, type is DWT.KeyDown) is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2348 // } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2349 // vKey = -1;
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2350 // int kchrPtr = OS.GetScriptManagerVariable (cast(short) OS.smKCHRCache);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2351 // int key = -1;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2352 // int [] state = new int [1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2353 // int [] encoding = new int [1];
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2354 // short keyScript = cast(short) OS.GetScriptManagerVariable (cast(short) OS.smKeyScript);
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2355 // short regionCode = cast(short) OS.GetScriptManagerVariable (cast(short) OS.smRegionCode);
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2356 // if (OS.UpgradeScriptInfoToTextEncoding (keyScript, cast(short) OS.kTextLanguageDontCare, regionCode, null, encoding) is OS.paramErr) {
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2357 // if (OS.UpgradeScriptInfoToTextEncoding (keyScript, cast(short) OS.kTextLanguageDontCare, cast(short) OS.kTextRegionDontCare, null, encoding) is OS.paramErr) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2358 // encoding [0] = OS.kTextEncodingMacRoman;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2359 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2360 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2361 // int [] encodingInfo = new int [1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2362 // OS.CreateUnicodeToTextInfoByEncoding (encoding [0], encodingInfo);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2363 // if (encodingInfo [0] !is 0) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2364 // char [] input = {event.character};
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2365 // byte [] buffer = new byte [2];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2366 // OS.ConvertFromUnicodeToPString (encodingInfo [0], 2, input, buffer);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2367 // OS.DisposeUnicodeToTextInfo (encodingInfo);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2368 // key = buffer [1] & 0x7f;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2369 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2370 // if (key is -1) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2371 // for (int i = 0 ; i <= 0x7F ; i++) {
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2372 // int result1 = OS.KeyTranslate (kchrPtr, cast(short) (i \| 512), state);
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2373 // int result2 = OS.KeyTranslate (kchrPtr, cast(short) i, state);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2374 // if ((result1 & 0x7f) is key \|\| (result2 & 0x7f) is key) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2375 // vKey = i;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2376 // break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2377 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2378 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2379 // if (vKey is -1) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2380 // return OS.CGPostKeyboardEvent (key, vKey, type is DWT.KeyDown) is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2381 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2382 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2383 // case DWT.MouseDown:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2384 // case DWT.MouseMove:
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2385 // case DWT.MouseUp: {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2386 // CGPoint mouseCursorPosition = new CGPoint ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2387 // int chord = OS.GetCurrentEventButtonState ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2388 // if (type is DWT.MouseMove) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2389 // mouseCursorPosition.x = event.x;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2390 // mouseCursorPosition.y = event.y;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2391 // return OS.CGPostMouseEvent (mouseCursorPosition, true, 5, (chord & 0x1) !is 0, (chord & 0x2) !is 0, (chord & 0x4) !is 0, (chord & 0x8) !is 0, (chord & 0x10) !is 0) is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2392 // } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2393 // int button = event.button;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2394 // if (button < 1 \|\| button > 5) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2395 // bool button1 = false, button2 = false, button3 = false, button4 = false, button5 = false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2396 // switch (button) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2397 // case 1: {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2398 // button1 = type is DWT.MouseDown;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2399 // button2 = (chord & 0x4) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2400 // button3 = (chord & 0x2) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2401 // button4 = (chord & 0x8) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2402 // button5 = (chord & 0x10) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2403 // break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2404 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2405 // case 2: {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2406 // button1 = (chord & 0x1) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2407 // button2 = type is DWT.MouseDown;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2408 // button3 = (chord & 0x2) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2409 // button4 = (chord & 0x8) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2410 // button5 = (chord & 0x10) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2411 // break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2412 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2413 // case 3: {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2414 // button1 = (chord & 0x1) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2415 // button2 = (chord & 0x4) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2416 // button3 = type is DWT.MouseDown;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2417 // button4 = (chord & 0x8) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2418 // button5 = (chord & 0x10) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2419 // break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2420 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2421 // case 4: {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2422 // button1 = (chord & 0x1) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2423 // button2 = (chord & 0x4) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2424 // button3 = (chord & 0x2) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2425 // button4 = type is DWT.MouseDown;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2426 // button5 = (chord & 0x10) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2427 // break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2428 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2429 // case 5: {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2430 // button1 = (chord & 0x1) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2431 // button2 = (chord & 0x4) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2432 // button3 = (chord & 0x2) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2433 // button4 = (chord & 0x8) !is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2434 // button5 = type is DWT.MouseDown;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2435 // break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2436 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2437 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2438 // 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	2439 // OS.GetGlobalMouse (pt);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2440 // mouseCursorPosition.x = pt.h;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2441 // mouseCursorPosition.y = pt.v;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2442 // return OS.CGPostMouseEvent (mouseCursorPosition, true, 5, button1, button3, button2, button4, button5) is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2443 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2444 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2445 // case DWT.MouseWheel: {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2446 // return OS.CGPostScrollWheelEvent (1, event.count) is 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2447 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2448 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2449 return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2450 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2451 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2452
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2453 void postEvent (Event event) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2454 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2455 * Place the event at the end of the event queue.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2456 * This code is always called in the Display's
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2457 * thread so it must be re-enterant but does not
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2458 * need to be synchronized.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2459 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2460 if (eventQueue is null) eventQueue = new Event [4];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2461 int index = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2462 int length = eventQueue.length;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2463 while (index < length) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2464 if (eventQueue [index] is null) break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2465 index++;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2466 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2467 if (index is length) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2468 Event [] newQueue = new Event [length + 4];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2469 System.arraycopy (eventQueue, 0, newQueue, 0, length);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2470 eventQueue = newQueue;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2471 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2472 eventQueue [index] = event;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2473 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2474
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2475 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2476 * Maps a point from one coordinate system to another.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2477 * When the control is null, coordinates are mapped to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2478 * the display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2479 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2480 * NOTE: On right-to-left platforms where the coordinate
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2481 * systems are mirrored, special care needs to be taken
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2482 * when mapping coordinates from one control to another
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2483 * to ensure the result is correctly mirrored.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2484 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2485 * Mapping a point that is the origin of a rectangle and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2486 * then adding the width and height is not equivalent to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2487 * mapping the rectangle. When one control is mirrored
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2488 * and the other is not, adding the width and height to a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2489 * point that was mapped causes the rectangle to extend
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2490 * in the wrong direction. Mapping the entire rectangle
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2491 * instead of just one point causes both the origin and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2492 * the corner of the rectangle to be mapped.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2493 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2494 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2495 * @param from the source <code>Control</code> or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2496 * @param to the destination <code>Control</code> or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2497 * @param point to be mapped
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2498 * @return point with mapped coordinates
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2499 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2500 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2501 * <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	2502 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2503 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2504 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2505 * <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	2506 * <li>ERROR_DEVICE_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	2507 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2508 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2509 * @since 2.1.2
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2510 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2511 public Point map (Control from, Control to, Point point) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2512 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2513 if (point is null) error (DWT.ERROR_NULL_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2514 return map (from, to, point.x, point.y);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2515 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2516
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2517 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2518 * Maps a point from one coordinate system to another.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2519 * When the control is null, coordinates are mapped to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2520 * the display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2521 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2522 * NOTE: On right-to-left platforms where the coordinate
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2523 * systems are mirrored, special care needs to be taken
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2524 * when mapping coordinates from one control to another
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2525 * to ensure the result is correctly mirrored.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2526 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2527 * Mapping a point that is the origin of a rectangle and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2528 * then adding the width and height is not equivalent to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2529 * mapping the rectangle. When one control is mirrored
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2530 * and the other is not, adding the width and height to a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2531 * point that was mapped causes the rectangle to extend
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2532 * in the wrong direction. Mapping the entire rectangle
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2533 * instead of just one point causes both the origin and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2534 * the corner of the rectangle to be mapped.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2535 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2536 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2537 * @param from the source <code>Control</code> or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2538 * @param to the destination <code>Control</code> or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2539 * @param x coordinates to be mapped
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2540 * @param y coordinates to be mapped
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2541 * @return point with mapped coordinates
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2542 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2543 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2544 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2545 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2546 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2547 * <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	2548 * <li>ERROR_DEVICE_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	2549 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2550 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2551 * @since 2.1.2
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2552 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2553 public Point map (Control from, Control to, int x, int y) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2554 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2555 if (from !is null && from.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2556 if (to !is null && to.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2557 Point point = new Point (x, y);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2558 if (from is to) return point;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2559 NSPoint pt = NSPoint();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2560 pt.x = x;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2561 pt.y = y;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2562 NSWindow fromWindow = from !is null ? from.view.window() : null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2563 NSWindow toWindow = to !is null ? to.view.window() : null;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2564 if (toWindow !is null && fromWindow !is null && toWindow.id_ is fromWindow.id_) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2565 pt = from.view.convertPoint_toView_(pt, to.view);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2566 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2567 NSRect primaryFrame = getPrimaryFrame();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2568 if (from !is null) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2569 NSView view = from.contentView ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2570 pt = view.convertPoint_toView_(pt, null);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2571 pt = fromWindow.convertBaseToScreen(pt);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2572 pt.y = primaryFrame.height - pt.y;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2573 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2574 if (to !is null) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2575 NSView view = to.contentView ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2576 pt.y = primaryFrame.height - pt.y;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2577 pt = toWindow.convertScreenToBase(pt);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2578 pt = view.convertPoint_fromView_(pt, null);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2579 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2580 }
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2581 point.x = cast(int)pt.x;
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2582 point.y = cast(int)pt.y;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2583 return point;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2584 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2585
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2586 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2587 * Maps a point from one coordinate system to another.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2588 * When the control is null, coordinates are mapped to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2589 * the display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2590 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2591 * NOTE: On right-to-left platforms where the coordinate
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2592 * systems are mirrored, special care needs to be taken
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2593 * when mapping coordinates from one control to another
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2594 * to ensure the result is correctly mirrored.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2595 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2596 * Mapping a point that is the origin of a rectangle and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2597 * then adding the width and height is not equivalent to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2598 * mapping the rectangle. When one control is mirrored
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2599 * and the other is not, adding the width and height to a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2600 * point that was mapped causes the rectangle to extend
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2601 * in the wrong direction. Mapping the entire rectangle
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2602 * instead of just one point causes both the origin and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2603 * the corner of the rectangle to be mapped.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2604 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2605 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2606 * @param from the source <code>Control</code> or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2607 * @param to the destination <code>Control</code> or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2608 * @param rectangle to be mapped
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2609 * @return rectangle with mapped coordinates
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2610 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2611 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2612 * <li>ERROR_NULL_ARGUMENT - if the rectangle is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2613 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2614 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2615 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2616 * <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	2617 * <li>ERROR_DEVICE_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	2618 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2619 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2620 * @since 2.1.2
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2621 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2622 public Rectangle map (Control from, Control to, Rectangle rectangle) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2623 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2624 if (rectangle 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	2625 return map (from, to, rectangle.x, rectangle.y, rectangle.width, rectangle.height);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2626 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2627
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2628 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2629 * Maps a point from one coordinate system to another.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2630 * When the control is null, coordinates are mapped to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2631 * the display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2632 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2633 * NOTE: On right-to-left platforms where the coordinate
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2634 * systems are mirrored, special care needs to be taken
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2635 * when mapping coordinates from one control to another
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2636 * to ensure the result is correctly mirrored.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2637 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2638 * Mapping a point that is the origin of a rectangle and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2639 * then adding the width and height is not equivalent to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2640 * mapping the rectangle. When one control is mirrored
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2641 * and the other is not, adding the width and height to a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2642 * point that was mapped causes the rectangle to extend
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2643 * in the wrong direction. Mapping the entire rectangle
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2644 * instead of just one point causes both the origin and
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2645 * the corner of the rectangle to be mapped.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2646 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2647 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2648 * @param from the source <code>Control</code> or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2649 * @param to the destination <code>Control</code> or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2650 * @param x coordinates to be mapped
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2651 * @param y coordinates to be mapped
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2652 * @param width coordinates to be mapped
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2653 * @param height coordinates to be mapped
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2654 * @return rectangle with mapped coordinates
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2655 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2656 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2657 * <li>ERROR_INVALID_ARGUMENT - if the Control from or the Control to have been disposed</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2658 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2659 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2660 * <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	2661 * <li>ERROR_DEVICE_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	2662 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2663 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2664 * @since 2.1.2
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2665 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2666 public Rectangle map (Control from, Control to, 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	2667 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2668 if (from !is null && from.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2669 if (to !is null && to.isDisposed()) error (DWT.ERROR_INVALID_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2670 Rectangle rectangle = new Rectangle (x, y, width, height);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2671 if (from is to) return rectangle;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2672 NSPoint pt = NSPoint();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2673 pt.x = x;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2674 pt.y = y;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2675 NSWindow fromWindow = from !is null ? from.view.window() : null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2676 NSWindow toWindow = to !is null ? to.view.window() : null;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2677 if (toWindow !is null && fromWindow !is null && toWindow.id_ is fromWindow.id_) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2678 pt = from.view.convertPoint_toView_(pt, to.view);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2679 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2680 NSRect primaryFrame = getPrimaryFrame();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2681 if (from !is null) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2682 NSView view = from.contentView ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2683 pt = view.convertPoint_toView_(pt, null);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2684 pt = fromWindow.convertBaseToScreen(pt);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2685 pt.y = primaryFrame.height - pt.y;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2686 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2687 if (to !is null) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2688 NSView view = to.contentView ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2689 pt.y = primaryFrame.height - pt.y;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2690 pt = toWindow.convertScreenToBase(pt);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2691 pt = view.convertPoint_fromView_(pt, null);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2692 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2693 }
7 e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2694 rectangle.x = cast(int)pt.x;
e831403a80a9 Add 'cast' to casts Frank Benoit <benoit@tionex.de> parents: 5 diff changeset	2695 rectangle.y = cast(int)pt.y;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2696 return rectangle;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2697 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2698
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2699 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2700 * Reads an event from the operating system's event queue,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2701 * dispatches it appropriately, and returns <code>true</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2702 * if there is potentially more work to do, or <code>false</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2703 * if the caller can sleep until another event is placed on
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2704 * the event queue.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2705 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2706 * In addition to checking the system event queue, this method also
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2707 * checks if any inter-thread messages (created by <code>syncExec()</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2708 * or <code>asyncExec()</code>) are waiting to be processed, and if
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2709 * so handles them before returning.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2710 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2711 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2712 * @return <code>false</code> if the caller can sleep upon return from this method
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2713 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2714 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2715 * <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	2716 * <li>ERROR_DEVICE_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	2717 * <li>ERROR_FAILED_EXEC - if an exception occurred while running an inter-thread message</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2718 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2719 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2720 * @see #sleep
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2721 * @see #wake
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2722 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2723 public bool readAndDispatch () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2724 checkDevice ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2725 if (loopCounter is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2726 pool.release();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2727 pool = (NSAutoreleasePool)new NSAutoreleasePool().alloc().init();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2728 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2729 loopCounter ++;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2730 bool events = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2731 events \|= runTimers ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2732 events \|= runContexts ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2733 events \|= runPopups ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2734 NSEvent event = application.nextEventMatchingMask(0, null, OS.NSDefaultRunLoopMode, true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2735
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2736 try {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2737 if (event !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2738 events = true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2739 application.sendEvent(event);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2740 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2741 // NSEvent event = NSEvent.otherEventWithType(OS.NSApplicationDefined, new NSPoint(), 0, 0, 0, null, DWT_IDLE_TYPE, 0, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2742 // application.postEvent(event, false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2743 // idle = true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2744 // application.run();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2745 // events \|= !idle;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2746 if (events) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2747 runDeferredEvents ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2748 return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2749 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2750 return runAsyncMessages (false);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2751 } finally {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2752 loopCounter --;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2753 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2754
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2755 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2756
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2757 static void register (Display display) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	2758 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2759 for (int i=0; i<Displays.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2760 if (Displays [i] is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2761 Displays [i] = display;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2762 return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2763 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2764 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2765 Display [] newDisplays = new Display [Displays.length + 4];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2766 System.arraycopy (Displays, 0, newDisplays, 0, Displays.length);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2767 newDisplays [Displays.length] = display;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2768 Displays = newDisplays;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2769 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2770 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2771
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2772 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2773 * Releases any internal resources back to the operating
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2774 * system and clears all fields except the device handle.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2775 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2776 * Disposes all shells which are currently open on the display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2777 * After this method has been invoked, all related related shells
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2778 * will answer <code>true</code> when sent the message
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2779 * <code>isDisposed()</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2780 * </p><p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2781 * When a device is destroyed, resources that were acquired
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2782 * on behalf of the programmer need to be returned to the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2783 * operating system. For example, if the device allocated a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2784 * font to be used as the system font, this font would be
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2785 * freed in <code>release</code>. Also,to assist the garbage
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2786 * collector and minimize the amount of memory that is not
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2787 * reclaimed when the programmer keeps a reference to a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2788 * disposed device, all fields except the handle are zero'd.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2789 * The handle is needed by <code>destroy</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2790 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2791 * This method is called before <code>destroy</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2792 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2793 * @see Device#dispose
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2794 * @see #destroy
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2795 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2796 protected void release () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2797 disposing = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2798 sendEvent (DWT.Dispose, new Event ());
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2799 Shell [] shells = getShells ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2800 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	2801 Shell shell = shells [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2802 if (!shell.isDisposed ()) shell.dispose ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2803 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2804 if (tray !is null) tray.dispose ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2805 tray = null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2806 while (readAndDispatch ()) {}
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2807 if (disposeList !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2808 for (int i=0; i<disposeList.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2809 if (disposeList [i] !is null) disposeList [i].run ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2810 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2811 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2812 disposeList = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2813 synchronizer.releaseSynchronizer ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2814 synchronizer = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2815 releaseDisplay ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2816 super.release ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2817 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2818
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2819 void releaseDisplay () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2820 /* Release the System Images */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2821 if (errorImage !is null) errorImage.dispose ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2822 if (infoImage !is null) infoImage.dispose ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2823 if (warningImage !is null) warningImage.dispose ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2824 errorImage = infoImage = warningImage = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2825
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2826 currentCaret = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2827
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2828 /* Release Timers */
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2829 if (hoverTimer !is null) timerExec(-1, hoverTimer);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2830 hoverTimer = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2831 if (caretTimer !is null) timerExec(-1, caretTimer);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2832 caretTimer = null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2833 if (nsTimers !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2834 for (int i=0; i<nsTimers.length; i++) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2835 if (nsTimers [i] !is null) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2836 nsTimers [i].invalidate();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2837 nsTimers [i].release();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2838 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2839 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2840 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2841 nsTimers = null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2842 if (timerDelegate !is null) timerDelegate.release();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2843 timerDelegate = null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2844
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2845 /* Release the System Cursors */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2846 for (int i = 0; i < cursors.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2847 if (cursors [i] !is null) cursors [i].dispose ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2848 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2849 cursors = null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2850
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2851 /* Release Dock image */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2852 if (dockImage !is null) dockImage.release();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2853 dockImage = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2854
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2855 if (screenWindow !is null) screenWindow.release();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2856 screenWindow = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2857
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2858 modalShells = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2859 menuBar = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2860 menus = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2861
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2862 if (markedAttributes !is null) markedAttributes.release();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2863 markedAttributes = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2864
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2865 /* The release pool needs to be released before the call backs. */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2866 if (pool !is null) pool.release();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2867 pool = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2868
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2869 if (application !is null && applicationClass !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2870 OS.object_setClass (application.id, applicationClass);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2871 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2872 application = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2873 applicationClass = 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2874 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2875
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2876 void removeContext (NSGraphicsContext context) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2877 if (contexts is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2878 int count = 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2879 for (int i = 0; i < contexts.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2880 if (contexts[i] !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2881 if (contexts [i].id is context.id) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2882 contexts[i] = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2883 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2884 count++;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2885 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2886 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2887 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2888 if (count is 0) contexts = null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2889 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2890
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2891 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2892 * 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	2893 * be notified when an event of the given type occurs anywhere in
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2894 * a widget. The event type is one of the event constants defined
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2895 * in class <code>DWT</code>.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2896 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2897 * @param eventType the type of event to listen for
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2898 * @param listener the listener which should no longer be notified when the event occurs
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2899 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2900 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2901 * <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	2902 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2903 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2904 * <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	2905 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2906 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2907 * @see Listener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2908 * @see DWT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2909 * @see #addFilter
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2910 * @see #addListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2911 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2912 * @since 3.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2913 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2914 public void removeFilter (int eventType, Listener listener) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2915 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2916 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	2917 if (filterTable is null) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2918 filterTable.unhook (eventType, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2919 if (filterTable.size () is 0) filterTable = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2920 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2921
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2922 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2923 * 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	2924 * be notified when an event of the given type occurs. The event type
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2925 * is one of the event 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	2926 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2927 * @param eventType the type of event to listen for
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2928 * @param listener the listener which should no longer be notified
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2929 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2930 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2931 * <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	2932 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2933 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2934 * <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	2935 * <li>ERROR_DEVICE_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	2936 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2937 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2938 * @see Listener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2939 * @see DWT
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2940 * @see #addListener
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2941 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2942 * @since 2.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2943 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2944 public void removeListener (int eventType, Listener listener) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2945 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2946 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	2947 if (eventTable is null) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2948 eventTable.unhook (eventType, listener);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2949 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2950
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2951 Widget removeWidget (NSObject view) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2952 if (view is null) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2953 int /long/ [] jniRef = new int /long/ [1];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2954 OS.object_getInstanceVariable(view.id, DWT_OBJECT, jniRef);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2955 if (jniRef[0] is 0) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2956 Widget widget = (Widget)OS.JNIGetObject(jniRef[0]);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2957 OS.object_setInstanceVariable(view.id, DWT_OBJECT, 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2958 return widget;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2959 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2960
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2961 void removeMenu (Menu menu) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2962 if (menus is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2963 for (int i = 0; i < menus.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2964 if (menus [i] is menu) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2965 menus[i] = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2966 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2967 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2968 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2969 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2970
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2971 void removePopup (Menu menu) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2972 if (popups is null) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2973 for (int i=0; i<popups.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2974 if (popups [i] is menu) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2975 popups [i] = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2976 return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2977 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2978 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2979 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2980
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2981 bool runAsyncMessages (bool all) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2982 return synchronizer.runAsyncMessages (all);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2983 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2984
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2985 bool runContexts () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2986 if (contexts !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2987 for (int i = 0; i < contexts.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2988 if (contexts[i] !is null) contexts[i].flushGraphics();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2989 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2990 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2991 return false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2992 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	2993
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2994 bool runDeferredEvents () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2995 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2996 * Run deferred events. This code is always
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2997 * called in the Display's thread so it must
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2998 * be re-enterant need not be synchronized.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	2999 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3000 while (eventQueue !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3001
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3002 /* Take an event off the queue */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3003 Event event = eventQueue [0];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3004 if (event is null) break;
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3005 int length_ = eventQueue.length;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3006 System.arraycopy (eventQueue, 1, eventQueue, 0, --length_);
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3007 eventQueue [length_] = null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3008
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3009 /* Run the event */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3010 Widget widget = event.widget;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3011 if (widget !is null && !widget.isDisposed ()) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3012 Widget item = event.item;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3013 if (item is null \|\| !item.isDisposed ()) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3014 widget.notifyListeners (event.type, event);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3015 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3016 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3017
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3018 /*
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3019 * At this point, the event queue could
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3020 * be null due to a recursive invokation
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3021 * when running the event.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3022 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3023 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3024
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3025 /* Clear the queue */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3026 eventQueue = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3027 return true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3028 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3029
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3030 bool runPopups () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3031 if (popups is null) return false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3032 bool result = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3033 while (popups !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3034 Menu menu = popups [0];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3035 if (menu is null) break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3036 int length = popups.length;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3037 System.arraycopy (popups, 1, popups, 0, --length);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3038 popups [length] = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3039 // clearMenuFlags ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3040 runDeferredEvents ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3041 if (!menu.isDisposed ()) menu._setVisible (true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3042 // clearMenuFlags ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3043 result = true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3044 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3045 popups = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3046 return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3047 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3048
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3049 bool runTimers () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3050 if (timerList is null) return false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3051 bool result = false;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3052 for (int i=0; i<timerList.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3053 if (nsTimers [i] is null && timerList [i] !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3054 Runnable runnable = timerList [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3055 timerList [i] = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3056 if (runnable !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3057 result = true;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3058 runnable.run ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3059 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3060 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3061 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3062 return result;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3063 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3064
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3065 void sendEvent (int eventType, Event event) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3066 if (eventTable is null && filterTable is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3067 return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3068 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3069 if (event is null) event = new Event ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3070 event.display = this;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3071 event.type = eventType;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3072 if (event.time is 0) event.time = getLastEventTime ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3073 if (!filterEvent (event)) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3074 if (eventTable !is null) eventTable.sendEvent (event);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3075 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3076 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3077
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3078 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3079 * On platforms which support it, sets the application name
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3080 * to be the argument. On Motif, for example, this can be used
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3081 * to set the name used for resource lookup. Specifying
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3082 * <code>null</code> for the name clears it.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3083 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3084 * @param name the new app name or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3085 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3086 public static void setAppName (String name) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3087 APP_NAME = name;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3088 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3089
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3090 //TODO use custom timer instead of timerExec
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3091 Runnable hoverTimer = new Runnable () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3092 public void run () {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3093 if (currentControl !is null && !currentControl.isDisposed()) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3094 currentControl.sendMouseEvent (null, DWT.MouseHover, trackingControl !is null);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3095 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3096 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3097 };
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3098 //TODO - use custom timer instead of timerExec
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3099 Runnable caretTimer;
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3100
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3101 void setCurrentCaret (Caret caret) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3102 // if (caretID !is 0) OS.RemoveEventLoopTimer (caretID);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3103 // caretID = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3104 currentCaret = caret;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3105 if (currentCaret !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3106 int blinkRate = currentCaret.blinkRate;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3107 timerExec (blinkRate, caretTimer);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3108 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3109 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3110
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3111 void setCursor (Control control) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3112 Cursor cursor = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3113 if (control !is null) cursor = control.findCursor ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3114 if (cursor is null) cursor = getSystemCursor (DWT.CURSOR_ARROW);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3115 cursor.handle.set ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3116 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3117
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3118 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3119 * Sets the location of the on-screen pointer relative to the top left corner
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3120 * of the screen. <b>Note: It is typically considered bad practice for a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3121 * program to move the on-screen pointer location.</b>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3122 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3123 * @param x the new x coordinate for the cursor
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3124 * @param y the new y coordinate for the cursor
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3125 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3126 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3127 * <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	3128 * <li>ERROR_DEVICE_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	3129 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3130 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3131 * @since 2.1
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3132 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3133 public void setCursorLocation (int x, int y) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3134 checkDevice ();
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3135 CGPoint pt = CGPoint ();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3136 pt.x = x; pt.y = y;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3137 OS.CGWarpMouseCursorPosition (pt);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3138 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3139
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3140 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3141 * Sets the location of the on-screen pointer relative to the top left corner
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3142 * of the screen. <b>Note: It is typically considered bad practice for a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3143 * program to move the on-screen pointer location.</b>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3144 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3145 * @param point new position
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3146 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3147 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3148 * <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	3149 * <li>ERROR_NULL_ARGUMENT - if the point is null
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3150 * <li>ERROR_DEVICE_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	3151 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3152 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3153 * @since 2.0
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3154 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3155 public void setCursorLocation (Point point) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3156 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3157 if (point is null) error (DWT.ERROR_NULL_ARGUMENT);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3158 setCursorLocation (point.x, point.y);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3159 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3160
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3161 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3162 * Sets the application defined property of the receiver
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3163 * with the specified name to the given argument.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3164 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3165 * Applications may have associated arbitrary objects with the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3166 * receiver in this fashion. If the objects stored in the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3167 * properties need to be notified when the display is disposed
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3168 * of, it is the application's responsibility provide a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3169 * <code>disposeExec()</code> handler which does so.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3170 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3171 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3172 * @param key the name of the property
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3173 * @param value the new value for the property
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3174 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3175 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3176 * <li>ERROR_NULL_ARGUMENT - if the key is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3177 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3178 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3179 * <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	3180 * <li>ERROR_DEVICE_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	3181 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3182 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3183 * @see #getData(String)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3184 * @see #disposeExec(Runnable)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3185 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3186 public void setData (String key, Object value) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3187 checkDevice ();
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3188 //if (key is null) error (DWT.ERROR_NULL_ARGUMENT);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3189
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3190 if (key.equals (ADD_WIDGET_KEY)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3191 Object [] data = (Object [])value;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3192 NSObject object = (NSObject)data [0];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3193 Widget widget = (Widget)data [1];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3194 if (widget is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3195 removeWidget (object);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3196 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3197 addWidget (object, widget);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3198 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3199 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3200
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3201 /* Remove the key/value pair */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3202 if (value is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3203 if (keys is null) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3204 int index = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3205 while (index < keys.length && !keys [index].equals (key)) index++;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3206 if (index is keys.length) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3207 if (keys.length is 1) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3208 keys = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3209 values = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3210 } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3211 String [] newKeys = new String [keys.length - 1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3212 Object [] newValues = new Object [values.length - 1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3213 System.arraycopy (keys, 0, newKeys, 0, index);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3214 System.arraycopy (keys, index + 1, newKeys, index, newKeys.length - index);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3215 System.arraycopy (values, 0, newValues, 0, index);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3216 System.arraycopy (values, index + 1, newValues, index, newValues.length - index);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3217 keys = newKeys;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3218 values = newValues;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3219 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3220 return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3221 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3222
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3223 /* Add the key/value pair */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3224 if (keys 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: 36 diff changeset	3225 keys = [key];
642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3226 values = [value];
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3227 return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3228 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3229 for (int i=0; i<keys.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3230 if (keys [i].equals (key)) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3231 values [i] = value;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3232 return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3233 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3234 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3235 String [] newKeys = new String [keys.length + 1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3236 Object [] newValues = new Object [values.length + 1];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3237 System.arraycopy (keys, 0, newKeys, 0, keys.length);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3238 System.arraycopy (values, 0, newValues, 0, values.length);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3239 newKeys [keys.length] = key;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3240 newValues [values.length] = value;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3241 keys = newKeys;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3242 values = newValues;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3243 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3244
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3245 void setMenuBar (Menu menu) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3246 if (menu is menuBar) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3247 menuBar = menu;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3248 //remove all existing menu items except the application menu
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3249 NSMenu menubar = application.mainMenu();
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3250 NSInteger count = menubar.numberOfItems();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3251 while (count > 1) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3252 menubar.removeItemAtIndex(count - 1);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3253 count--;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3254 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3255 //set parent of each item to NULL and add them to menubar
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3256 if (menu !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3257 MenuItem[] items = menu.getItems();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3258 for (int i = 0; i < items.length; i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3259 items[i].nsItem.setMenu(null);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3260 menubar.addItem(items[i].nsItem);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3261 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3262 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3263 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3264
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3265 void setModalShell (Shell shell) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3266 if (modalShells is null) modalShells = new Shell [4];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3267 int index = 0, length = modalShells.length;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3268 while (index < length) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3269 if (modalShells [index] is shell) return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3270 if (modalShells [index] is null) break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3271 index++;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3272 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3273 if (index is length) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3274 Shell [] newModalShells = new Shell [length + 4];
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3275 System.arraycopy (modalShells, 0, newModalShells, 0, length);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3276 modalShells = newModalShells;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3277 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3278 modalShells [index] = shell;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3279 Shell [] shells = getShells ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3280 for (int i=0; i<shells.length; i++) shells [i].updateModal ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3281 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3282
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3283 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3284 * Sets the application defined, display specific data
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3285 * associated with the receiver, to the argument.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3286 * The <em>display specific data</em> is a single,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3287 * unnamed field that is stored with every display.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3288 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3289 * Applications may put arbitrary objects in this field. If
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3290 * the object stored in the display specific data needs to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3291 * be notified when the display is disposed of, it is the
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3292 * application's responsibility provide a
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3293 * <code>disposeExec()</code> handler which does so.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3294 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3295 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3296 * @param data the new display specific data
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3297 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3298 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3299 * <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	3300 * <li>ERROR_DEVICE_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	3301 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3302 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3303 * @see #getData()
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3304 * @see #disposeExec(Runnable)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3305 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3306 public void setData (Object data) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3307 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3308 this.data = data;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3309 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3310
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3311 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3312 * Sets the synchronizer used by the display to be
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3313 * the argument, which can not be null.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3314 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3315 * @param synchronizer the new synchronizer for the display (must not be null)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3316 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3317 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3318 * <li>ERROR_NULL_ARGUMENT - if the synchronizer is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3319 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3320 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3321 * <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	3322 * <li>ERROR_DEVICE_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	3323 * <li>ERROR_FAILED_EXEC - if an exception occurred while running an inter-thread message</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3324 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3325 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3326 public void setSynchronizer (Synchronizer synchronizer) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3327 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3328 if (synchronizer 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	3329 if (synchronizer is this.synchronizer) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3330 Synchronizer oldSynchronizer;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3331 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3332 oldSynchronizer = this.synchronizer;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3333 this.synchronizer = synchronizer;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3334 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3335 if (oldSynchronizer !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3336 oldSynchronizer.runAsyncMessages(true);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3337 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3338 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3339
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3340 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3341 * Causes the user-interface thread to <em>sleep</em> (that is,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3342 * to be put in a state where it does not consume CPU cycles)
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3343 * until an event is received or it is otherwise awakened.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3344 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3345 * @return <code>true</code> if an event requiring dispatching was placed on the queue.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3346 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3347 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3348 * <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	3349 * <li>ERROR_DEVICE_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	3350 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3351 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3352 * @see #wake
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3353 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3354 public bool sleep () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3355 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3356 if (getMessageCount () !is 0) return true;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3357 if (loopCounter is 0) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3358 pool.release();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3359 pool = cast(NSAutoreleasePool)(new NSAutoreleasePool()).alloc().init();
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3360 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3361 allowTimers = runAsyncMessages = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3362 NSRunLoop.currentRunLoop().runMode(OS.NSDefaultRunLoopMode, NSDate.distantFuture());
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3363 allowTimers = runAsyncMessages = true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3364 return true;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3365 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3366
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3367 int sourceProc (int info) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3368 return 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3369 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3370
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3371 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3372 * Causes the <code>run()</code> method of the runnable to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3373 * be invoked by the user-interface thread at the next
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3374 * reasonable opportunity. The thread which calls this method
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3375 * is suspended until the runnable completes. Specifying <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3376 * as the runnable simply wakes the user-interface thread.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3377 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3378 * Note that at the time the runnable is invoked, widgets
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3379 * that have the receiver as their display may have been
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3380 * disposed. Therefore, it is necessary to check for this
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3381 * case inside the runnable before accessing the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3382 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3383 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3384 * @param runnable code to run on the user-interface thread or <code>null</code>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3385 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3386 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3387 * <li>ERROR_FAILED_EXEC - if an exception occurred when executing the runnable</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3388 * <li>ERROR_DEVICE_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	3389 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3390 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3391 * @see #asyncExec
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3392 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3393 public void syncExec (Runnable runnable) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3394 Synchronizer synchronizer;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3395 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3396 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3397 synchronizer = this.synchronizer;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3398 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3399 synchronizer.syncExec (runnable);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3400 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3401
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3402 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3403 * Causes the <code>run()</code> method of the runnable to
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3404 * be invoked by the user-interface thread after the specified
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3405 * number of milliseconds have elapsed. If milliseconds is less
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3406 * than zero, the runnable is not executed.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3407 * <p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3408 * Note that at the time the runnable is invoked, widgets
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3409 * that have the receiver as their display may have been
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3410 * disposed. Therefore, it is necessary to check for this
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3411 * case inside the runnable before accessing the widget.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3412 * </p>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3413 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3414 * @param milliseconds the delay before running the runnable
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3415 * @param runnable code to run on the user-interface thread
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3416 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3417 * @exception IllegalArgumentException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3418 * <li>ERROR_NULL_ARGUMENT - if the runnable is null</li>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3419 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3420 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3421 * <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	3422 * <li>ERROR_DEVICE_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	3423 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3424 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3425 * @see #asyncExec
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3426 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3427 public void timerExec (int milliseconds, Runnable runnable) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3428 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3429 //TODO - remove a timer, reschedule a timer not tested
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3430 if (runnable 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	3431 if (timerList is null) timerList = new Runnable [4];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3432 if (nsTimers is null) nsTimers = new NSTimer [4];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3433 int index = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3434 while (index < timerList.length) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3435 if (timerList [index] is runnable) break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3436 index++;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3437 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3438 if (index !is timerList.length) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3439 NSTimer timer = nsTimers [index];
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3440 if (timer is null) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3441 timerList [index] = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3442 } else {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3443 if (milliseconds < 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3444 timer.invalidate();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3445 timerList [index] = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3446 nsTimers [index] = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3447 } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3448 timer.setFireDate(NSDate.dateWithTimeIntervalSinceNow (milliseconds / 1000.0));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3449 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3450 return;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3451 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3452 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3453 if (milliseconds < 0) return;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3454 index = 0;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3455 while (index < timerList.length) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3456 if (timerList [index] is null) break;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3457 index++;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3458 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3459 if (index is timerList.length) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3460 Runnable [] newTimerList = new Runnable [timerList.length + 4];
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3461 SimpleType!(Runnable).arraycopy (timerList, 0, newTimerList, 0, timerList.length);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3462 timerList = newTimerList;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3463 NSTimer [] newTimerIds = new NSTimer [nsTimers.length + 4];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3464 System.arraycopy (nsTimers, 0, newTimerIds, 0, nsTimers.length);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3465 nsTimers = newTimerIds;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3466 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3467 NSNumber userInfo = NSNumber.numberWithInt(index);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3468 NSTimer timer = NSTimer.scheduledTimerWithTimeInterval(milliseconds / 1000.0, timerDelegate, OS.sel_timerProc_, userInfo, false);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3469 timer.retain();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3470 if (timer !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3471 nsTimers [index] = timer;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3472 timerList [index] = runnable;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3473 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3474 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3475
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3476 objc.id timerProc (objc.id id, objc.SEL sel, objc.id timerID) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3477 NSTimer timer = new NSTimer (timerID);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3478 NSNumber number = new NSNumber(timer.userInfo());
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3479 int index = number.intValue();
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3480 if (timerList is null) return null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3481 if (0 <= index && index < timerList.length) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3482 if (allowTimers) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3483 Runnable runnable = timerList [index];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3484 timerList [index] = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3485 nsTimers [index] = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3486 if (runnable !is null) runnable.run ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3487 } else {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3488 nsTimers [index] = null;
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3489 wakeThread ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3490 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3491 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3492 timer.release();
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3493 return null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3494 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3495
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3496 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3497 * Forces all outstanding paint requests for the display
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3498 * to be processed before this method returns.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3499 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3500 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3501 * <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	3502 * <li>ERROR_DEVICE_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	3503 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3504 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3505 * @see Control#update()
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3506 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3507 public void update () {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3508 checkDevice ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3509 // Shell [] shells = getShells ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3510 // 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	3511 // Shell shell = shells [i];
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3512 // if (!shell.isDisposed ()) shell.update (true);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3513 // }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3514
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3515 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3516
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3517 /**
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3518 * If the receiver's user-interface thread was <code>sleep</code>ing,
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3519 * causes it to be awakened and start running again. Note that this
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3520 * method may be called from any thread.
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3521 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3522 * @exception DWTException <ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3523 * <li>ERROR_DEVICE_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	3524 * </ul>
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3525 *
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3526 * @see #sleep
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3527 */
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3528 public void wake () {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3529 synchronized (Device.classinfo) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3530 if (isDisposed ()) error (DWT.ERROR_DEVICE_DISPOSED);
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3531 if (thread is Thread.getThis ()) return;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3532 wakeThread ();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3533 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3534 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3535
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3536 void wakeThread () {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3537 NSObject object = (new NSObject()).alloc().init();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3538 object.performSelectorOnMainThread(OS.sel_release, null, false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3539 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3540
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3541 Control findControl (NSEvent nsEvent, bool checkGrab, bool checkTrim, bool checkWindows) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3542 if (checkGrab && grabControl !is null && !grabControl.isDisposed()) return grabControl;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3543 NSPoint point = NSEvent.mouseLocation();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3544 NSView view = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3545 NSWindow window = nsEvent !is null ? nsEvent.window() : null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3546 if (window !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3547 view = window.contentView().hitTest (window.convertScreenToBase(point));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3548 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3549 if (view is null && checkWindows) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3550 NSArray windows = application.orderedWindows();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3551 for (int i = 0; i < windows.count() && view is null; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3552 window = new NSWindow(windows.objectAtIndex(i));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3553 NSView contentView = window.contentView();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3554 if (contentView !is null) view = contentView.hitTest (window.convertScreenToBase(point));
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3555 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3556 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3557 Control control = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3558 if (view !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3559 do {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3560 Widget widget = getWidget (view);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3561 if (widget instanceof Control) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3562 control = (Control)widget;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3563 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3564 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3565 view = view.superview();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3566 } while (view !is null);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3567 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3568 if (checkTrim) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3569 if (control !is null && control.isTrim (view)) control = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3570 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3571 return control;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3572 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3573
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3574 int /long/ applicationNextEventMatchingMask (int /long/ id, int /long/ sel, int /long/ mask, int /long/ expiration, int /long/ mode, int /long/ dequeue) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3575 objc_super super_struct = new objc_super();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3576 super_struct.receiver = id;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3577 super_struct.super_class = OS.objc_msgSend(id, OS.sel_superclass);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3578 int /long/ result = OS.objc_msgSendSuper(super_struct, sel, mask, expiration, mode, dequeue !is 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3579 if (result !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3580 if (trackingControl !is null && dequeue !is 0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3581 NSEvent nsEvent = new NSEvent(result);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3582 applicationSendMouseEvent(nsEvent, true);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3583 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3584 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3585 return result;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3586 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3587
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3588 void applicationSendMouseEvent (NSEvent nsEvent, bool send) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3589 if (send) runDeferredEvents();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3590 bool up = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3591 int type = (int)/64/nsEvent.type();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3592 switch (type) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3593 case OS.NSLeftMouseDown:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3594 case OS.NSRightMouseDown:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3595 case OS.NSOtherMouseDown: {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3596 Control control = grabControl = findControl(nsEvent, false, true, false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3597 if (control !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3598 if (nsEvent.clickCount() is 1 && (control.state & Widget.DRAG_DETECT) !is 0 && control.hooks (DWT.DragDetect) && control.dragDetect()) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3599 dragging = true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3600 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3601 control.sendMouseEvent (nsEvent, DWT.MouseDown, send);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3602 if (nsEvent.clickCount() is 2) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3603 control.sendMouseEvent (nsEvent, DWT.MouseDoubleClick, send);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3604 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3605 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3606 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3607 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3608 case OS.NSLeftMouseUp:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3609 case OS.NSRightMouseUp:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3610 case OS.NSOtherMouseUp: {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3611 Control control = findControl(nsEvent, true, true, false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3612 if (control !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3613 control.sendMouseEvent (nsEvent, DWT.MouseUp, send);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3614 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3615 grabControl = null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3616 up = true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3617 //FALL THROUGH
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3618 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3619 case OS.NSLeftMouseDragged:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3620 case OS.NSRightMouseDragged:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3621 case OS.NSOtherMouseDragged:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3622 case OS.NSMouseMoved: {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3623 Control control = findControl(nsEvent, true, true, type is OS.NSMouseMoved);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3624 if (dragging) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3625 dragging = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3626 control.sendDragEvent(nsEvent);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3627 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3628 if (control !is currentControl) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3629 if (currentControl !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3630 currentControl.sendMouseEvent (nsEvent, DWT.MouseExit, send);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3631 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3632 currentControl = control;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3633 if (control !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3634 control.sendMouseEvent (nsEvent, DWT.MouseEnter, send);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3635 if (up) timerExec (getToolTipTime (), hoverTimer);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3636 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3637 setCursor (control);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3638 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3639 if (!up && control !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3640 timerExec (getToolTipTime (), hoverTimer);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3641 control.sendMouseEvent (nsEvent, DWT.MouseMove, send);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3642 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3643 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3644 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3645 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3646 }
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3647
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3648 void applicationSendEvent (int /long/ id, int /long/ sel, int /long/ event) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3649 NSEvent nsEvent = new NSEvent(event);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3650 int type = nsEvent.type ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3651 bool beep = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3652 switch (type) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3653 case OS.NSLeftMouseDown:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3654 case OS.NSRightMouseDown:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3655 case OS.NSOtherMouseDown:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3656 beep = true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3657 case OS.NSLeftMouseUp:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3658 case OS.NSRightMouseUp:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3659 case OS.NSMouseMoved:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3660 case OS.NSLeftMouseDragged:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3661 case OS.NSRightMouseDragged:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3662 case OS.NSMouseEntered:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3663 case OS.NSMouseExited:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3664 case OS.NSKeyDown:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3665 case OS.NSKeyUp:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3666 case OS.NSOtherMouseUp:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3667 case OS.NSOtherMouseDragged:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3668 case OS.NSScrollWheel:
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3669 NSWindow window = nsEvent.window ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3670 if (window !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3671 Shell shell = (Shell) getWidget (window.id);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3672 if (shell !is null && shell.getModalShell () !is null) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3673 if (beep) beep ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3674 return;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3675 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3676 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3677 break;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3678 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3679 applicationSendMouseEvent (nsEvent, false);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3680 objc_super super_struct = new objc_super ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3681 super_struct.receiver = id;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3682 super_struct.super_class = OS.objc_msgSend (id, OS.sel_superclass);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3683 OS.objc_msgSendSuper (super_struct, sel, event);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3684 // if (nsEvent.type() is OS.NSApplicationDefined && nsEvent.subtype() is DWT_IDLE_TYPE) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3685 // idle = true;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3686 // } else {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3687 // idle = false;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3688 // }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3689 // application.stop(null);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3690 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3691
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3692 // #245724: [NSApplication isRunning] must return true to allow the AWT to load correctly.
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3693 static int /long/ applicationProc(int /long/ id, int /long/ sel) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3694 //TODO optimize getting the display
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3695 Display display = getCurrent ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3696 if (display is null) return 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3697 if (sel is OS.sel_isRunning) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3698 return display.isDisposed() ? 0 : 1;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3699 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3700 return 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3701 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3702
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3703 static int /long/ applicationProc(int /long/ id, int /long/ sel, int /long/ event) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3704 //TODO optimize getting the display
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3705 Display display = getCurrent ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3706 if (display is null) return 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3707 if (sel is OS.sel_sendEvent_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3708 display.applicationSendEvent (id, sel, event);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3709 return 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3710 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3711 return 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3712 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3713
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3714 static objc.id applicationProc(objc.id id, objc.SEL sel, objc.id arg0, objc.id arg1, objc.id arg2, objc.id arg3) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3715 //TODO optimize getting the display
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3716 Display display = getCurrent ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3717 if (display is null) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3718 if (sel is OS.sel_nextEventMatchingMask_untilDate_inMode_dequeue_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3719 return display.applicationNextEventMatchingMask(id, sel, arg0, arg1, arg2, arg3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3720 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3721 return 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3722 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3723
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3724 static objc.id applicationDelegateProc(objc.id id, objc.SEL sel, objc.id arg0) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3725 //TODO optimize getting the display
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3726 Display display = getCurrent ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3727 if (display is null) return 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3728 id applicationDelegate = display.applicationDelegate;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3729 NSApplication application = display.application;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3730 if (sel is OS.sel_applicationWillFinishLaunching_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3731 NSDictionary dict = NSDictionary.dictionaryWithObject(applicationDelegate, NSString.stringWith("NSOwner"));
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3732 NSString nibFile = NSString.stringWith("/System/Library/Frameworks/JavaVM.framework/Resources/English.lproj/DefaultApp.nib");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3733 if (!NSBundle.loadNibFile(nibFile, dict, 0)) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3734 nibFile = NSString.stringWith("/System/Library/Frameworks/JavaVM.framework/Versions/1.5.0/Resources/English.lproj/DefaultApp.nib");
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3735 NSBundle.loadNibFile(nibFile, dict, 0);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3736 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3737 //replace %@ with application name
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3738 NSMenu mainmenu = application.mainMenu();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3739 NSMenuItem appitem = mainmenu.itemAtIndex(0);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3740 if (appitem !is null) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3741 NSMenu sm = appitem.submenu();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3742 NSArray ia = sm.itemArray();
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3743 for(int i = 0; i < ia.count(); i++) {
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3744 NSMenuItem ni = new NSMenuItem(ia.objectAtIndex(i));
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3745 NSString title = ni.title().stringByReplacingOccurrencesOfString(NSString.stringWith("%@"), NSString.stringWith(APP_NAME));
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3746 ni.setTitle(title);
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3747 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3748 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3749 } else if (sel == OS.sel_terminate_) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3750 application.terminate(application);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3751 } else if (sel == OS.sel_orderFrontStandardAboutPanel_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3752 // Event event = new Event ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3753 // sendEvent (DWT.ABORT, event);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3754 } else if (sel == OS.sel_hideOtherApplications_) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3755 application.hideOtherApplications(application);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3756 } else if (sel == OS.sel_hide_) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3757 application.hide(application);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3758 } else if (sel == OS.sel_unhideAllApplications_) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3759 application.unhideAllApplications(application);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3760 } else if (sel == OS.sel_applicationShouldTerminate_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3761 if (!display.disposing) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3762 Event event = new Event ();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3763 display.sendEvent (DWT.Close, event);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3764 if (event.doit) {
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3765 return cast(objc.id) OS.NSTerminateNow;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3766 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3767 }
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3768 return cast(objc.id) OS.NSTerminateCancel;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3769 } else if (sel == OS.sel_applicationWillTerminate_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3770 display.dispose();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3771 } else if (sel == OS.sel_applicationWillResignActive_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3772 Shell[] shells = display.getShells();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3773 for (int i = 0; i < shells.length; i++) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3774 shells[i].clearLevel();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3775 }
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3776 }
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3777 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3778 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3779
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3780 static objc.id dialogProc(objc.id id, objc.SEL selector, objc.id arg0) {
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3781 String sel = fromStringz(selector);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3782
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3783 objc.id jniRef;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3784 OS.object_getInstanceVariable(id, DWT_OBJECT, jniRef);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3785 if (jniRef is null) return 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3786 if (sel == OS.sel_changeColor_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3787 ColorDialog dialog = (ColorDialog)OS.JNIGetObject(jniRef);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3788 if (jniRef is null) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3789 dialog.changeColor(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3790 } else if (sel == OS.sel_changeFont_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3791 FontDialog dialog = cast(FontDialog)OS.JNIGetObject(jniRef);
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3792 if (dialog is null) return null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3793 dialog.changeFont(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3794 } else if (sel == OS.sel_windowWillClose_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3795 Object object = OS.JNIGetObject(jniRef[0]);
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3796 if (cast(FontDialog) object) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3797 (cast(FontDialog)object).windowWillClose(id, sel, arg0);
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3798 } else if (cast(ColorDialog) object) {
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3799 (cast(ColorDialog)object).windowWillClose(id, sel, arg0);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3800 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3801 }
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3802 return null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3803 }
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3804
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3805 static int objc.id windowDelegateProc2(objc.id id, objc.SEL selector) {
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3806 String sel = fromStringz(selector);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3807
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3808 Widget widget = GetWidget(id);
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3809 if (widget is null) return null;
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3810 if (sel == OS.sel_sendSelection) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3811 widget.sendSelection();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3812 } else if (sel == OS.sel_sendDoubleSelection) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3813 widget.sendDoubleSelection();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3814 } else if (sel == OS.sel_sendVerticalSelection) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3815 widget.sendVerticalSelection();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3816 } else if (sel == OS.sel_sendHorizontalSelection) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3817 widget.sendHorizontalSelection();
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3818 } else if (sel == OS.sel_acceptsFirstResponder) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3819 return widget.acceptsFirstResponder(id, sel) ? cast(objc.id) 1 : null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3820 } else if (sel is OS.sel_becomeFirstResponder) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3821 return widget.becomeFirstResponder(id, sel) ? cast(objc.id) 1 : null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3822 } else if (sel is OS.sel_resignFirstResponder) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3823 return widget.resignFirstResponder(id, sel) ? cast(objc.id) 1 : null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3824 } else if (sel == OS.sel_isFlipped) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3825 return widget.isFlipped(id, sel) ? cast(objc.id) 1 : null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3826 } else if (sel == OS.sel_isOpaque) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3827 return widget.isOpaque(id, sel) ? cast(objc.id) 1 : null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3828 } else if (sel is OS.sel_unmarkText) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3829 //TODO not called?
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3830 } else if (sel is OS.sel_validAttributesForMarkedText) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3831 return widget.validAttributesForMarkedText (id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3832 } else if (sel is OS.sel_markedRange) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3833 NSRange range = widget.markedRange (id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3834 /* NOTE that this is freed in C */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3835 int /long/ result = OS.malloc (NSRange.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3836 OS.memmove (result, range, NSRange.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3837 return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3838 } else if (sel is OS.sel_selectedRange) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3839 NSRange range = widget.selectedRange (id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3840 /* NOTE that this is freed in C */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3841 int /long/ result = OS.malloc (NSRange.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3842 OS.memmove (result, range, NSRange.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3843 return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3844 } else if (sel is OS.sel_hasMarkedText) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3845 return widget.hasMarkedText (id, sel) ? 1 : 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3846 } else if (sel is OS.sel_canBecomeKeyWindow) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3847 return widget.canBecomeKeyWindow (id, sel) ? 1 : 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3848 } else if (sel is OS.sel_accessibilityActionNames) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3849 return widget.accessibilityActionNames(id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3850 } else if (sel is OS.sel_accessibilityAttributeNames) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3851 return widget.accessibilityAttributeNames(id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3852 } else if (sel is OS.sel_accessibilityParameterizedAttributeNames) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3853 return widget.accessibilityParameterizedAttributeNames(id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3854 } else if (sel is OS.sel_accessibilityFocusedUIElement) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3855 return widget.accessibilityFocusedUIElement(id, sel);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3856 } else if (sel is OS.sel_accessibilityIsIgnored) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3857 return (widget.accessibilityIsIgnored(id, sel) ? 1 : 0);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3858 }
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3859 return null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3860 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3861
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3862 static objc.id windowDelegateProc3(objc.id ID, objc.SEL selector, objc.id arg0) {
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3863 String sel = fromStringz(selector);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3864
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3865 if (sel == OS.sel_timerProc_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3866 //TODO optimize getting the display
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3867 Display display = getCurrent ();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3868 if (display is null) return null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3869 return display.timerProc (id, sel, arg0);
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	3870
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3871 if (sel == OS.sel_timerProc_1) {
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3872 return timerProc (arg0_);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3873 }
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3874 Widget widget = GetWidget(id);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3875 if (widget is null && (sel == OS.sel_keyDown_ \|\|sel == OS.sel_keyUp_ \|\|sel == OS.sel_insertText_ \|\|sel == OS.sel_doCommandBySelector_)) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3876 widget = GetFocusControl (new NSView (id).window ());
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	3877 }
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3878 if (widget is null) return null;
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3879 if (sel == OS.sel_windowWillClose_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3880 widget.windowWillClose(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3881 } else if (sel == OS.sel_drawRect_) {
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	3882 NSRect rect = NSRect();
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	3883 OS.memmove(&rect, arg0_, NSRect.sizeof);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3884 widget.drawRect(id, sel, rect);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3885 } else if (sel == OS.sel_setFrameOrigin_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3886 NSPoint point = NSPoint();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3887 OS.memmove(point, arg0, NSPoint.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3888 widget.setFrameOrigin(id, sel, point);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3889 } else if (sel == OS.sel_setFrameSize_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3890 NSSize size = new NSSize();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3891 OS.memmove(size, arg0, NSSize.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3892 widget.setFrameSize(id, sel, size);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3893 } else if (sel == OS.sel_hitTest_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3894 NSPoint point = new NSPoint();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3895 OS.memmove(point, arg0, NSPoint.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3896 return widget.hitTest(id, sel, point);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3897 } else if (sel == OS.sel_windowShouldClose_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3898 return widget.windowShouldClose(id, sel, arg0) ? 1 : 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3899 } else if (sel == OS.sel_mouseDown_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3900 widget.mouseDown(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3901 } else if (sel == OS.sel_keyDown_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3902 widget.keyDown(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3903 } else if (sel == OS.sel_keyUp_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3904 widget.keyUp(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3905 } else if (sel == OS.sel_flagsChanged_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3906 widget.flagsChanged(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3907 } else if (sel == OS.sel_mouseUp_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3908 widget.mouseUp(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3909 } else if (sel == OS.sel_rightMouseDown_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3910 widget.rightMouseDown(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3911 } else if (sel == OS.sel_rightMouseUp_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3912 widget.rightMouseUp(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3913 } else if (sel == OS.sel_otherMouseDown_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3914 widget.otherMouseDown(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3915 } else if (sel == OS.sel_otherMouseUp_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3916 widget.otherMouseUp(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3917 } else if (sel == OS.sel_mouseMoved_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3918 widget.mouseMoved(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3919 } else if (sel == OS.sel_mouseDragged_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3920 widget.mouseDragged(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3921 } else if (sel == OS.sel_mouseEntered_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3922 widget.mouseEntered(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3923 } else if (sel == OS.sel_mouseExited_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3924 widget.mouseExited(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3925 } else if (sel == OS.sel_menuForEvent_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3926 return widget.menuForEvent(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3927 } else if (sel == OS.sel_numberOfRowsInTableView_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3928 return widget.numberOfRowsInTableView(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3929 } else if (sel is OS.sel_comboBoxSelectionDidChange_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3930 widget.comboBoxSelectionDidChange(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3931 } else if (sel is OS.sel_tableViewSelectionDidChange_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3932 widget.tableViewSelectionDidChange(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3933 } else if (sel is OS.sel_windowDidResignKey_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3934 widget.windowDidResignKey(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3935 } else if (sel is OS.sel_windowDidBecomeKey_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3936 widget.windowDidBecomeKey(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3937 } else if (sel is OS.sel_windowDidResize_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3938 widget.windowDidResize(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3939 } else if (sel is OS.sel_windowDidMove_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3940 widget.windowDidMove(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3941 } else if (sel is OS.sel_menuWillOpen_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3942 widget.menuWillOpen(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3943 } else if (sel is OS.sel_menuDidClose_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3944 widget.menuDidClose(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3945 } else if (sel is OS.sel_menuNeedsUpdate_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3946 widget.menuNeedsUpdate(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3947 } else if (sel is OS.sel_outlineViewSelectionDidChange_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3948 widget.outlineViewSelectionDidChange(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3949 } else if (sel is OS.sel_outlineViewItemDidExpand_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3950 widget.outlineViewItemDidExpand(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3951 } else if (sel is OS.sel_sendEvent_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3952 widget.windowSendEvent(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3953 } else if (sel is OS.sel_helpRequested_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3954 widget.helpRequested(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3955 } else if (sel is OS.sel_scrollWheel_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3956 widget.scrollWheel(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3957 } else if (sel is OS.sel_pageDown_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3958 widget.pageDown(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3959 } else if (sel is OS.sel_pageUp_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3960 widget.pageUp(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3961 } else if (sel is OS.sel_textViewDidChangeSelection_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3962 widget.textViewDidChangeSelection(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3963 } else if (sel is OS.sel_textDidChange_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3964 widget.textDidChange(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3965 } else if (sel is OS.sel_attributedSubstringFromRange_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3966 return widget.attributedSubstringFromRange (id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3967 } else if (sel is OS.sel_characterIndexForPoint_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3968 return widget.characterIndexForPoint (id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3969 } else if (sel is OS.sel_firstRectForCharacterRange_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3970 NSRect rect = widget.firstRectForCharacterRange (id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3971 /* NOTE that this is freed in C */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3972 int /long/ result = OS.malloc (NSRect.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3973 OS.memmove (result, rect, NSRect.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3974 return result;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3975 } else if (sel is OS.sel_insertText_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3976 widget.insertText (id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3977 } else if (sel is OS.sel_doCommandBySelector_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3978 widget.doCommandBySelector (id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3979 } else if (sel is OS.sel_highlightSelectionInClipRect_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3980 widget.highlightSelectionInClipRect (id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3981 } else if (sel is OS.sel_reflectScrolledClipView_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3982 widget.reflectScrolledClipView (id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3983 } else if (sel is OS.sel_accessibilityHitTest_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3984 NSPoint point = new NSPoint();
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3985 OS.memmove(point, arg0, NSPoint.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3986 return widget.accessibilityHitTest(id, sel, point);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3987 } else if (sel is OS.sel_accessibilityAttributeValue_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3988 return widget.accessibilityAttributeValue(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3989 } else if (sel is OS.sel_accessibilityIsAttributeSettable_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3990 return (widget.accessibilityIsAttributeSettable(id, sel, arg0) ? 1 : 0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3991 } else if (sel is OS.sel_accessibilityPerformAction_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3992 widget.accessibilityPerformAction(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3993 } else if (sel is OS.sel_accessibilityActionDescription_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3994 widget.accessibilityActionDescription(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3995 } else if (sel is OS.sel_makeFirstResponder_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3996 return widget.makeFirstResponder(id, sel, arg0) ? 1 : 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3997 } else if (sel is OS.sel_tableViewColumnDidMove_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3998 widget.tableViewColumnDidMove(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	3999 } else if (sel is OS.sel_tableViewColumnDidResize_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4000 widget.tableViewColumnDidResize(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4001 } else if (sel is OS.sel_outlineViewColumnDidMove_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4002 widget.outlineViewColumnDidMove(id, sel, arg0);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4003 } else if (sel is OS.sel_outlineViewColumnDidResize_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4004 widget.outlineViewColumnDidResize(id, sel, arg0);
37 642f460a0908 Fixed a lot of compile errors, a "hello world" app compiles now Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 36 diff changeset	4005 }
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4006 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4007
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4008 static objc.id windowDelegateProc4(objc.id id, objc.SEL selector, objc.id arg0, objc.id arg1) {
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	4009 String sel = fromStringz(selector);
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4010
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4011 Widget widget = GetWidget(id);
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	4012
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4013 if (sel == OS.sel_tabView_willSelectTabViewItem_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4014 widget.tabView_willSelectTabViewItem(id, sel, arg0, arg1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4015 } else if (sel ==is OS.sel_tabView_didSelectTabViewItem_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4016 widget.tabView_didSelectTabViewItem(id, sel, arg0, arg1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4017 } else if (sel == OS.sel_outlineView_isItemExpandable_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4018 return widget.outlineView_isItemExpandable(id, sel, arg0, arg1) ? 1 : 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4019 } else if (sel == OS.sel_outlineView_numberOfChildrenOfItem_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4020 return widget.outlineView_numberOfChildrenOfItem(id, sel, arg0, arg1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4021 } else if (sel == OS.sel_outlineView_shouldCollapseItem_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4022 return widget.outlineView_shouldCollapseItem(id, sel, arg0, arg1) ? 1 : 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4023 } else if (sel == OS.sel_outlineView_shouldExpandItem_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4024 return widget.outlineView_shouldExpandItem(id, sel, arg0, arg1) ? 1 : 0;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4025 } else if (sel == OS.sel_menu_willHighlightItem_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4026 widget.menu_willHighlightItem(id, sel, arg0, arg1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4027 } else if (sel == OS.sel_setMarkedText_selectedRange_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4028 widget.setMarkedText_selectedRange (id, sel, arg0, arg1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4029 } else if (sel is OS.sel_drawInteriorWithFrame_inView_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4030 widget.drawInteriorWithFrame_inView (id, sel, arg0, arg1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4031 } else if (sel is OS.sel_accessibilityAttributeValue_forParameter_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4032 return widget.accessibilityAttributeValue_forParameter(id, sel, arg0, arg1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4033 } else if (sel is OS.sel_tableView_didClickTableColumn_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4034 widget.tableView_didClickTableColumn (id, sel, arg0, arg1);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4035 } else if (sel is OS.sel_outlineView_didClickTableColumn_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4036 widget.outlineView_didClickTableColumn (id, sel, arg0, arg1);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4037 }
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	4038 return null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4039 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4040
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4041 objc.id windowDelegateProc5(objc.id id, objc.SEL selector, objc.id arg0, objc.id arg1, objc.id arg2) {
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	4042 String sel = fromStringz(selector);
fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	4043
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4044 Widget widget = GetWidget(id);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4045
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4046 if (sel == OS.sel_tableView_objectValueForTableColumn_row_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4047 return widget.tableView_objectValueForTableColumn_row(id, sel, arg0, arg1, arg2);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4048 } else if (sel == OS.sel_tableView_shouldEditTableColumn_row_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4049 return widget.tableView_shouldEditTableColumn_row(id, sel, arg0, arg1, arg2) ? cast(objc.id) 1 : null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4050 } else if (sel == OS.sel_textView_clickedOnLink_atIndex_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4051 return widget.textView_clickOnLink_atIndex(id, sel, arg0, arg1, arg2) ? cast(objc.id) 1 : null;
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4052 } else if (sel == OS.sel_outlineView_child_ofItem_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4053 return widget.outlineView_child_ofItem(id, sel, arg0, arg1, arg2);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4054 } else if (sel == OS.sel_outlineView_objectValueForTableColumn_byItem_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4055 return widget.outlineView_objectValueForTableColumn_byItem(id, sel, arg0, arg1, arg2);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4056 } else if (sel == OS.sel_textView_willChangeSelectionFromCharacterRange_toCharacterRange_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4057 NSRange range = widget.textView_willChangeSelectionFromCharacterRange_toCharacterRange(id, sel, arg0, arg1, arg2);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4058 /* NOTE that this is freed in C */
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4059 void* result = OS.malloc (NSRange.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4060 OS.memmove (result, range, NSRange.sizeof);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4061 return result;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4062 }
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	4063 return null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4064 }
380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4065
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4066 objc.id windowDelegateProc6(objc.id id, objc.SEL selector, objc.id arg0, objc.id arg1, objc.id arg2, objc.id arg3) {
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	4067 String sel = fromStringz(selector);
fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	4068
45 d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4069 Widget widget = GetWidget(id);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4070
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4071 if (sel == OS.sel_tableView_willDisplayCell_forTableColumn_row_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4072 widget.tableView_willDisplayCell_forTableColumn_row(id, sel, arg0, arg1, arg2, arg3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4073 } else if (sel == OS.sel_outlineView_willDisplayCell_forTableColumn_item_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4074 widget.outlineView_willDisplayCell_forTableColumn_item(id, sel, arg0, arg1, arg2, arg3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4075 } else if (sel == OS.sel_outlineView_setObjectValue_forTableColumn_byItem_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4076 widget.outlineView_setObjectValue_forTableColumn_byItem(id, sel, arg0, arg1, arg2, arg3);
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4077 } else if (sel == OS.sel_tableView_setObjectValue_forTableColumn_row_) {
d8635bb48c7c Merge with SWT 3.5 Jacob Carlborg <doob@me.com> parents: 38 diff changeset	4078 widget.tableView_setObjectValue_forTableColumn_row(id, sel, arg0, arg1, arg2, arg3);
15 2952d5604c0a Ported some widgets, added some stuff to the runtime bindings Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 0 diff changeset	4079 } else if (sel == OS.sel_outlineView_1willDisplayCell_1forTableColumn_1item_1) {
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4080 }
19 fba856099f87 Ported dwt.widgets.Display Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 17 diff changeset	4081 return null;
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4082 }
38 198549365851 Fixed all the runtime errors, hello world app "works" Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 37 diff changeset	4083
198549365851 Fixed all the runtime errors, hello world app "works" Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 37 diff changeset	4084 Widget getWidget (objc.id ID)
198549365851 Fixed all the runtime errors, hello world app "works" Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 37 diff changeset	4085 {
198549365851 Fixed all the runtime errors, hello world app "works" Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 37 diff changeset	4086 NSInteger* dObject;
198549365851 Fixed all the runtime errors, hello world app "works" Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 37 diff changeset	4087 OS.object_getInstanceVariable(ID, "dObject", cast(void**)dObject);
198549365851 Fixed all the runtime errors, hello world app "works" Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 37 diff changeset	4088 if (dObject is null) return null;
198549365851 Fixed all the runtime errors, hello world app "works" Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 37 diff changeset	4089 return cast(Widget)(*dObject);
0 380af2bdd8e5 Upload of whole dwt tree Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: diff changeset	4090 }
38 198549365851 Fixed all the runtime errors, hello world app "works" Jacob Carlborg <doob@me.com> <jacob.carlborg@gmail.com> parents: 37 diff changeset	4091 }

Mercurial > projects > dwt-mac

annotate dwt/widgets/Display.d @ 45:d8635bb48c7c