学习aswing做的的第一个测试

今天下班后看着aswing的api文档和官方的一些教程,做了些尝试,下面是一个很简单的实例
用了3个组件,JFrame,JButton和JLabel
有空继续学习:razz:

[kml_flashembed movie="http://harryxu.cn/demo/UITest.swf" height="300" width="300" /]

[as]
import org.aswing.JFrame;
import org.aswing.JButton;
import org.aswing.JLabel;
import org.aswing.BorderLayout;
import org.aswing.util.Delegate;
import org.aswing.Event;

class UITest
{
private var frame :JFrame;
private var btn :JButton;
private var lb :JLabel;
private var pc :Number = 0;

function UITest()
{
frame = new JFrame("JFrame test");
lb = new JLabel("AsWing Hello!");
btn = new JButton("Button");
frame.setSize(200, 210);
frame.getContentPane().append(lb, BorderLayout.CENTER);
frame.getContentPane().append(btn, BorderLayout.NORTH);
frame.show();
btn.addEventListener(JButton.ON_CLICKED, Delegate.create(this, onPressButton));
}

private function onPressButton(Void):Void
{
lb.setText("Button Clicked " + (++pc));
}

public static function main(Void):Void
{
Stage.scaleMode = "noScale";
var obj:UITest = new UITest();
trace("all script done", 3);
}
}
[/as]

评论