Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[1758] [답변] SCALES/ TreeView 사용에 관하여..
말근샘물 [ ] 1852 읽음    1998-03-05 13:17
안녕하세요... 말근샘물입니다.
저도 트리뷰때문에 고생 많이 했었습니다. 트리뷰나 리스트뷰나
작동하는 방법은 비슷합니다. 즉 컴포넌트에 직접 어떤 작업을
하는 것이 아니고 아래처럼 TTreeNode나 TListItem에 대해서 원
하는 작업(문자열 설정등)을 하는 것이죠...

var
  PNode, CNode: TTreeNode;
  // PNode: Parent Node, CNode: Child Node;
  I, J: Integer;
begin

  TreeView.Items.Clear;

  // root 바로 다음의 노드삽입 
  PNode := TreeView.Items.Add(nil, '인간'); 
  PNode.ImageIndex := 0;
  PNode.SelectedIndex := PNode.ImageIndex;

  //위에 삽입한 노드의 차일드노드 삽입
  CNode := TreeView.Items.AddChildObject(PNode, '남자', nil);
  CNode.ImageIndex := 1;
  CNode.SelectedIndex := CNode.ImageIndex;

  CNode := TreeView.Items.AddChildObject(PNode, '여자', nil);
  CNode.ImageIndex := 2;
  CNode.SelectedIndex := CNode.ImageIndex

  Treeview.FullExpand;
end;

삭제하는 방법은

PNode := TreeView.Selected;
PNode.Delete;

하시면 됩니다.


+ -

관련 글 리스트
1758 [답변] SCALES/ TreeView 사용에 관하여.. 말근샘물 1852 1998/03/05
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.