Te cuento lo que yo hago normalmente en este tipo de relaciones y de pronto te sirve:
1) En el evento AferScroll del maestro pongo
Código Delphi
[-]QueryDetalle.close;
QueryDetalle.ParamByName('MAE_CONS').asinteger:=MAE_CONS;
QueryDetalle.Open;
2) En el evento BeforeClose también del maestro
3) Y para recorrer todos los registros
Código Delphi
[-]try
QueryMaestro.First;
While not(QueryMaestro.eof) do
begin
QueryDetalle.First;
While not(QueryDetalle.eof) do
begin
QueryDetalle.next;
end;
QueryMaestro.next;
end;
finally
QueryMaestro.Close;
end;
Yo nunca utilizo los DataSource por eso no comento tu código.
Saludos y espero te sirva.
