while not adoquery1.Eof do
begin
k:=adoquery1.FieldByName('level').AsInteger ;
node[k]:=virtualstringtree1.AddChild(node[k-1]); //vst1中添加一个子结点
data1:=virtualstringtree1.GetNodeData(node[k]);
data1.caption:=trim(adoquery1.FieldByName('menutitle').AsString );
data1.Name:=trim(adoquery1.FieldByName('menuid').AsString );
data1.level:=k;
data1.Flag:=adoquery1.FieldByName('parentflag').AsInteger ;
node[k].CheckType:=ctCheckBox; //结点中显示一个checkbox
node[k].CheckState:=csCheckedNormal; adoquery1.Next ;
end;为什么我设置了显示checkbox,可是运行时没有显示出来?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货