在主表的onmousedown 里写事件这是主表打开时焦点移到从表的代码,你可以参考下 var HitTest: TcxCustomGridHitTest; begin HitTest := (Sender as TcxGridSite).GridView.ViewInfo.GetHitTest(X, Y); if HitTest is TcxGridExpandButtonHitTest then TcxGridExpandButtonHitTest(HitTest).GridRecord.Focused := True; end;
var
HitTest: TcxCustomGridHitTest;
begin
HitTest := (Sender as TcxGridSite).GridView.ViewInfo.GetHitTest(X, Y);
if HitTest is TcxGridExpandButtonHitTest then
TcxGridExpandButtonHitTest(HitTest).GridRecord.Focused := True;
end;