我用了以下控件:
dbgrd_bingqu: TDBGrid;
    ds_bingqu: TDataSource;
    add_bingqu: TADODataSet;
    btn_add: TSpeedButton;
    btn_del: TSpeedButton;
    btn_edt: TSpeedButton;
    btn_sav: TSpeedButton;
    btn_can: TSpeedButton;
    btn_add2: TSpeedButton;
    btn_del2: TSpeedButton;
    btn_edt2: TSpeedButton;
    btn_sav2: TSpeedButton;
    Label1: TLabel;
    dbedt_bqdaima: TDBEdit;
    Label2: TLabel;
    dbedt_bqmingcheng: TDBEdit;
    btn_no: TSpeedButton;
    btn_no2: TSpeedButton;
    Label3: TLabel;
    Label4: TLabel;
    dbedt_bqfangjianhao: TDBEdit;
    dbedt_bqchuangweihao: TDBEdit;
    dbgrd_bingqu2: TDBGrid;
    ds_bingqufangjian: TDataSource;
    add_bingqufangjian: TADODataSet;
两个表是这样的:
db1:bingqudaima        char  2  主键
    bingqumingcheng    char  10
    bingqufangjianhao  char  3
    bingquchuangweihao char  2
db2:bq_fangjianhao     char  3  主键
    bq_chuangweihao    char  2
    bingqudaima        char  2
用来实现将两个表连接,第一个表的每条记录对应的在第二个表中都有许多条记录(不重复)
我想实现这个的操作源码该怎么编?
注:
在add_bingqufangjian(TADODataSet)中的CommandText属性中的SQL下我写了如下语句:select bq_fangjianhao, bq_chuangweihao, bingqudaima from yy_bingqufangjian
where bingqudaima=m