请各位大虾帮帮小弟！

Question

procedure LoadItems; 
  begin
    ItemsFromTbl('z_JJxz', '经济性质', dcbJJXZ.Items);  什么意思？
    ItemsFromTbl('z_Hzxm', '核准项目', dcbJyxm.Items);
    ItemsFromTbl('z_Dq', '地区', dbcQx.Items);
    dbcJycsQx.Items.Assign(dbcQx.Items);                什么意思？
    ItemsFromTbl('z_Bzxm', '表彰项目', dcbBZMC.Items);
    ItemsFromTbl('z_Sjxm', '施救项目', dcbSjxm.Items);
    ItemsFromTbl('z_Dbxm', '达标项目', dcbDBXMMC.Items);
    ItemsFromTbl('z_Cx', '车型', dcbTYCX.Items);
    dbcTpzl.Items.Clear;
    ItemsFromTbl('z_Tpzl', '铜牌种类', dbcTpzl.Items);
    ItemsFromTbl('z_sbzdb', '维修子类别', SlXgqytj);

Answer 1

ItemsFromTbl('z_JJxz', '经济性质', dcbJJXZ.Items);  什么意思？
  
  将字段z_JJxz作为dcbJJXZ.Items的值
ItemsFromTbl 是自定义的函数。。第二个我拒绝回答，自己考虑

Answer 2

loaditems 是一个过程  
ItemsFromTbl 是个自定义的 procedure 该原形应该为 procedure ItemsFromTbl(strvar:string;strvat2:string;myitems:someitemlist);
//someitemlist 是个某items 列表  既items树组
ItemsFromTbl('z_JJxz', '经济性质', dcbJJXZ.Items);  的具体作用你要看
procedure ItemsFromTbl(strvar:string;strvat2:string;myitems:someitemlist);
里到底是怎么写的
dbcJycsQx.Items.Assign(dbcQx.Items);  的作用是用dbcQx.Items替代dbcJycsQx.Items