1 <?xml version="1.0" encoding="utf-8"?>
3 xmlns:mx="http://www.adobe.com/2006/mxml"
4 xmlns:halcyon="net.systemeD.halcyon.*"
6 horizontalAlign="center"
7 addedToStage="initApp()">
9 <!-- <halcyon:CountryComboBox /> -->
11 <!-- <halcyon:Map width="400" height="200" id="theMap" /> -->
12 <!-- applicationComplete -->
15 <mx:HDividedBox width="100%" height="100%">
17 <mx:VBox height="100%">
18 <mx:Button label="+" click="theMap.zoomIn();"/>
19 <mx:Button label="-" click="theMap.zoomOut();"/>
21 <mx:Canvas id="map_area" clipContent="true"/>
25 import net.systemeD.halcyon.*;
26 import flash.system.Security;
28 import flash.events.MouseEvent;
29 import flash.display.Sprite;
30 import mx.core.IChildList;
31 import mx.containers.Canvas;
33 public var theMap:Map;
35 private function initApp():void {
37 Globals.vars.root=map_area.rawChildren; // set up global reference to root level
38 var _root:IChildList=map_area.rawChildren; // convenient local shorthand
40 // map backdrop object
41 var b:Canvas = new Canvas();
42 b.height=200; b.width=200;
43 b.setStyle("backgroundColor", 0xFFFFEA);
44 //var b:Sprite=new Sprite();
45 //b.graphics.beginFill(0xFFFFEA,100);
46 //b.graphics.drawRect(0,0,200,200);
47 //b.graphics.endFill();
53 _root.addChild(theMap);
56 var s:Sprite=new Sprite();
57 s.graphics.beginFill(0xFFFFFF,100);
58 s.graphics.drawRect(0,0,200,200);
65 s.graphics.lineStyle(2,0);
66 s.graphics.moveTo(stage.stageWidth/2-20,stage.stageHeight/2);
67 s.graphics.lineTo(stage.stageWidth/2+20,stage.stageHeight/2);
68 s.graphics.moveTo(stage.stageWidth/2,stage.stageHeight/2-20);
69 s.graphics.lineTo(stage.stageWidth/2,stage.stageHeight/2+20);
72 // mouse-up handler attached to stage, so the user can release outside the map
73 stage.addEventListener(MouseEvent.MOUSE_UP, theMap.mouseUpHandler);
74 theMap.backdrop.addEventListener(MouseEvent.MOUSE_MOVE, theMap.mouseMoveHandler);
75 theMap.backdrop.addEventListener(MouseEvent.MOUSE_DOWN, theMap.mouseDownHandler);
77 // keyboard event attached to stage
78 stage.addEventListener(KeyboardEvent.KEY_UP, theMap.keyUpHandler);
81 var t:TextField=new TextField();
82 t.width=400; t.height=100; t.border=true;