DBGrideh 中查看详情数据或者显示一个面板

DBGrideh1.RowDetailPanel.Active :=True; 

设计界面出现一个面板

在这个面板中添加一个PageControl控件里面可以再添加一个Grid表格

可以事件 OnRowDetailPanelShow 中添加如果代码控制

procedure TForm1.DBGridEh1RowDetailPanelShow(Sender: TCustomDBGridEh;
  var CanShow: Boolean);
begin
   if PageControl1.ActivePageIndex = 0 then
      Sender.RowDetailPanel.ActiveControl :=DBGridEh1 //DBGridEh2
   else
      Sender.RowDetailPanel.ActiveControl :=DBGridEh1; //DBEditEh1;

end;