方块没法弄~~~~~~~~~~~~~
#include <GUIConstantsEx.au3>
#include <TreeViewConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 262, 447, 193, 125)
$TreeView1 = GUICtrlCreateTreeView(8, 24, 241, 377, BitOR($TVS_HASBUTTONS,$TVS_HASLINES,$TVS_LINESATROOT,$TVS_DISABLEDRAGDROP,$TVS_SHOWSELALWAYS,$TVS_CHECKBOXES,$WS_GROUP,$WS_TABSTOP))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$L1=GUICtrlCreateTreeViewItem ("根字段1",$TreeView1)
$l2=GUICtrlCreateTreeViewItem ("根字段2",$TreeView1)
$L3=GUICtrlCreateTreeViewItem ("根字段3",$TreeView1)
$L1_1=GUICtrlCreateTreeViewItem ("字段1的子字段1",$L1)
$L1_2=GUICtrlCreateTreeViewItem ("字段1的子字段2",$L1)
$l2_1=GUICtrlCreateTreeViewItem ("字段2的子字段1",$l2)
$l2_2=GUICtrlCreateTreeViewItem ("字段2的子字段2",$l2)
$l2_3=GUICtrlCreateTreeViewItem ("字段1的子字段3",$l2)
$L3_1=GUICtrlCreateTreeViewItem ("字段3的子字段1",$L3)
$L3_2=GUICtrlCreateTreeViewItem ("字段3的子字段2",$L3)
$L1_1_1=GUICtrlCreateTreeViewItem ("字段1的子字段1的孙字段1",$L1_1)
$L1_1_2=GUICtrlCreateTreeViewItem ("字段1的子字段1的孙字段2",$L1_1)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
[ 本帖最后由 顽固不化 于 2008-9-22 16:03 编辑 ] |