annotate doodle/main/prog/doodler.d @ 57:9960c4fbd0dd

I is for Interface
author "David Bryant <bagnose@gmail.com>"
date Sun, 08 Aug 2010 22:01:54 +0930
parents b190a9d9352e
children c63719604adb
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
28
1754cb773d41 Part-way through getting to compile with configure/builder.
Graham St Jack <graham.stjack@internode.on.net>
parents: 27
diff changeset
1 private {
44
2b9329ed0f0e Added backtrace support
"David Bryant <bagnose@gmail.com>"
parents: 40
diff changeset
2 import doodle.core.backtrace;
38
452915ecd1f4 Basic logging functionality
David Bryant <bagnose@gmail.com>
parents: 35
diff changeset
3 import doodle.core.logging;
45
01bbf3f6f966 Cleanups
daveb
parents: 44
diff changeset
4 import doodle.core.backtrace;
38
452915ecd1f4 Basic logging functionality
David Bryant <bagnose@gmail.com>
parents: 35
diff changeset
5
28
1754cb773d41 Part-way through getting to compile with configure/builder.
Graham St Jack <graham.stjack@internode.on.net>
parents: 27
diff changeset
6 import doodle.dia.tool_layer;
1754cb773d41 Part-way through getting to compile with configure/builder.
Graham St Jack <graham.stjack@internode.on.net>
parents: 27
diff changeset
7 import doodle.dia.standard_tools;
35
3f6bb0bb22dc Beginnings of grid
David Bryant <bagnose@gmail.com>
parents: 33
diff changeset
8 import doodle.dia.grid_layer;
28
1754cb773d41 Part-way through getting to compile with configure/builder.
Graham St Jack <graham.stjack@internode.on.net>
parents: 27
diff changeset
9 import doodle.dia.page_layer;
20
d6e7a5a6f008 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
10
28
1754cb773d41 Part-way through getting to compile with configure/builder.
Graham St Jack <graham.stjack@internode.on.net>
parents: 27
diff changeset
11 import doodle.gtk.canvas;
51
0eaf39fda206 First cut at palette class
daveb
parents: 48
diff changeset
12 import doodle.gtk.palette;
27
f3d91579bb28 Checkpoint
David Bryant <daveb@acres.com.au>
parents: 22
diff changeset
13
20
d6e7a5a6f008 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
14 import gtk.Main;
d6e7a5a6f008 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
15 import gtk.MainWindow;
27
f3d91579bb28 Checkpoint
David Bryant <daveb@acres.com.au>
parents: 22
diff changeset
16 import gtk.VBox;
20
d6e7a5a6f008 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
17
d6e7a5a6f008 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
18 import std.stdio;
d6e7a5a6f008 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
19 }
d6e7a5a6f008 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
20
56
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
21 class TopLevel {
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
22 this(string[] args) {
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
23 Main.init(args);
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
24 auto window = new MainWindow("Doodle");
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
25 auto vbox = new VBox(false, 0);
54
30ecedfe2ce2 Partial palette support
"David Bryant <bagnose@gmail.com>"
parents: 51
diff changeset
26
56
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
27 auto palette = new Palette;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
28 IPalette.Item[] items = [
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
29 { "select.svg", "Select", "Select and modify elements", &paletteCallback },
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
30 { "rectangle.svg", "Rectangle", "Create rectangle", &paletteCallback },
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
31 { "ellipse.svg", "Ellipse", "Create ellipse", &paletteCallback },
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
32 { "polyline.svg", "Polyline", "Create polyline", &paletteCallback }
54
30ecedfe2ce2 Partial palette support
"David Bryant <bagnose@gmail.com>"
parents: 51
diff changeset
33 ];
30ecedfe2ce2 Partial palette support
"David Bryant <bagnose@gmail.com>"
parents: 51
diff changeset
34 palette.configure(items);
56
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
35 vbox.packStart(palette, false, false, 0);
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
36
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
37 Tool[] tools;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
38 tools ~= new PanTool;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
39 tools ~= new ZoomTool;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
40 tools ~= new SelectTool;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
41 auto toolLayer = new ToolLayer(tools, "Tools");
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
42 _toolStack = toolLayer;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
43
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
44 auto gridLayer = new GridLayer("Grid");
51
0eaf39fda206 First cut at palette class
daveb
parents: 48
diff changeset
45
56
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
46 Layer[] layers;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
47 layers ~= new PageLayer("Page");
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
48 layers ~= gridLayer;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
49 layers ~= toolLayer;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
50 auto canvas = new Canvas(layers, toolLayer, gridLayer, 120.0);
51
0eaf39fda206 First cut at palette class
daveb
parents: 48
diff changeset
51
56
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
52 vbox.packStart(canvas, true, true, 0);
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
53 window.add(vbox);
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
54 window.setDefaultSize(640, 580);
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
55 window.showAll();
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
56 Main.run();
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
57 }
51
0eaf39fda206 First cut at palette class
daveb
parents: 48
diff changeset
58
56
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
59 private {
57
9960c4fbd0dd I is for Interface
"David Bryant <bagnose@gmail.com>"
parents: 56
diff changeset
60 IToolStack _toolStack;
51
0eaf39fda206 First cut at palette class
daveb
parents: 48
diff changeset
61
56
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
62 void paletteCallback(int index) {
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
63 switch (index) {
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
64 case 0:
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
65 // Select
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
66 break;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
67 case 1:
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
68 // Rectangle
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
69 break;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
70 case 2:
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
71 // Ellipse
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
72 break;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
73 case 3:
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
74 // Polyline
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
75 break;
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
76 default:
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
77 assert(0);
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
78 }
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
79 }
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
80 }
20
d6e7a5a6f008 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
81 }
56
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
82
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
83 void main(string[] args) {
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
84 new TopLevel(args);
b190a9d9352e Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 55
diff changeset
85 }