盒子论坛 v2.1

按照这个教程写了一段
http://blog.csdn.net/js0001/article/details/17022123
是点击按钮开始查询

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DBGridEhGrouping, ToolCtrlsEh, DBGridEhToolCtrls, DynVarsEh,
  StdCtrls, EhLibVCL, GridsEh, DBAxisGridsEh, DBGridEh, DB, ADODB,
  MemTableDataEh, DataDriverEh, MemTableEh;

type
  TForm1 = class(TForm)
    con1: TADOConnection;
    qry1: TADOQuery;
    ds1: TDataSource;
    dbgrdh1: TDBGridEh;
    btn1: TButton;
    dbgrdh2: TDBGridEh;
    qry2: TADOQuery;
    MemTableEh1: TMemTableEh;
    DataSetDriverEh1: TDataSetDriverEh;
    ds2: TDataSource;
    procedure btn1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.btn1Click(Sender: TObject);
begin
qry1.Close;
qry1.Parameters.Refresh;
qry1.SQL.Clear;
qry1.SQL.Add('SELECT id,ddate,ccode,cdefine1 FROM UFDATA_001_2012.dbo.rdrecord11 order by id') ;
qry1.Open;
qry2.Close;
qry2.Parameters.Refresh;
qry2.SQL.Clear;
qry2.SQL.Add('SELECT id,cInvCode,iQuantity FROM UFDATA_001_2012.dbo.rdrecords11 order by id');
qry2.Open;
end;

end.

但是查询出来的只有主表有数据，子表没有数据
其中领完创建一个tbdgrideh ——datesource3——qry2-----  子表，能显示数据，请问还需要去设置其他的地方么？  谢谢各位指点了。
----------------------------------------------
-

作者：

yuzhenguo0 (金远见)	▲▲▲▲▲	-
	普通会员

2016/8/27 11:40:40

1楼：

还是用事件吧这个很麻烦
----------------------------------------------
学DELPHI http://www.studydelphi.com

作者：

a5824 (Return)	★☆☆☆☆	-
	普通会员

2016/8/27 12:43:51

2楼：

还是CXGrid的方便啊
----------------------------------------------
-

信息

登陆以后才能回复