annotate page_layer.d @ 17:c643c04e3f5e

Checkpoint
author David Bryant <daveb@acres.com.au>
date Mon, 13 Jul 2009 16:46:21 +0930
parents 9e63308b749c
children df8d81d9f499
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
17
c643c04e3f5e Checkpoint
David Bryant <daveb@acres.com.au>
parents: 16
diff changeset
1 module page_layer;
c643c04e3f5e Checkpoint
David Bryant <daveb@acres.com.au>
parents: 16
diff changeset
2
c643c04e3f5e Checkpoint
David Bryant <daveb@acres.com.au>
parents: 16
diff changeset
3 private {
c643c04e3f5e Checkpoint
David Bryant <daveb@acres.com.au>
parents: 16
diff changeset
4 import cairo_support;
c643c04e3f5e Checkpoint
David Bryant <daveb@acres.com.au>
parents: 16
diff changeset
5 }
c643c04e3f5e Checkpoint
David Bryant <daveb@acres.com.au>
parents: 16
diff changeset
6
c643c04e3f5e Checkpoint
David Bryant <daveb@acres.com.au>
parents: 16
diff changeset
7 public {
c643c04e3f5e Checkpoint
David Bryant <daveb@acres.com.au>
parents: 16
diff changeset
8 import icanvas;
c643c04e3f5e Checkpoint
David Bryant <daveb@acres.com.au>
parents: 16
diff changeset
9 }
10
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
10
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
11 interface Page {
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
12 }
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
13
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
14 class PageLayer : Layer, Page {
12
a093c4fbdd43 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 11
diff changeset
15 this(in string name) {
a093c4fbdd43 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 11
diff changeset
16 super(name);
16
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
17 mPageGeometry = Rectangle(Point.DEFAULT, Vector(210.0, 297.0));
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
18 //mPageGeometry = Rectangle(Point.DEFAULT, Vector(100.0, 100.0));
11
fb571a3b1f0d Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 10
diff changeset
19 }
fb571a3b1f0d Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 10
diff changeset
20
fb571a3b1f0d Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 10
diff changeset
21 override Rectangle bounds() const {
fb571a3b1f0d Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 10
diff changeset
22 return mPageGeometry;
fb571a3b1f0d Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 10
diff changeset
23 }
fb571a3b1f0d Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 10
diff changeset
24
12
a093c4fbdd43 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 11
diff changeset
25 override void draw(const Viewport viewport, in Rectangle damage,
16
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
26 Context model_cr, Context pixel_cr) const {
10
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
27 // Make the paper white, with a border
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
28
16
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
29 model_cr.setSourceRgba(1.0, 0.5, 1.0, 0.5);
12
a093c4fbdd43 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 11
diff changeset
30 rectangle(model_cr, mPageGeometry);
a093c4fbdd43 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 11
diff changeset
31 model_cr.fill();
10
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
32
16
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
33 model_cr.setSourceRgba(0.3, 0.0, 0.0, 0.5);
12
a093c4fbdd43 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 11
diff changeset
34 rectangle(model_cr, mPageGeometry);
a093c4fbdd43 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 11
diff changeset
35 model_cr.stroke();
a093c4fbdd43 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 11
diff changeset
36
16
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
37 /*
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
38 pixel_cr.setSourceRgba(1.0, 1.0, 0.5, 0.4);
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
39 rectangle(pixel_cr, viewport.model_to_pixel(mPageGeometry));
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
40 pixel_cr.fill();
12
a093c4fbdd43 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 11
diff changeset
41
16
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
42 pixel_cr.setSourceRgba(0.0, 0.3, 0.0, 0.4);
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
43 rectangle(pixel_cr, viewport.model_to_pixel(mPageGeometry));
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
44 //rectangle(pixel_cr, viewport.model_to_pixel(Rectangle(mPageGeometry.position, mPageGeometry.size / 2.0)));
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
45 pixel_cr.stroke();
9e63308b749c * Fix up public/private includes
David Bryant <daveb@acres.com.au>
parents: 12
diff changeset
46 */
10
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
47 }
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
48
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
49 private {
11
fb571a3b1f0d Checkpoint
"David Bryant <bagnose@gmail.com>"
parents: 10
diff changeset
50 Rectangle mPageGeometry;
10
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
51 }
71ca82e0eb76 Checkpoint
"David Bryant <bagnose@gmail.com>"
parents:
diff changeset
52 }