In case Flash no longer exists; a copy of this site is included in the Flashpoint archive's "ultimate" collection.

Dead Code Preservation :: Archived AS3 works from wonderfl.net

forked from: TextFieldがスクロールしてしまう件

TextField をこんな感じで作ったとき、
* TextField の文字をドラッグしたり、
* TextField 上でマウスのスクロールをコロコロすると
* 文字がスクロールしてしまいます。
* どうやったらスクロールしなくなるのでしょうか?
/**
 * Copyright 9re ( http://wonderfl.net/user/9re )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/j3kJ
 */

// forked from bkzen's TextFieldがスクロールしてしまう件
/**
 * TextField をこんな感じで作ったとき、
 * TextField の文字をドラッグしたり、
 * TextField 上でマウスのスクロールをコロコロすると
 * 文字がスクロールしてしまいます。
 * どうやったらスクロールしなくなるのでしょうか?
 */
package {
    import flash.events.MouseEvent;
    import flash.events.Event;
    import flash.text.TextFormatAlign;
    import flash.text.TextFieldAutoSize;
    import flash.text.TextFormat;
    import flash.text.TextField;
    import flash.display.Sprite;
    public class FlashTest extends Sprite {
        public function FlashTest() {
            // write as3 code here..
            var leading:int = 4;
            var logField:TextField = new TextField;
            logField.y = 400;
            
            var txt:TextField = new TextField();
            var tf:TextFormat = new TextFormat(null, 12, 0x777777);
            tf.align = TextFormatAlign.LEFT;
            tf.leading = leading;
            txt.defaultTextFormat = tf;
            //txt.autoSize = TextFieldAutoSize.LEFT;
            txt.text = "ほげほげ\nもっじゃもじゃ\nぴよぴよ";
            log(txt.height);
            // TextFieldの高さを適切に設定すればスクロールされない?
            // autoSizeをやめて、手動で計算してみた。
            txt.height = txt.textHeight + 4 + leading;
            addChild(txt);
            addChild(logField);
            
            function log(...o):void {
                logField.appendText(o + '\n');
            }
        }
    }
}