customPlus动态添加按钮,滚动条滚动不了(附代码)

niheibie 7天前 134

import win.ui;
/*DSG{{*/
var winform = win.form(text="aardio form";right=893;bottom=455)
winform.add(
button={cls="button";text="添加";left=530;top=330;right=660;bottom=390;color=14120960;flat=1;font=LOGFONT(h=-14);note="添加一个项目";z=2};
plus={cls="plus";left=0;top=0;right=670;bottom=320;clipBk=false;notify=1;z=1};
scrollbar={cls="scrollbar";left=697;top=18;right=717;bottom=314;edge=1;z=3}
)
/*}}*/

winform.show();
import inet.http
// 定义项目模板
var itemModel = {
        {   
            type="rect", 
            rectf={x=3;y=3;width=-3;height=-3},
            name="项目背景色",
            click=true; 
            width=2, 
            round=4,
            color=0xFF009955, 
            fillcolor=0x55009955,   
            hoverfillcolor=0xBB009955, 
        },
        {   
            type="text", 
            rectf={x=3;y=3;width=-3;height=-3},
            name="标题文字",
            align=1; 
            valign=1;
            smooth=true; 
            text="", 
            font={name="Tahoma",h=-13,color=0xFFFFFFFF,weight=700}, 
            hoverfont={name="Tahoma",h=-16,color=0xFFFFFF00,weight=700},
        }
    }
    
//生成项目列表
var itemList = {}
for(i=1;40;1){
    ..table.push(itemList,{标题文字="ITEM"++i})    
}
 
//构造组件
import godking.customPlus
var c = godking.customPlus(winform.plus,itemModel,itemList,{
        itemWidth=80,    /*项目宽度*/
        itemHeight=40,    /*项目高度*/
        autoSizeWidth=1,    /*自动根据项目行数及plus高度调整项目高度*/
        autoSizeHeight=1,    /*自动根据项目列数及plus宽度调整项目宽度*/
        colnum=0,     /*项目列数,为0则根据项目宽度和plus宽度自动计算*/
        rownum=0,     /*项目行数,为0则根据项目高度和plus高度自动计算*/
        padLeft=20,    /*plus左边空白距离*/
        padTop=20,    /*plus顶边空白距离*/
        padRight=20,    /*plus右边空白距离*/
        padBottom=20,    /*plus底边空白距离*/
        bkimg = "https://img1.baidu.com/it/u=3977836567,3094831983&fm=253&fmt=auto&app=138&f=JPEG?w=750&h=500"
});
 
 
c.onClick = function(itemIndex){
		..win.msgbox("您点击了:"++itemIndex)
	}
 
winform.button.oncommand = function(id,event){
	..table.push(itemList,{标题文字="ITEM"++(#itemList+1)})  
	c.update()
	//c.bindScrollbar(winform.scrollbar)
}

c.bindScrollbar(winform.scrollbar)

 
win.loopMessage();


点击添加按钮超出范围后,, 滚动条滚动不了.. 

最新回复 (1)
  • 光庆 6天前
    0 2
    winform.button.oncommand = function(id,event){
        ..table.push(itemList,{标题文字="ITEM"++(#itemList+1)})  
        c.update()
        c.bindScrollbar(winform.scrollbar)
    }


返回