小男孩‘自慰网亚洲一区二区,亚洲一级在线播放毛片,亚洲中文字幕av每天更新,黄aⅴ永久免费无码,91成人午夜在线精品,色网站免费在线观看,亚洲欧洲wwwww在线观看

分享

aauto的listview(類似于C#的datagrid) 支持文件拖拽獲取名單

 新用戶01684162 2021-07-08

廢柴大叔

2014/01/23 13:10

import win.ui;/*DSG{{*/var winform = ..win.form( bottom=397;parent=...;right=596;text="AAuto Form" )
winform.add( 
checkbox5={ bottom=386;text="項(xiàng)五";left=433;top=370;z=8;right=482;cls="checkbox" };
checkbox2={ bottom=386;text="項(xiàng)二";left=286;top=370;z=5;right=335;cls="checkbox" };
listview={ bgcolor=16777215;bottom=357;right=591;left=6;top=5;acceptfiles=1;z=2;fullRow=1;edge=1;cls="listview" };
edit={ text="分割符    ";bottom=387;right=96;left=9;top=366;z=3;edge=1;cls="edit" };
button={ bottom=390;right=581;left=486;top=363;z=1;text="開(kāi)始導(dǎo)出";cls="button" };
checkbox3={ bottom=386;text="項(xiàng)三";left=335;top=370;z=6;right=382;cls="checkbox" };static={ bottom=386;right=192;left=104;text="拖放文件即可";top=368;z=4;transparent=1;cls="static" };
checkbox4={ bottom=386;text="項(xiàng)四";left=385;top=370;z=7;right=434;cls="checkbox" }
)/*}}*/
 creatTeltable=function(){//winform.listview.setExtended(0x4/*_LVS_EX_CHECKBOXES*/);//勾選框winform.listview.insertColumn("序號(hào)",40,1)
    winform.listview.insertColumn("項(xiàng)二",120,2)
    winform.listview.insertColumn("項(xiàng)三",120,3)
    winform.listview.insertColumn("項(xiàng)四",120,4)
    winform.listview.insertColumn("項(xiàng)五",120,5)
}
creatTeltable()
 
 
winform.listview.wndproc = function(hwnd,message,wParam,lParam){
    select(message) {case 0x233/*_WM_DROPFILES*/{
            winform.listview.clear();
            path = win.getDropFile(wParam )[1];  var x = 1; for line in io.lines(path) { //采取分行迭代方法讀取test.txt文本的內(nèi)容;var a,b,c,d,e = table.unpack(string.split(line,"<"+ winform.edit.text +">")); //string.split以“ ”為分割符分割讀取的文本行 然后把分開(kāi)的值分別賦值給a,b,模式匹配詳細(xì)請(qǐng)參考幫助文檔和論壇;   winform.listview.addItem({tostring(x);a;b;c;d;e});//顯示到listview控件;x++;
                } 
        }
    }//無(wú)返回值則繼續(xù)調(diào)用默認(rèn)回調(diào)函數(shù)}
 
winform.button.oncommand = function(id,event){//winform.msgbox( winform.button.text );for(i=1;winform.listview.count;1){var xinxi = ""if(winform.checkbox2.checked){
            xinxi = xinxi ++ winform.listview.getItemText(i,2) ++ winform.edit.text
        }if(winform.checkbox3.checked){
            xinxi = xinxi ++ winform.listview.getItemText(i,3) ++ winform.edit.text
        }if(winform.checkbox4.checked){
            xinxi = xinxi ++ winform.listview.getItemText(i,4) ++ winform.edit.text
        }if(winform.checkbox5.checked){
            xinxi = xinxi ++ winform.listview.getItemText(i,5)
        }
        string.save("xinxi.txt", tostring(xinxi) + '\r\n' ,true)
    }
    win.msgbox("搞定","ok")
} 
/**
winform.wndproc = function(hwnd,message,wparam,lparam){
    select(message) {//判斷消息類型
        case 0x10/*_WM_CLOSE窗口關(guān)閉消息*/{
            if(win.msgboxTest("你要關(guān)閉窗口么?","詢問(wèn)")=false){
                return wparam; 
            }
        }
         
    }
    //無(wú)返回值則繼續(xù)調(diào)用默認(rèn)回調(diào)函數(shù)
}
**/
 winform.show() 
win.loopMessage();

本文轉(zhuǎn)載自:http://bbs./AAuto_source/t34-1-1.html


打賞
0 贊
0 收藏
分享

    本站是提供個(gè)人知識(shí)管理的網(wǎng)絡(luò)存儲(chǔ)空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點(diǎn)。請(qǐng)注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購(gòu)買等信息,謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評(píng)論

    發(fā)表

    請(qǐng)遵守用戶 評(píng)論公約

    類似文章 更多