ActionScript 3 AS3防止TextArea组件中的多线

Posted 2021-05-23

import flash.text.TextFormat;
import fl.controls.TextArea;
import flash.events.Event;

var myTextArea:TextArea = new TextArea();
myTextArea.setSize(200, 100);
myTextArea.text = "Hello World";

var myTextFormat:TextFormat = new TextFormat();
myTextFormat.font = "Arial";
myTextFormat.size = 22;
myTextFormat.bold = false;
myTextFormat.italic = false;
myTextFormat.underline = false;
myTextArea.setStyle("textFormat", myTextFormat);

myTextArea.x = 30;
myTextArea.y = 30;
addChild(myTextArea);

myTextArea.setStyle("focusRectSkin",Sprite);

myTextArea.addEventListener(Event.CHANGE, onMyTextArea_CHANGE);

function onMyTextArea_CHANGE(event:Event)
{
    myTextArea.text = myTextArea.text.replace("\r", "");
}