炫彩界面库-Access例子

guland

回复 15# chzj589


    控件跟随主窗口 需要用到布局函数，就跟网页中的布局类似，如果用纯代码写的话可能有些复杂，你看看帮助文档-其他模块-LayoutObject-布局对象，用UI设计设置布局很方便，UI设计器里面的360的例子就是用到了布局，

chzj589

回复 16# guland
谢谢！信息收到了吗？

guland

回复 17# chzj589


    已经收到了，晚上回家就上传上去

chzj589

添加了导入EXCEL到XList_Create列表。
但XList_Create列表的数据还无法读取，所以就不能导出到EXCEL。

chzj589

回复 19# chzj589

读取速度快

chzj589

回复  chzj589
guland 发表于 2016-3-29 18:30

这几天又学习炫彩界面，上面的函数不会使用，
我想复制List列表1到List列表2，请帮助，谢谢！
代码：-------------------------------------------------------------

#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_UseUpx=n
#AutoIt3Wrapper_UseX64=n
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
Global $_hAdapter
#include "XCGUI_Fun.au3"
XInitXCGUI()
$create = XWnd_Create("500", "500", "900", "700", "窗口测试", 47)
$str = XShapeText_Create("8", "6", "100", "20", "   复制List列表1到List列表2", $create)
$font = XFont_Create2("宋体", "12", True, False, False, False) ;创建字体
XShapeText_SetFont($str, $font) ;设置XShapeText元素字体
XShapeText_SetTextColor($str, 0x00ff66, 255) ;设置XShapeText元素颜色
$XList = XList_Create("20", "40", "840", "300", $create)
XList_SetItemHeightDefault($XList, 18, 25) ;设置项未选中高度,选中高度
$ggg = XList_SetItemTemplateXML($XList, @ScriptDir & "\List_Item.xml") ;加载列表模板
XList_AddColumn($XList, 100) ;设置列宽度
XList_AddColumn($XList, 100)
XList_AddColumn($XList, 100)
XList_AddColumn($XList, 100)
XList_AddColumn($XList, 100)
XList_AddColumn($XList, 100)
XList_AddColumn($XList, 100)
$XAm = XAdapterMap_Create()
XList_BindAdapterHeader($XList, $XAm)
$XA = XAdapterTable_Create()
XList_BindAdapter($XList, $XA)
XAdapterTable_AddColumn($XA, "name")
XAdapterTable_AddColumn($XA, "name2")
XAdapterTable_AddColumn($XA, "name3")
XAdapterTable_AddColumn($XA, "name4")
XAdapterTable_AddColumn($XA, "name5")
XAdapterTable_AddColumn($XA, "name6")
XAdapterTable_AddColumn($XA, "name7")
For $i = 0 To 10
        XAdapterTable_AddItemTextEx($XA, "name", "ListBox")
        XAdapterTable_SetItemText($XA, $i, 1, "ListBox-" & $i & "-1")
        XAdapterTable_SetItemText($XA, $i, 2, "ListBox-" & $i & "-2")
        XAdapterTable_SetItemText($XA, $i, 3, "ListBox-" & $i & "-1")
        XAdapterTable_SetItemText($XA, $i, 4, "ListBox-" & $i & "-2")
        XAdapterTable_SetItemText($XA, $i, 5, "ListBox-" & $i & "-1")
        XAdapterTable_SetItemText($XA, $i, 6, "ListBox-" & $i & "-2")

Next
$XLista = XList_Create("20", "350", "840", "300", $create)
XList_SetItemHeightDefault($XLista, 18, 25) ;设置项未选中高度,选中高度
$ggg = XList_SetItemTemplateXML($XLista, @ScriptDir & "\List_Item.xml") ;加载列表模板
XList_AddColumn($XLista, 100) ;设置列宽度
XList_AddColumn($XLista, 100)
XList_AddColumn($XLista, 100)
XList_AddColumn($XLista, 100)
XList_AddColumn($XLista, 100)
XList_AddColumn($XLista, 100)
XList_AddColumn($XLista, 100)
$XAma = XAdapterMap_Create()
XList_BindAdapterHeader($XLista, $XAma)
$XAa = XAdapterTable_Create()
XList_BindAdapter($XLista, $XAa)
XAdapterTable_AddColumn($XAa, "name")
XAdapterTable_AddColumn($XAa, "name2")
XAdapterTable_AddColumn($XAa, "name3")
XAdapterTable_AddColumn($XAa, "name4")
XAdapterTable_AddColumn($XAa, "name5")
XAdapterTable_AddColumn($XAa, "name6")
XAdapterTable_AddColumn($XAa, "name7")
$btn2 = XBtn_Create("800", "660", "75", "25", "退出程序", $create)
$btn3 = XBtn_Create("700", "660", "75", "25", "复制List", $create)
XEle_RegEventC($btn2, "btn2")
XEle_RegEventC($btn3, "btn3")

XWnd_ShowWindow($create)
XRunXCGUI()

Func btn2($bh)
        xquit_acn($create)
EndFunc   ;==>btn2
Func btn3($bh)
        ;复制List
        XListView_GetSelectItem($XList)
        ;获取选择项，
        ;$_hEle=控件句柄，
        ;返回值为数组，[0] 是否成功  [2]  分组索引  [3]  项索引
        XListView_GetSelectItemCount($XList)
        ;获取选择项数量
        ;$_hEle=控件句柄
        ;返回值:选择项数量

        XAdapterListView_Item_GetCount($hAdapter,$iGroup)
        ;获取指定组中项数量
        ;$hAdapter  数据适配器句柄
        ;$iGroup  组索引
        ;返回值:项数量
EndFunc   ;==>btn3

chzj589

回复 21# chzj589

兄弟：请查收

kk_lee69

回复 22# chzj589
謝啦  兄弟

hfutxkk

什么是炫彩助手？求科普

jsdn2000

炫彩界面库写出来的界面确实不错。

zpmc123

炫彩界面库确实很强大