<?xml version="1.0" encoding="utf-8"?>
<mx:Application xmlns:mx="http://www.adobe.com/2006/mxml"
    layout="absolute" creationComplete="init()">
    <mx:Script>
        <![CDATA[
            import mx.controls.Text;
            import mx.containers.VBox;
            import mx.controls.TextArea;
            import mx.controls.Button;
 
            public var vbox:VBox;
            public var dummyButton:Button;
            public var testButton:Button;
            public var clear:Button;
            public var debug:TextArea;
            public var explanation:Text;
 
            public function init():void
            {
                vbox = new VBox();
                vbox.x = 10;
                vbox.y = 10;
                dummyButton = new Button();
                dummyButton.label = "Button One - No KeyUp Event";
                dummyButton.width = 300;
                dummyButton.addEventListener(MouseEvent.CLICK, handleClick);
                testButton = new Button();
                testButton.label = "Button Two - With KeyUp Event";
                testButton.width = 300;
                testButton.addEventListener(MouseEvent.CLICK, handleClick);
                testButton.addEventListener(KeyboardEvent.KEY_UP, handleKeyUp);
                debug = new TextArea();
                debug.editable = false;
                debug.width = 300;
                debug.height = 150;
                explanation = new Text();
                explanation.text = "This is an example to see that pressing SPACE \n" + 
                        "on a button is thesame with MouseEvent.CLICK \n" + 
                        "event.\n\n" + 
                        "You can click with mouse and also navigate with \n" + 
                        "the TAB key to get focus on buttons. Then press \n" + 
                        "SPACE to see the event in action. \n\n" + 
                        "The first button has only the MouseEvent.Click \n" + 
                        "event set the second has both MouseEvent.Click \n" + 
                        "and KeyboardEvent.KEY_UP. \n\n" + 
                        "Clicking with your mouse on any of these button \n" + 
                        "will throw only one click event but pressing SPACE \n" + 
                        "on the second button it will throw two events: \n" + 
                        "MouseEvent.CLICK and KeyboardEvent.KEY_UP.";
                clear = new Button();
                clear.label = "Clear";
                clear.width = 80;
                clear.addEventListener(MouseEvent.CLICK, handleClear);
                vbox.addChild(dummyButton);
                vbox.addChild(testButton);
                vbox.addChild(debug);
                vbox.addChild(explanation);
                vbox.addChild(clear);
                addChild(vbox);
            }
 
            private function handleClick(event:MouseEvent):void
            {
                debug.text += (event.type + " -> " + 
                        (event.currentTarget as Button).label + "\n");
            }
            private function handleKeyUp(event:KeyboardEvent):void
            {
                debug.text += (event.type + " -> " + 
                        (event.currentTarget as Button).label + "\n");
            }
            private function handleClear(event:MouseEvent):void
            {
                debug.text = "";
            }
        ]]>
    </mx:Script>
</mx:Application>