Q&A

  • treeview에서 체크박스 넣고 확인하는 방법..
안녕하세요.

treeview에서 체크박스를 넣고 클릭시(체크가 되거나 해지되었을때)에
확인할수 있는 방법이 궁급합니다.

체크박스 넣는방법
uses절에 CommCtrl을 추가

From Create에

SetWindowLong(TreeView1.Handle, GWL_STYLE,
GetWindowLong(TreeView1.Handle, GWL_STYLE) OR TVS_CHECKBOXES);

빠른답변 부탁드립니다.
1  COMMENTS
  • Profile
    양상훈 2002.07.24 19:15
    procedure TForm1.TreeView1Click(Sender: TObject);
    const
      TVM_GETITEMSTATE=TV_FIRST+39;
    var
      StateMask:Integer;
    begin
      StateMask:=SendMessage(TreeView1.Handle,TVM_GETITEMSTATE,
                       LongInt(TreeView1.Selected.itemid),TVIS_STATEIMAGEMASK);
      StateMask:=(StateMask shr 12)-1;{체크된 항목은 1, 체크안된 항목은 0입니다.}
      form1.caption:=intToStr(StateMask);
    end;