这个怎么在上面的代码中实现,高手帮忙!!!
qryxz_clsb.Open;
while not qryxz_clsb.Eof do
begin
Qrydy_clsb.ParamByName('xzhz_xh').AsString :=qryxz_clsb.fieldbyname ('xzhz_xh').AsString ;
Qrydy_clsb.Open ;
showmessage(qryxz_clsb.fieldbyname('xzhz_xh').asstring);
while not Qrydy_clsb.Eof do
begin
Qryxl_clsb.ParamByName('szdy_xh').AsString :=Qrydy_clsb.fieldbyname('szdy_xh').AsString ;
Qryxl_clsb.Open ;
Qrydy_clsb.Next;
end;
qryxz_clsb.next;
end;
这是一组嵌套的父子关系表
我想在一个label.caption中将他们查出的内容显示出来
比如我在父表中根据条件查出是(香精香料),而(香精香料)对应3个单元值分别为(天然香料,合成香料,人工香料)而(天然香料)这个单元对应的小类有2个为(纯天然,仿天然)
因此我要求label.caption的值为这样显示:香精香料(天然香料(纯天然,仿天然),合成香料,人工香料).
这个怎么在上面的代码中实现,高手帮忙!!!
问题点数:0、回复次数:2Top
1 楼honkily(===CODING===)回复于 2003-06-01 22:17:41 得分 0
你都有那几个表?名字都不知道怎么给你写啊
label.caption:=香精香料+'('+天然香料+'('+纯天然+','+仿天然+'),'+合成香料+','+人工香料+')';Top
2 楼cxj21(cxj)回复于 2003-06-02 08:34:45 得分 0
qryxz_clsb连接一个表,查产品,比如(香精香料)
Qrydy_clsb连接一个表,查单元,比如(天然香料,合成香料.......)
Qryxl_clsb连接一个表,查小类,比如(纯天然,仿天然.......)
上面的关系是父子关系,一级一级的下传!如何在上面的代码中给我添加代码啊!!Top




