annotate snippets/button/Snippet162.d @ 117:8cdaac0dc743

Added more snippets from TomD
author Frank Benoit <benoit@tionex.de>
date Sat, 12 Jul 2008 20:09:06 +0200
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
117
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
1 /*******************************************************************************
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
2 * Copyright (c) 2000, 2004 IBM Corporation and others.
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
3 * All rights reserved. This program and the accompanying materials
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
4 * are made available under the terms of the Eclipse Public License v1.0
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
5 * which accompanies this distribution, and is available at
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
6 * http://www.eclipse.org/legal/epl-v10.html
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
7 *
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
8 * Contributors:
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
9 * IBM Corporation - initial API and implementation
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
10 * D Port:
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
11 * Thomas Demmer <t_demmer AT web DOT de>
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
12 *******************************************************************************/
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
13 module button.Snippet162;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
14
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
15 /*
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
16 * Adding an accessible listener to provide state information
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
17 *
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
18 * For a list of all SWT example snippets see
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
19 * http://www.eclipse.org/swt/snippets/
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
20 */
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
21 import dwt.DWT;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
22 import dwt.accessibility.ACC;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
23 import dwt.accessibility.Accessible;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
24 import dwt.accessibility.AccessibleAdapter;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
25 import dwt.accessibility.AccessibleControlListener;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
26 import dwt.accessibility.AccessibleControlAdapter;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
27 import dwt.accessibility.AccessibleControlEvent;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
28 import dwt.accessibility.AccessibleEvent;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
29 import dwt.graphics.GC;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
30 import dwt.graphics.Image;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
31 import dwt.graphics.Point;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
32
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
33 import dwt.layout.FillLayout;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
34 import dwt.widgets.Display;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
35 import dwt.widgets.Shell;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
36 import dwt.widgets.Table;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
37 import dwt.widgets.TableColumn;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
38 import dwt.widgets.TableItem;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
39
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
40 import dwt.dwthelper.utils;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
41
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
42
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
43 void main(String[] args){
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
44 Snippet162.main(args);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
45 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
46
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
47 public class Snippet162 {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
48
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
49 final static String STATE = "CheckedIndices";
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
50
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
51 public static void main (String [] args) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
52 final Display display = new Display ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
53 Image checkedImage = getCheckedImage (display);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
54 Image uncheckedImage = getUncheckedImage (display);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
55 Shell shell = new Shell (display);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
56 shell.setLayout (new FillLayout ());
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
57 final Table table = new Table (shell, DWT.BORDER);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
58 TableColumn column1 = new TableColumn (table, DWT.NONE);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
59 TableColumn column2 = new TableColumn (table, DWT.NONE);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
60 TableColumn column3 = new TableColumn (table, DWT.NONE);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
61 TableItem item1 = new TableItem (table, DWT.NONE);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
62 item1.setText ( ["first item", "a", "b"]);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
63 item1.setImage (1, uncheckedImage);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
64 item1.setImage (2, uncheckedImage);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
65 item1.setData (STATE, null);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
66 TableItem item2 = new TableItem (table, DWT.NONE);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
67 item2.setText ( ["second item", "c", "d"]);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
68 item2.setImage (1, uncheckedImage);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
69 item2.setImage (2, checkedImage);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
70 item2.setData (STATE, new ArrayWrapperInt([2]));
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
71 TableItem item3 = new TableItem (table, DWT.NONE);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
72 item3.setText ( ["third", "e", "f"]);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
73 item3.setImage (1, checkedImage);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
74 item3.setImage (2, checkedImage);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
75 item3.setData (STATE, new ArrayWrapperInt( [1, 2]));
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
76 column1.pack ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
77 column2.pack ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
78 column3.pack ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
79
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
80 Accessible accessible = table.getAccessible ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
81 accessible.addAccessibleListener( new class() AccessibleAdapter {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
82 public void getName (AccessibleEvent e) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
83 super.getName (e);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
84 if (e.childID >= 0 && e.childID < table.getItemCount ()) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
85 TableItem item = table.getItem (e.childID);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
86 Point pt = display.getCursorLocation ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
87 pt = display.map (null, table, pt);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
88 for (int i = 0; i < table.getColumnCount (); i++) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
89 if (item.getBounds (i).contains (pt)) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
90 int [] data = (cast(ArrayWrapperInt)item.getData (STATE)).array;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
91 bool checked = false;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
92 if (data !is null) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
93 for (int j = 0; j < data.length; j++) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
94 if (data [j] == i) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
95 checked = true;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
96 break;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
97 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
98 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
99 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
100 e.result = item.getText (i) ~ " " ~ (checked ? "checked" : "unchecked");
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
101 break;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
102 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
103 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
104 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
105 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
106 });
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
107
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
108 accessible.addAccessibleControlListener (new class() AccessibleControlAdapter {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
109 public void getState (AccessibleControlEvent e) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
110 super.getState (e);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
111 if (e.childID >= 0 && e.childID < table.getItemCount ()) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
112 TableItem item = table.getItem (e.childID);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
113 int [] data =(cast(ArrayWrapperInt)item.getData (STATE)).array;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
114 if (data !is null) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
115 Point pt = display.getCursorLocation ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
116 pt = display.map (null, table, pt);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
117 for (int i = 0; i < data.length; i++) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
118 if (item.getBounds (data [i]).contains (pt)) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
119 e.detail |= ACC.STATE_CHECKED;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
120 break;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
121 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
122 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
123 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
124 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
125 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
126 });
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
127 shell.open ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
128 while (!shell.isDisposed ()) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
129 if (!display.readAndDispatch ()) display.sleep ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
130 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
131 checkedImage.dispose ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
132 uncheckedImage.dispose ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
133 display.dispose ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
134 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
135
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
136 static Image getCheckedImage (Display display) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
137 Image image = new Image (display, 16, 16);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
138 GC gc = new GC (image);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
139 gc.setBackground (display.getSystemColor (DWT.COLOR_YELLOW));
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
140 gc.fillOval (0, 0, 16, 16);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
141 gc.setForeground (display.getSystemColor (DWT.COLOR_DARK_GREEN));
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
142 gc.drawLine (0, 0, 16, 16);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
143 gc.drawLine (16, 0, 0, 16);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
144 gc.dispose ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
145 return image;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
146 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
147
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
148 static Image getUncheckedImage (Display display) {
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
149 Image image = new Image (display, 16, 16);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
150 GC gc = new GC (image);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
151 gc.setBackground (display.getSystemColor (DWT.COLOR_YELLOW));
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
152 gc.fillOval (0, 0, 16, 16);
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
153 gc.dispose ();
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
154 return image;
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
155 }
8cdaac0dc743 Added more snippets from TomD
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
156 }