Mercurial > projects > dwt2
annotate org.eclipse.swt.snippets/src/org/eclipse/swt/snippets/Snippet268.d @ 112:9f4c18c268b2
Update to compile and execute with dmd 2.052.
author | kntroh |
---|---|
date | Wed, 16 Mar 2011 21:53:53 +0900 |
parents | 8ae65ae167f5 |
children | 536e43f63c81 |
rev | line source |
---|---|
28 | 1 /******************************************************************************* |
2 * Copyright (c) 2000, 2004 IBM Corporation and others. | |
3 * All rights reserved. This program and the accompanying materials | |
4 * are made available under the terms of the Eclipse Public License v1.0 | |
5 * which accompanies this distribution, and is available at | |
6 * http://www.eclipse.org/legal/epl-v10.html | |
7 * | |
8 * Contributors: | |
9 * IBM Corporation - initial API and implementation | |
10 * D Port: | |
11 * Thomas Demmer <t_demmer AT web DOT de> | |
12 *******************************************************************************/ | |
13 module org.eclipse.swt.snippets.Snippet268; | |
14 | |
15 /* | |
16 * UI Automation (for testing tools) snippet: post mouse wheel events to a styled text | |
17 * | |
18 * For a list of all SWT example snippets see | |
19 * http://www.eclipse.org/swt/snippets/ | |
20 * | |
21 * @since 3.0 | |
22 */ | |
23 import org.eclipse.swt.SWT; | |
24 import org.eclipse.swt.widgets.Display; | |
25 import org.eclipse.swt.widgets.Event; | |
26 import org.eclipse.swt.widgets.Listener; | |
27 import org.eclipse.swt.widgets.Shell; | |
28 | |
29 import java.lang.all; | |
30 | |
31 import org.eclipse.swt.custom.StyledText; | |
32 import org.eclipse.swt.graphics.Point; | |
33 import org.eclipse.swt.layout.FillLayout; | |
34 | |
112 | 35 version(Tango){ |
36 import tango.io.Stdout; | |
37 import tango.util.Convert; | |
38 //import tango.core.Thread; | |
39 } else { // Phobos | |
40 import std.stdio; | |
41 import std.conv; | |
42 } | |
28 | 43 |
44 void main(String[] args) { | |
45 Display display = new Display(); | |
46 Shell shell = new Shell(display); | |
47 shell.setLayout(new FillLayout()); | |
48 StyledText styledText = new StyledText(shell, SWT.V_SCROLL); | |
49 String multiLineString = ""; | |
50 for (int i = 0; i < 200; i++) { | |
51 multiLineString ~= "This is line number " ~ to!(String)(i) ~ | |
52 " in the multi-line string.\n"; | |
53 } | |
54 styledText.setText(multiLineString); | |
55 shell.setSize(styledText.computeSize(SWT.DEFAULT, 400)); | |
56 shell.open(); | |
57 styledText.addListener(SWT.MouseWheel, dgListener( (Event e){ | |
112 | 58 version(Tango){ |
59 Stdout.formatln("Mouse Wheel event \n"); //" + e); | |
60 Stdout.flush(); | |
61 } else { | |
62 writeln("Mouse Wheel event "); //" + e); | |
63 } | |
28 | 64 })); |
112 | 65 Point pt = display.map(shell, null, 50, 50); |
28 | 66 Thread thread = new Thread({ |
67 Event event; | |
68 for (int i = 0; i < 50; i++) { | |
69 event = new Event(); | |
70 event.type = SWT.MouseWheel; | |
71 event.detail = SWT.SCROLL_LINE; | |
72 event.x = pt.x; | |
73 event.y = pt.y; | |
74 event.count = -2; | |
75 display.post(event); | |
76 try { | |
109
8ae65ae167f5
Updated swt win32 for DMD 1.063 and latest Tango trunk.
Jacob Carlborg <doob@me.com>
parents:
28
diff
changeset
|
77 Thread.sleep(400); |
28 | 78 } catch (InterruptedException e) {} |
79 } | |
112 | 80 version(Tango){ |
81 Stdout("Thread done\n").flush(); | |
82 } else { | |
83 writeln("Thread done"); | |
84 } | |
28 | 85 }); |
86 | |
87 thread.start(); | |
88 while (!shell.isDisposed()) { | |
89 if (!display.readAndDispatch()) display.sleep(); | |
90 } | |
91 display.dispose(); | |
92 } |