画板自绘精美的列表框

易语言 2020-07-15 15:50:37

画板自绘精美的列表框

画板信息 = 设置窗口信息_ (画板.取窗口句柄 (), -4, 到整数 (&_画板_鼠标移出)) ' 设置画板鼠标移出事件
列表.创建 (画板)
列表.添加项目 (“易语言”, “最受欢迎的中文编程语言!”, #易语言, #红色)
列表.添加项目 (“测试”, “爱享源码”, #三六零, #墨绿)
.计次循环首 (20, 局部计次)
列表.添加项目 (“易语言粉丝” + 到文本 (局部计次) + “号”, “支持易语言,卸载360!”, #粉丝)
.计次循环尾 ()
列表.插入项目 (1, “爱享”, “路过打下酱油。。。”, #向永俊, #蓝色)
纵向滚动条.最大位置 = 列表.取项目高度 () - 画板.高度