易语言 列表框或超级列表框 的文本如何居中
.版本 2
.支持库 iext
.支持库 iext2
.程序集 窗口程序集1
.程序集变量 行间距, 整数型
.子程序 __启动窗口_创建完毕
.局部变量 x, 整数型
.局部变量 k, 整数型
行间距 = 20
置随机数种子 ()
超级列表框1.全部删除 ()
.计次循环首 (10, )
k = 超级列表框1.插入表项 (, , , , , )
x = 取随机数 (100, 99999)
超级列表框1.置标题 (k, 1, 到文本 (x))
x = 取随机数 (100, 99999)
超级列表框1.置标题 (k, 2, 到文本 (x))
x = 取随机数 (100, 99999)
超级列表框1.置标题 (k, 3, 到文本 (x))
.计次循环尾 ()
整理列表 ()
.子程序 整理列表
超级列表框1.图片组 = 建空图片组 (行间距, 行间距)
透明标签1.标题 = “当前行间距:” + 到文本 (行间距)
.子程序 _按钮2_被单击
行间距 = 行间距 + 1
整理列表 ()
.子程序 _按钮1_被单击
行间距 = 行间距 - 1
整理列表 ()
.版本 2
.局部变量 handle, 整数型
ImageList_Destroy (handle)
handle = ImageList_Create (1, 50, 32, 0, 0)
SendMessage (超级列表框1.取窗口句柄 (), 4099, #LVSIL_SMALL, handle)
.版本 2
.DLL命令 ImageList_Destroy, 整数型, "comctl32.dll", "ImageList_Destroy"
.参数 himl, 整数型
.DLL命令 ImageList_Create, 整数型, "comctl32.dll", "ImageList_Create"
.参数 cx, 整数型
.参数 cy, 整数型
.参数 flags, 整数型
.参数 cInitial, 整数型
.参数 cGrow, 整数型
.DLL命令 SendMessage, 整数型, "user32", "SendMessageA"
.参数 hwnd, 整数型
.参数 wMsg, 整数型
.参数 wParam, 整数型
.参数 lParam, 整数型
2014-03-07
. 第0列宽度设置成0. 用的时候只用1以后的 然后设置报表列,把列对齐方式设为中间对齐就行了、- 参考网络
2.不好弄第 有人说:好像是字体大了他就大了 --参考网络 !