【AS3代碼】滑鼠觸發例子

來源:互聯網
上載者:User
package
{
    
    import flash.display.Sprite;
    import flash.events.TextEvent;
    import flash.net.URLRequest;
    import flash.net.navigateToURL;
    import flash.text.TextField;

    public class Main extends Sprite
    {    
        private var txt:TextField;
        
        public function Main():void
        {
            init();
        }
        private function init():void
        {
            txt = new TextField();
            txt.width = 300;
            txt.wordWrap = true;
            this.addChild(txt);
            txt.htmlText = "點擊<u><a href='event:geturl|http://www.baidu.com|_blank'>" +
                "這裡</a></u>,會新開啟www.baidu.com的連結。<br/>" +
                "點擊<u><a href='event:load|dafeiji.swf'>這裡</a></u>,則是載入一個動畫。<br/>" +
                "點擊<u><a href='event:move|10'>這裡</a></u>,則是將文字框移動10個像素。";
            
            txt.addEventListener(TextEvent.LINK, clickLink);
        }
        //點選連結
        private function clickLink(evt:TextEvent):void
        {
            trace(evt.text);
            var cmdArray:Array = evt.text.split("|");
            switch(cmdArray[0])
            {
                case "geturl":
                    geturl(cmdArray[1], cmdArray[2]);
                    break;
                case "load":
                    loadswf(cmdArray[1]);
                    break;
                case "move":
                    movetxt(cmdArray[1]);
                    break;
                default:
                    trace(cmdArray);
            }
        }
        private function geturl(url:String,target:String):void
        {
            var tmpRequest:URLRequest = new URLRequest(url);
            navigateToURL(tmpRequest, target);            
        }
        private function loadswf(url:String):void
        {
            trace("調用了SWF:" + url);
        }
        private function movetxt(distance:Number):void
        {
            txt.x += distance;
        }
    }
}

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.