import
win.ui;
import string;
import fsys;
import fsys.file;
/*DSG{{*/
var winform = ..win.form( right=332;bgcolor=15780518;bottom=389;parent=...;text="aardio Form" )
winform.add(
shc={ bottom=139;text="删除";left=257;top=104;z=5;right=312;cls="button" };
listview={ bgcolor=12639424;bottom=302;right=234;left=21;fullRow=1;top=19;z=1;gridLines=1;edge=1;cls="listview" };
dq={ bottom=55;text="读取";left=257;top=20;z=2;right=312;cls="button" };
kslx={ bottom=381;color=0;right=218;left=35;top=349;font=LOGFONT( h=-19 );z=6;text="aardio 之 listview 练习";transparent=1;cls="static" };
qc={ bottom=222;text="清除";left=257;top=187;z=3;right=312;cls="button" };
txtchr2={ bgcolor=12639424;bottom=340;right=163;left=91;multiline=1;top=314;z=8;edge=1;cls="edit" };
txtchr3={ bgcolor=12639424;bottom=340;right=234;left=162;multiline=1;top=314;z=9;edge=1;cls="edit" };
txtchr1={ bgcolor=12639424;bottom=340;right=92;left=20;multiline=1;top=314;z=7;edge=1;cls="edit" };
chr={ bottom=343;text="插入";left=257;top=308;z=4;right=312;cls="button" }
)
/*}}*/
winform.listview.insertColumn("行号",40,1);
winform.listview.insertColumn("1",40,2);//创建列标题;
winform.listview.insertColumn("2",55,3);
winform.listview.insertColumn("3",55,4);
var test1 = fsys.joinpath(fsys.getSpecial(0 /*_CSIDL_DESKTOP*/ ),"\test.txt");//获取文件坐在位置,位于桌面上;
winform.qc.oncommand = function(id,event){
winform.listview.clear();//清除listview控件内容
fsys.file(test1,"w");//同时清空test.txt 文件的内容;
}
winform.chr.oncommand = function(id,event){ //向listview控件内插入一条新纪录 ,同时向test.txt文档尾部添加一行
var chr1 = winform.txtchr1.text;//如果edit控件值为空,则添加一行空记录;
var chr2 = winform.txtchr2.text;
var chr3 = winform.txtchr3.text;
var hh = tostring(winform.listview.count+1);
winform.listview.addItem({hh;chr1;chr2;chr3;});
fsys.file(test1,"a").write(chr1++"="++chr2++"="++chr3++'\r\n');
winform.txtchr1.text = "";//插入一条记录后自动清空edit控件
winform.txtchr2.text = "";
winform.txtchr3.text = "";
}
winform.shc.oncommand = function(id,event){
winform.listview.delItem(winform.listview.selIndex);//仅删除listview控件内的当前选中项,不会删除源文件内容;
for(i=1;winform.listview.count;1){
winform.listview.setItemText(tostring(i),i,1);
}
}
winform.dq.oncommand = function(id,event){
winform.listview.clear();
var x = 1;
for line in io.lines(test1) { //采取分行迭代方法读取test.txt文本的内容;
var a,b,c = table.unpack(string.split(line,"<=>")); //string.split以“=”为分割符分割读取的文本行 然后把分开的三个值分别赋值给a,b,c,模式匹配详细请参考帮助文档和论坛;
winform.listview.addItem({tostring(x);a;b;c;});//显示到listview控件;
x++;
}
}
winform.show()
win.loopMessage();