Mercurial > projects > doodle
annotate gui.d @ 11:fb571a3b1f0d
Checkpoint
author | "David Bryant <bagnose@gmail.com>" |
---|---|
date | Sat, 11 Jul 2009 23:32:22 +0930 |
parents | bf7903435f58 |
children | a093c4fbdd43 |
rev | line source |
---|---|
0 | 1 module gui; |
2 | |
11 | 3 import icanvas; |
0 | 4 import canvas; |
2
d6f44347373d
* Switched over to geometry done with structs instead of classes.
David Bryant <daveb@acres.com.au>
parents:
1
diff
changeset
|
5 import tool_stack; |
7 | 6 import tool; |
7 import standard_tools; | |
11 | 8 import page_layer; |
0 | 9 |
10 import gtk.Main; | |
11 import gtk.MainWindow; | |
12 | |
13 import tk.geometry; | |
14 import tk.types; | |
15 import tk.events; | |
16 | |
1 | 17 import std.stdio; |
3
7d57cae10805
Renamed geometry2 to geometry
David Bryant <daveb@acres.com.au>
parents:
2
diff
changeset
|
18 import tk.geometry; |
1 | 19 |
0 | 20 void main(string[] args) { |
21 Main.init(args); | |
22 auto window = new MainWindow("Title"); | |
7 | 23 Tool[] tools; |
24 tools ~= new PanTool; | |
25 tools ~= new ZoomTool; | |
26 auto event_handler = new ToolStack(tools); | |
11 | 27 Layer[] layers; |
28 layers ~= new PageLayer; | |
29 auto canvas = new Canvas(layers, event_handler, 120.0); | |
0 | 30 window.add(canvas); |
8 | 31 window.setDefaultSize(420, 340); |
0 | 32 window.showAll(); |
33 Main.run(); | |
2
d6f44347373d
* Switched over to geometry done with structs instead of classes.
David Bryant <daveb@acres.com.au>
parents:
1
diff
changeset
|
34 |
d6f44347373d
* Switched over to geometry done with structs instead of classes.
David Bryant <daveb@acres.com.au>
parents:
1
diff
changeset
|
35 /* |
3
7d57cae10805
Renamed geometry2 to geometry
David Bryant <daveb@acres.com.au>
parents:
2
diff
changeset
|
36 Point p3 = Point.DEFAULT; |
1 | 37 |
3
7d57cae10805
Renamed geometry2 to geometry
David Bryant <daveb@acres.com.au>
parents:
2
diff
changeset
|
38 Point p1 = Point(3.0, 5.0); |
1 | 39 writefln("%s", p1); |
40 | |
3
7d57cae10805
Renamed geometry2 to geometry
David Bryant <daveb@acres.com.au>
parents:
2
diff
changeset
|
41 Point p2 = Point(1.0, 2.0); |
1 | 42 writefln("%s", p2); |
43 | |
44 writefln("%s", p1 - p2); | |
45 | |
3
7d57cae10805
Renamed geometry2 to geometry
David Bryant <daveb@acres.com.au>
parents:
2
diff
changeset
|
46 Rectangle r = Rectangle(p1, p2); |
1 | 47 writefln("%s", r); |
2
d6f44347373d
* Switched over to geometry done with structs instead of classes.
David Bryant <daveb@acres.com.au>
parents:
1
diff
changeset
|
48 */ |
0 | 49 } |