如何将树视图项加载到 Delphi 中的列表框中?
listbox.items:=treeview.items
给
Incompatible types String and TNodes
我不知道。有什么帮助吗?
如何将树视图项加载到 Delphi 中的列表框中?
listbox.items:=treeview.items
给
Incompatible types String and TNodes
我不知道。有什么帮助吗?
Items
的属性TListBox
被声明为TStrings
,并且isItems
的属性- 一个不能分配给另一个。TTreeView
TTreeNodes
你将不得不做这样的事情:
procedure AddNode(aStrings: TStrings; aNode: TTreeNode);
var
iChild: integer;
begin
aStrings.Add(aNode.Text);
for iChild := 0 to aNode.Count - 1 do
AddNode(aStrings, aNode.Item[iChild]);
end;
var
iNode: integer;
begin
listbox.Items.Clear;
for iNode := 0 to treeView.Items.Count - 1 do
AddNode(listbox.Items, treeView.Items.Item[iNode]);