表驱动法 演示
import win;
import win.ui;
/*DSG{{*/
var winform = win.form( min=1;bottom=249;max=1;text="AAuto Form";right=349 )
winform.add(
button={ bottom=202;text="button";left=108;right=227;top=149;font=LOGFONT( name="宋体";h=-12 );z=0;cls="button" }
)
/*}}*/
var tab = {
button = "开始";
开始 = "暂停";
暂停 = "继续";
继续 = "暂停";
}
winform.button.oncommand = function(id,event){
winform.button.text= tab [winform.button.text]
}
winform.show(true)
win.loopMessage();
阅读(910) | 评论(0) | 转发(1) |