사용자 참여란
사용자 참여란입니다. 기본적으로 제가 운영하는 사이트의 강좌/팁 란이지만, 사용자들이 참여할 게시판이 있질 않아서, 혹시나 하는 마음에 추가합니다.
![[레벨:0]](http://www.wearethebest.co.kr/zbxe/modules/point/icons/default/0.gif "포인트:85point (94%), 레벨:0/30"){kind=icon}
김경진트리뷰 확장 팁입니다.
// 트리뷰 확장
procedure TfrmMain.TreeExpand(ANode: TTreeNode);
begin
while Assigned(ANode) do
begin
ANode.Expand(True);
TreeExpand(ANode.getFirstChild);
ANode := ANode.getNextSibling;
end;
end;
// 확장 함수 호출
procedure TfrmMain.btnExpendClick(Sender: TObject);
begin
TreeExpand(TreeView1.Items.GetFirstNode);
end;
* 델마당 질/답 게시판에서 펌한 자료입니다.
// 트리뷰 확장
procedure TfrmMain.TreeExpand(ANode: TTreeNode);
begin
while Assigned(ANode) do
begin
ANode.Expand(True);
TreeExpand(ANode.getFirstChild);
ANode := ANode.getNextSibling;
end;
end;
// 확장 함수 호출
procedure TfrmMain.btnExpendClick(Sender: TObject);
begin
TreeExpand(TreeView1.Items.GetFirstNode);
end;
* 델마당 질/답 게시판에서 펌한 자료입니다.
