Question

delphi用SQL有多少行数据就生成多少个label,并且每个label对应到指定的字段怎么写？

例如我查询到3条数据，我需要字段A 那么就在label下一行再生成2个label 并且字段都是A，只是赋予的行数内容不一样。
头好痛，不知道怎么写，求大神回答

Answer 1

循环动态生成控件，设定好每个控件的位置规格，规范label控件的名字，以方便查找控件进行设定label的caption值，
如第一行字段A，可设定名字为Label_a_001,，字段B，设定名字为Label_b_001,
第二行字段A，可设定名字为Label_a_002,，字段B，设定名字为Label_b_002,
这样可以通过循环用FindComponent对每行控件进行付值
如现在是第2行记录
设变量i 记录行数，i:='002'

Tlabel(FindComponent('Label_a_'+i)).caption:=dateset.fieldbyanme('a').value
其它字段类似操作，以上资料供参考