小人国历险记 发表于 2015-11-9 19:25

易语言取超级列表框现行选中列例子



.版本 2
.支持库 iext

.子程序 取现行选中列, 整数型, , 超级列表框取现行选中列
.参数 超级列表框, 超级列表框
.局部变量 点击位置, 整数型
.局部变量 列表框位置, 整数型
.局部变量 n, 整数型
.局部变量 记录, 整数型
.局部变量 列, 整数型

点击位置 = 取鼠标水平位置 ()
列表框位置 = _启动窗口.左边 + 超级列表框.左边
.计次循环首 (超级列表框.取列数 (), n)
    记录 = 记录 + 超级列表框.取列宽 (n - 1)
    .如果真 (点击位置 ≥ 列表框位置 且 点击位置 ≤ 列表框位置 + 记录)
      跳出循环 ()
    .如果真结束
    列 = 列 + 1
.计次循环尾 ()
返回 (列)

小楠 发表于 2015-11-9 20:03

不错,不过我想我暂时用不到这个功能。

阿萨德22 发表于 2015-11-10 13:35

支持原创!!

本本010 发表于 2015-11-18 01:28

谢谢,正需要 这个呢

linhuaning 发表于 2016-5-14 20:54

干吗用的呢·····················

iwang110 发表于 2016-11-22 10:36

谢谢分享源码
页: [1]
查看完整版本: 易语言取超级列表框现行选中列例子