怎样用ListView显示这样的文本内容?
本帖最后由 qq342252004 于 2009-9-2 20:02 编辑问题如题,文本如下:http://tieba.baidu.com/
http://zhidao.baidu.com/
http://mp3.baidu.com/
http://image.baidu.com/
http://news.baidu.com/
http://video.baidu.com/ 什么意思? listview的例子应该可以让你明白如何使用listview吧
还是你有什么问题没有表达清楚? 估计是问怎么从文本那里自动读取每行字符,然后自动导入创建的Gui里面显示出来吧?
思路:
1.GUICtrlCreateListView建立ListView
2.FileReadLine 读取指定文本
3.GUICtrlCreateListViewItem写入ListView :face (20): #include <GUIConstants.au3>
$file = FileOpen("txt.txt", 0)
If $file = -1 Then
MsgBox(0, "错误", "不能打开文件.")
Exit
EndIf
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 430, 336, 193, 125)
$List1 = GUICtrlCreateListView("编号|内容", 32, 24, 329, 227)
$i = 1
While 1
$temp = FileReadLine($file)
If @error Then ExitLoop
If Not $temp = "" Then
GUICtrlCreateListViewItem($i & "|" & $temp, $List1)
$i += 1
EndIf
WEnd
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
页:
[1]