Delphi中为TreeView添加单选和复选框

领测软件测试网

&|9x$Q,|7A
_z)H
7a;p'|$o.V9p5kzK+^　　　　 if Assigned(TreeView1.Selected) then 软件测试技术门户6s;D8sp/t sk4`SW-L8[
　　　　 begin 软件测试技术门户.b5p
?(oWx9UA1N
　　　　 tn := TreeView1.Selected; 软件测试技术门户X%Fw[f6@J z,t
　　　　 BoolResult := tn.StateIndex in  软件测试技术门户"W sT%D3j8pI%z6S
　　　　 [cFlatChecked,cFlatRadioChecked]; 软件测试技术门户'pvm6XR1W