Версия для печати темы Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > TreeView

Автор: SlaUr 11.5.2009, 11:26

Сабж

Автор: Keeper89 11.5.2009, 11:42

Код procedure TForm1.Button1Click(Sender: TObject); var   myNode: TTreeNode; begin   myNode := TreeView1.Items.GetFirstNode;   while Assigned(myNode) do   begin     myNode.Expand(True);     myNode := myNode.getNextSibling;   end; end;

Автор: Qu1nt 11.5.2009, 11:43

Код TreeView1.FullExpand

Автор: SlaUr 12.5.2009, 08:24

Спасибо

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)