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;