annotate dwt/layout/FormAttachment.d @ 259:c0d810de7093

Update SWT 3.4M7 to 3.4
author Frank Benoit <benoit@tionex.de>
date Sun, 29 Jun 2008 14:33:38 +0200
parents 380bad9f6852
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
72
5899e0b43e5d porting notice
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
1 /*******************************************************************************
259
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
2 * Copyright (c) 2000, 2008 IBM Corporation and others.
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
3 * All rights reserved. This program and the accompanying materials
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
4 * are made available under the terms of the Eclipse Public License v1.0
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
5 * which accompanies this distribution, and is available at
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
6 * http://www.eclipse.org/legal/epl-v10.html
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
7 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
8 * Contributors:
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
9 * IBM Corporation - initial API and implementation
72
5899e0b43e5d porting notice
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
10 * Port to the D programming language:
5899e0b43e5d porting notice
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
11 * Frank Benoit <benoit@tionex.de>
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
12 *******************************************************************************/
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
13 module dwt.layout.FormAttachment;
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
14
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
15 import dwt.DWT;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
16 import dwt.widgets.Control;
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
17 import dwt.layout.FormLayout;
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
18 import dwt.layout.FormData;
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
19
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
20 import tango.text.convert.Format;
238
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 195
diff changeset
21 import dwt.dwthelper.utils;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
22
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
23 /**
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
24 * Instances of this class are used to define the edges of a control
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
25 * within a <code>FormLayout</code>.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
26 * <p>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
27 * <code>FormAttachments</code> are set into the top, bottom, left,
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
28 * and right fields of the <code>FormData</code> for a control.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
29 * For example:
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
30 * <pre>
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
31 * FormData data = new FormData();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
32 * data.top = new FormAttachment(0,5);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
33 * data.bottom = new FormAttachment(100,-5);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
34 * data.left = new FormAttachment(0,5);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
35 * data.right = new FormAttachment(100,-5);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
36 * button.setLayoutData(data);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
37 * </pre>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
38 * </p>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
39 * <p>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
40 * A <code>FormAttachment</code> defines where to attach the side of
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
41 * a control by using the equation, y = ax + b. The "a" term represents
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
42 * a fraction of the parent composite's width (from the left) or height
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
43 * (from the top). It can be defined using a numerator and denominator,
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
44 * or just a percentage value. If a percentage is used, the denominator
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
45 * is set to 100. The "b" term in the equation represents an offset, in
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
46 * pixels, from the attachment position. For example:
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
47 * <pre>
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
48 * FormAttachment attach = new FormAttachment (20, -5);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
49 * </pre>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
50 * specifies that the side to which the <code>FormAttachment</code>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
51 * object belongs will lie at 20% of the parent composite, minus 5 pixels.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
52 * </p>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
53 * <p>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
54 * Control sides can also be attached to another control.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
55 * For example:
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
56 * <pre>
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
57 * FormAttachment attach = new FormAttachment (button, 10);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
58 * </pre>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
59 * specifies that the side to which the <code>FormAttachment</code>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
60 * object belongs will lie in the same position as the adjacent side of
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
61 * the <code>button</code> control, plus 10 pixels. The control side can
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
62 * also be attached to the opposite side of the specified control.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
63 * For example:
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
64 * <pre>
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
65 * FormData data = new FormData ();
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
66 * data.left = new FormAttachment (button, 0, DWT.LEFT);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
67 * </pre>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
68 * specifies that the left side of the control will lie in the same position
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
69 * as the left side of the <code>button</code> control. The control can also
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
70 * be attached in a position that will center the control on the specified
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
71 * control. For example:
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
72 * <pre>
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
73 * data.left = new FormAttachment (button, 0, DWT.CENTER);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
74 * </pre>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
75 * specifies that the left side of the control will be positioned so that it is
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
76 * centered between the left and right sides of the <code>button</code> control.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
77 * If the alignment is not specified, the default is to attach to the adjacent side.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
78 * </p>
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
79 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
80 * @see FormLayout
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
81 * @see FormData
259
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
82 * @see <a href="http://www.eclipse.org/swt/">Sample code and further information</a>
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
83 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
84 * @since 2.0
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
85 */
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
86 public final class FormAttachment {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
87 /**
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
88 * numerator specifies the numerator of the "a" term in the
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
89 * equation, y = ax + b, which defines the attachment.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
90 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
91 public int numerator;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
92
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
93 /**
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
94 * denominator specifies the denominator of the "a" term in the
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
95 * equation, y = ax + b, which defines the attachment.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
96 *
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
97 * The default value is 100.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
98 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
99 public int denominator = 100;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
100
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
101 /**
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
102 * offset specifies the offset, in pixels, of the control side
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
103 * from the attachment position.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
104 * If the offset is positive, then the control side is offset
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
105 * to the right of or below the attachment position. If it is
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
106 * negative, then the control side is offset to the left of or
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
107 * above the attachment position.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
108 *
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
109 * This is equivalent to the "b" term in the equation y = ax + b.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
110 * The default value is 0.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
111 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
112 public int offset;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
113
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
114 /**
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
115 * control specifies the control to which the control side is
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
116 * attached.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
117 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
118 public Control control;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
119
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
120 /**
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
121 * alignment specifies the alignment of the control side that is
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
122 * attached to a control.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
123 * <p>
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
124 * For top and bottom attachments, TOP, BOTTOM and CENTER are used. For left
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
125 * and right attachments, LEFT, RIGHT and CENTER are used. If any other case
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
126 * occurs, the default will be used instead.
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
127 * </p>
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
128 *
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
129 * <br>Possible values are: <ul>
259
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
130 * <li>{@link DWT#TOP}: Attach the side to the top side of the specified control.</li>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
131 * <li>{@link DWT#BOTTOM}: Attach the side to the bottom side of the specified control.</li>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
132 * <li>{@link DWT#LEFT}: Attach the side to the left side of the specified control.</li>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
133 * <li>{@link DWT#RIGHT}: Attach the side to the right side of the specified control.</li>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
134 * <li>{@link DWT#CENTER}: Attach the side at a position which will center the control on the specified control.</li>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
135 * <li>{@link DWT#DEFAULT}: Attach the side to the adjacent side of the specified control.</li>
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
136 * </ul>
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
137 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
138 public int alignment;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
139
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
140 /**
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
141 * Constructs a new instance of this class.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
142 * Since no numerator, denominator or offset is specified,
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
143 * the attachment is treated as a percentage of the form.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
144 * The numerator is zero, the denominator is 100 and the
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
145 * offset is zero.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
146 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
147 * @since 3.2
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
148 */
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
149 public this () {
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
150 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
151
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
152 /**
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
153 * Constructs a new instance of this class given a numerator
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
154 * Since no denominator or offset is specified, the default
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
155 * is to treat the numerator as a percentage of the form, with a
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
156 * denominator of 100. The offset is zero.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
157 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
158 * @param numerator the percentage of the position
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
159 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
160 * @since 3.0
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
161 */
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
162 public this (int numerator) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
163 this (numerator, 100, 0);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
164 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
165
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
166 /**
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
167 * Constructs a new instance of this class given a numerator
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
168 * and an offset. Since no denominator is specified, the default
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
169 * is to treat the numerator as a percentage of the form, with a
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
170 * denominator of 100.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
171 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
172 * @param numerator the percentage of the position
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
173 * @param offset the offset of the side from the position
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
174 */
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
175 public this (int numerator, int offset) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
176 this (numerator, 100, offset);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
177 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
178
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
179 /**
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
180 * Constructs a new instance of this class given a numerator
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
181 * and denominator and an offset. The position of the side is
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
182 * given by the fraction of the form defined by the numerator
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
183 * and denominator.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
184 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
185 * @param numerator the numerator of the position
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
186 * @param denominator the denominator of the position
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
187 * @param offset the offset of the side from the position
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
188 */
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
189 public this (int numerator, int denominator, int offset) {
195
e0ffca35fe59 Fix: more ==/is
Frank Benoit <benoit@tionex.de>
parents: 150
diff changeset
190 if (denominator is 0) DWT.error (DWT.ERROR_CANNOT_BE_ZERO);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
191 this.numerator = numerator;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
192 this.denominator = denominator;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
193 this.offset = offset;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
194 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
195
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
196 /**
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
197 * Constructs a new instance of this class given a control.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
198 * Since no alignment is specified, the default alignment is
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
199 * to attach the side to the adjacent side of the specified
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
200 * control. Since no offset is specified, an offset of 0 is
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
201 * used.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
202 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
203 * @param control the control the side is attached to
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
204 */
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
205 public this (Control control) {
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
206 this (control, 0, DWT.DEFAULT);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
207 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
208
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
209 /**
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
210 * Constructs a new instance of this class given a control
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
211 * and an offset. Since no alignment is specified, the default
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
212 * alignment is to attach the side to the adjacent side of the
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
213 * specified control.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
214 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
215 * @param control the control the side is attached to
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
216 * @param offset the offset of the side from the control
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
217 */
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
218 public this (Control control, int offset) {
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
219 this (control, offset, DWT.DEFAULT);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
220 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
221
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
222 /**
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
223 * Constructs a new instance of this class given a control,
259
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
224 * an offset and an alignment. The possible alignment values are:
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
225 * <dl>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
226 * <dt><b>{@link DWT#TOP}</b></dt>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
227 * <dd>the side will be attached to the top side of the specified control</dd>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
228 * <dt><b>{@link DWT#BOTTOM}</b></dt>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
229 * <dd>the side will be attached to the bottom side of the specified control</dd>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
230 * <dt><b>{@link DWT#LEFT}</b></dt>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
231 * <dd>the side will be attached to the left side of the specified control</dd>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
232 * <dt><b>{@link DWT#RIGHT}</b></dt>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
233 * <dd>the side will be attached to the right side of the specified control</dd>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
234 * <dt><b>{@link DWT#CENTER}</b></dt>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
235 * <dd>the side will be centered on the same side of the specified control</dd>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
236 * <dt><b>{@link DWT#DEFAULT}</b></dt>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
237 * <dd>the side will be attached to the adjacent side of the specified control</dd>
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
238 * </dl>
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
239 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
240 * @param control the control the side is attached to
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
241 * @param offset the offset of the side from the control
259
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
242 * @param alignment the alignment of the side to the control it is attached to,
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
243 * one of TOP, BOTTOM, LEFT, RIGHT, CENTER, or DEFAULT
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
244 */
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
245 public this (Control control, int offset, int alignment) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
246 this.control = control;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
247 this.offset = offset;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
248 this.alignment = alignment;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
249 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
250
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
251 FormAttachment divide (int value) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
252 return new FormAttachment (numerator, denominator * value, offset / value);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
253 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
254
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
255 int gcd (int m, int n) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
256 int temp;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
257 m = Math.abs (m);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
258 n = Math.abs (n);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
259 if (m < n) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
260 temp = m;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
261 m = n;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
262 n = temp;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
263 }
195
e0ffca35fe59 Fix: more ==/is
Frank Benoit <benoit@tionex.de>
parents: 150
diff changeset
264 while (n !is 0){
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
265 temp = m;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
266 m = n;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
267 n = temp % n;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
268 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
269 return m;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
270 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
271
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
272 FormAttachment minus (FormAttachment attachment) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
273 FormAttachment solution = new FormAttachment ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
274 solution.numerator = numerator * attachment.denominator - denominator * attachment.numerator;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
275 solution.denominator = denominator * attachment.denominator;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
276 int gcd = gcd (solution.denominator, solution.numerator);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
277 solution.numerator = solution.numerator / gcd;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
278 solution.denominator = solution.denominator / gcd;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
279 solution.offset = offset - attachment.offset;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
280 return solution;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
281 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
282
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
283 FormAttachment minus (int value) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
284 return new FormAttachment (numerator, denominator, offset - value);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
285 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
286
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
287 FormAttachment plus (FormAttachment attachment) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
288 FormAttachment solution = new FormAttachment ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
289 solution.numerator = numerator * attachment.denominator + denominator * attachment.numerator;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
290 solution.denominator = denominator * attachment.denominator;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
291 int gcd = gcd (solution.denominator, solution.numerator);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
292 solution.numerator = solution.numerator / gcd;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
293 solution.denominator = solution.denominator / gcd;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
294 solution.offset = offset + attachment.offset;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
295 return solution;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
296 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
297
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
298 FormAttachment plus (int value) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
299 return new FormAttachment (numerator, denominator, offset + value);
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
300 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
301
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
302 int solveX (int value) {
195
e0ffca35fe59 Fix: more ==/is
Frank Benoit <benoit@tionex.de>
parents: 150
diff changeset
303 if (denominator is 0) DWT.error (DWT.ERROR_CANNOT_BE_ZERO);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
304 return ((numerator * value) / denominator) + offset;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
305 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
306
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
307 int solveY (int value) {
195
e0ffca35fe59 Fix: more ==/is
Frank Benoit <benoit@tionex.de>
parents: 150
diff changeset
308 if (numerator is 0) DWT.error (DWT.ERROR_CANNOT_BE_ZERO);
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
309 return (value - offset) * denominator / numerator;
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
310 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
311
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
312 /**
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
313 * Returns a string containing a concise, human-readable
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
314 * description of the receiver.
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
315 *
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
316 * @return a string representation of the FormAttachment
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
317 */
238
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 195
diff changeset
318 public override String toString () {
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 195
diff changeset
319 String string = control !is null ? control.toString () : Format( "{}/{}", numerator, denominator );
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 50
diff changeset
320 return Format("{{y = ({})x + {}}", string, ( offset >= 0 ? Format(")x + {}", offset ) : Format( ")x - {}", -offset)));
50
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
321 }
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
322
d48f7334742c FormLayout, FormData, FormAttachment
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
323 }