软件系统拥有自己通用的下拉列表控件可以大大地加速系统的开发和易用性。
控件支持DELPHI5及以上版本安装并使用。
控件的用法:
procedure Tfgoods.setGoodsKind;
begin
YNdbTreeList1.ListDataset := ClientDataSet1;
YNdbTreeList1.KeyID := ‘kindid=kindid‘;
YNdbTreeList1.KeyName := ‘kindname=kindname‘;
YNdbTreeList1.ParentID := ‘parentid‘;
YNdbTreeList1.ListFields := ‘kindname,kindid‘;
YNdbTreeList1.ListFieldsCN := ‘类别,编号‘;
YNdbTreeList1.FormWidth := 280;
end;
控件实际运行效果图:
时间: 2024-10-12 22:23:08