如何用BITBTN按钮实际明细表关系

Question

有两表
主表为：
ID NAME
1   CC
2   BB从表：
ID NAME TYID（主表的ID)
产生的效果为：
主表里有几个记录就产生几个BITBTN，并且按钮上显示主表的NAME字段值
从表则根据则作相应显示，并且也是按钮显示，并且按钮上也显示其相应的NAME

Answer 1

var
  tmpBitbtn: TBibtn;
begin
  ...
  while not Query1.eof do
  begin
    tmpBitbtn := TBitbtn.Create;
    tmpBitbtn.caption := Query1.FieldByName('name').asString;
    //...
    while not Query2.eof do
    begin
      tmpBitbtn := TBitbtn.Create;
      tmpBitbtn.caption := Query1.FieldByName('name').asString;
      //...
      Query2.next;
    end;
    Query1.next;
  end;
end;手中无delphi，不保证语法正确呵呵

Answer 2

to  yonny(随心所遇)现在有一个问题，
动态生成一个按钮，但如何控制它中表单上什么位置出现

Answer 3

不是有left和top属性？设置成相应的值就行了。

Answer 4

Button1.Top := 100;
Button1.Left := 100;