5,388
社区成员
发帖
与我相关
我的任务
分享TreeView中圖片顯示問題,up有分
我用下列代碼在TreeView中加內容和圖片（且TreeView隻有兩層），可程序運行後點子層時，子層的圖片老
是變成頂層的圖，請問我該如何做才能使圖片固定不變。謝謝。
var MainNode,ChildNode:TTreeNode;
.....
with datamodule1 do
begin
TreeView1.Items.Clear;
project.first;
while not project.eof do
begin
MainNode:=TreeView1.Items.AddChild(nil,project.Fields.fieldbyname('projectname').AsString);
MainNode.ImageIndex := 0;
ChildNode:=TreeView1.Items.AddChild(MainNode,'問題查詢');
ChildNode.ImageIndex :=1;
ChildNode:=TreeView1.Items.AddChild(MainNode,'問題錄入');
ChildNode.ImageIndex :=1;
project.next;
end;
end;
是變成頂層的圖，請問我該如何做才能使圖片固定不變。謝謝。
var MainNode,ChildNode:TTreeNode;
.....
with datamodule1 do
begin
TreeView1.Items.Clear;
project.first;
while not project.eof do
begin
MainNode:=TreeView1.Items.AddChild(nil,project.Fields.fieldbyname('projectname').AsString);
MainNode.ImageIndex := 0;
ChildNode:=TreeView1.Items.AddChild(MainNode,'問題查詢');
ChildNode.ImageIndex :=1;
ChildNode:=TreeView1.Items.AddChild(MainNode,'問題錄入');
ChildNode.ImageIndex :=1;
project.next;
end;
end;
...全文
请发表友善的回复…
发表回复
itlcx 2004-03-31
- 打赏
- 举报
謝謝 firefox2000(网际流浪者)
firefox2000 2004-03-30
- 打赏
- 举报
在OnGetSelectedIndex事件中加上下面这条语句就可以了:
Node.SelectedIndex := Node.ImageIndex;
Node.SelectedIndex := Node.ImageIndex;
chinalao 2004-03-30
- 打赏
- 举报
UP
Hero4444 2004-03-30
- 打赏
- 举报
ChildNode.selectedindex:=1
