数据库记录在文本lable显示的问题

Question

例如:group表 有6个记录值为:a1 a2 a3 b1 b2 b3 文本控件label29 至lable34 六个文本控件要分别显示6个记录的值

Answer 1

label29.caption:=adoquery1.fieldbyname('字段名1').AsString;
.....

Answer 2

例如:group表 字段名为kid 有6个记录值为:a1 a2 a3 b1 b2 b3 文本控件label29 至lable34 六个文本控件要分别显示6个记录的值 

Answer 3

with adoQuery1 do
begin
 first;
 for i:=1 to 6 do  //如果只要6个就用这个控制,如果是要全部记录就用  while not eof
 begin
  Tlabel(FindComponent('Label'+inttoStr(28+i))).caption:=fieldByName('kid').asSTring;
  Next;
 end; 
end;

Answer 4

adoquery1.first; //或者移动到其他正确的第一条label29.caption:=adoquery1.fieldbyname('kid').AsString; 
adoquery1.next;
label30.caption:=adoquery1.fieldbyname('kid').AsString; 
adoquery1.next;
label31.caption:=adoquery1.fieldbyname('kid').AsString; 
adoquery1.next;
label32.caption:=adoquery1.fieldbyname('kid').AsString; 
adoquery1.next;
label33.caption:=adoquery1.fieldbyname('kid').AsString; 
adoquery1.next;
label34.caption:=adoquery1.fieldbyname('kid').AsString; 
adoquery1.next;