delphi的rzchecktree的用法.

来源:百度知道 编辑:UC知道 时间:2024/06/11 12:07:37
使用rzchecktree,当勾选时,如何在另一个listbox中显示已勾选文本,当勾选去掉时,文本消失.请指导.

创建下面的过程,然后在RzCheckTree的MouseUp事件中调用
procedure TForm1.SetList(Sender:TObject);
var
i: Integer;
begin
RzListBox1.Items.Clear;
for i:= 0 to RzCheckTree1.Items.Count-1 do
begin
if (RzCheckTree1.Items[i].StateIndex = 2)OR(RzCheckTree1.Items[i].StateIndex = 3) then RzListBox1.Items.Add(RzCheckTree1.Items[i].Text);
end;
end;

RzCheckTree 是第三方控件 Raize

rzchecktree是哪个组件页下的控件?