找回密码
 加入
搜索
查看: 4562|回复: 9

[GUI管理] 【已解决】把其他控件准确写进某个tab中。老问题了,但还弄不懂

[复制链接]
发表于 2010-3-15 18:01:11 | 显示全部楼层 |阅读模式
本帖最后由 powerofos 于 2010-3-22 22:04 编辑

随着某TAB内控件越来越多,LISTVIEW内内容越来越多,软件打开的时候特别慢,而且有时候有些输入框INPUT会消失,奇怪了。。
目前我只写到了刷新LISTVIEW部分。

func Ref_XML()
$objXML = ObjCreate("Microsoft.XMLDOM")
$sFile = $objXML.load($SourceFile)
If not $sFile then
MsgBox(16,"","加载"&$SourceFile&"失败,文件不存在!!!")
Else
$objRootsite = $objXML.documentElement.selectSingleNode("master")
$AllNodesNum = $objRootsite.childNodes.length - 1
If $AllNodesNum < 0 then
_GUICtrlStatusBar_SetText($MainStatusBar,"找不到任何记录,请先添加。")
Else
Global $Tab_A_ListItemHandle[$AllNodesNum+1]
For $i = 0 to $AllNodesNum
$R_ItemArray[0] = $objRootsite.childNodes.item($i).childNodes.item(11).text
$R_ItemArray[1] = $objRootsite.childNodes.item($i).childNodes.item(0).text
$Tab_A_ListItemHandle[$i] = GUICtrlCreateListViewItem($R_ItemArray[0]&"|"&$R_ItemArray[1],$Tab_A_ListView)
_GUICtrlStatusBar_SetText($MainStatusBar,"当前列表共有:"&_GUICtrlListView_GetItemCount($Tab_A_ListView)&"项")
Next
EndIf
EndIf
endfunc

老问题,搜索过论坛,得到“没把控件写进TAB中”的答案,但还是没弄懂,请赐教。


本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

×

评分

参与人数 1金钱 +10 收起 理由
afan + 10 感谢主动将修改帖子分类为[已解决],请继续 ...

查看全部评分

 楼主| 发表于 2010-3-16 08:50:48 | 显示全部楼层
...........继续  UP UP UP.
发表于 2010-3-16 10:50:58 | 显示全部楼层
想别人帮忙最好好让别人测试,取一段代码别人无法测试,还要首先去读懂你的是什么DD……
精简一段有代表性的例子,相对容易解决得多~
 楼主| 发表于 2010-3-17 14:53:31 | 显示全部楼层
嗯,再附上文件,请大家帮帮忙,奇怪的问题。。。
 楼主| 发表于 2010-3-17 16:44:26 | 显示全部楼层
...........继续  UP UP UP.
 楼主| 发表于 2010-3-18 08:04:39 | 显示全部楼层
................再等等 ..........
发表于 2010-3-20 16:11:40 | 显示全部楼层
回复 4# powerofos


把 GUISetState(@SW_SHOW,$MainGUI) 这行移到循环前面:

GUISetState(@SW_SHOW,$MainGUI)
While 1
        Sleep(1000)
WEnd
 楼主| 发表于 2010-3-22 21:58:15 | 显示全部楼层
今天晚上才看到你的回复,我马上看看,谢谢afan版主
 楼主| 发表于 2010-3-22 22:03:51 | 显示全部楼层
回复 7# afan


    ......问题解决了,原来还可以这样。。。再次感谢afan版主
发表于 2011-5-21 20:22:24 | 显示全部楼层
saili。。。。。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-10-1 05:35 , Processed in 0.085556 second(s), 28 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表