Código Delphi [-]
procedure TForm.FormCreate(Sender: TObject);
begin
  qyDetail.Close;
  qyDetail.DataSource := dsMaster; // DataSource -> Tabla maestro
  qyDetail.SQL.Clear;
  qyDetail.SQL.Add('SELECT * FROM TABLA_DETALLE');
  qyDetail.SQL.Add('WHERE MASTER_ID = :ID AND ESTADO_COMENTARIO <> :BORRADO');
  qyDetail.Parameters.ParamByName('BORRADO').Value := 'DATO_BORRADO';
  qyDetail.Open;
end;

• TABLA_DETALLE por el nombre que le hayas dado a la tabla detalle.
• MASTER_ID por el nombre de la columna de la tabla detalle que referencia a la columna clave de la tabla maestro.
• ID por el nombre de la columna clave de la tabla maestro. (No quites los dos puntos ":" que preceden al nombre o no funcionará)
• DATO_BORRADO por el tipo y valor que posee la columna ESTADO_COMENTARIO.

Código Delphi [-]
procedure TForm.FormCreate(Sender: TObject);
begin
  qyDetail.Close;
  qyDetail.DataSource := dsMaster; // DataSource -> Tabla maestro
  qyDetail.SQL.Clear;
  qyDetail.SQL.Add('SELECT * FROM TABLA_DETALLE');
  qyDetail.SQL.Add('WHERE MASTER_ID = :ID AND ESTADO_COMENTARIO <> :BORRADO');
  qyDetail.Parameters.ParamByName('BORRADO').Value := 'DATO_BORRADO';
  qyDetail.Open;
end;

Código Delphi [-]
  procedure TForm1.FormCreate(Sender: TObject);
begin
  DM.QueryDETALLEComentario.Close;
  DM.QueryDETALLEComentario.DataSource := DM.ds_productos; // DataSource -> Tabla maestro
  DM.QueryDETALLEComentario.SQL.Clear;
  DM.QueryDETALLEComentario.SQL.Add('SELECT * FROM Comentario');
  DM.QueryDETALLEComentario.SQL.Add('WHERE id_sub = :id_sub AND estado_comentario <> :BORRADO');
  DM.QueryDETALLEComentario.Parameters.ParamByName('BORRADO').Value := true;
  DM.QueryDETALLEComentario.Open;
end;

Cita:

Empezado por ecfisa (Mensaje 494316) Hola. 1) Si como parece en tu código tenes los DataSources en el DataModule (DM), podes hacer todas las asignaciones al ADOQuery en tiempo de diseño, inclusive la propiedad SQL y sólo tendrías que abrir y cerrar el query en el form que desees mostrar los datos. 2) En este caso el ADOQuery reemplaza al ADOTable, de modo que tendrá que tener un DataSource asociado y en la propiedad DataSource del DBGrid (detalle) deberá figurar el nuevo DataSource. Yo hice toda la asignación por código para que se viera mas claramente las asignaciones, pero no es estríctamente necesario. Es decir, si lo tenes armado de este modo, en la propiedad DataSource del DBGrid del detalle tendría que figurar DM.dsDetail. Saludos :)

Código Delphi [-]
     DM.QueryDETALLEComentario.DataSource:= DM.ds_QueryTodosLosProductos;
     DM.QueryDETALLEComentario.Close;
     DM.QueryDETALLEComentario.Open;

Código SQL [-]
SELECT C.*
 FROM Comentario C, Subasta_prod S
 WHERE (C.id_sub = S.id_sub) AND (C.estado_comentario <> true)

Código Delphi [-]
  DM.QueryDETALLEComentario.Close;
  DM.QueryDETALLEComentario.SQL.Clear;
  DM.QueryDETALLEComentario.SQL.Add('SELECT * FROM Comentario');
  DM.QueryDETALLEComentario.SQL.Add('WHERE id_sub = :id_sub AND estado_comentario <> :BORRADO');
  DM.QueryDETALLEComentario.Active:=true;
  DM.QueryDETALLEComentario.DataSource := DM.ds_queryCategorias; // DataSource -> Tabla maestro
  DM.QueryDETALLEComentario.Parameters.ParamByName('BORRADO').Value := true;
  DM.QueryDETALLEComentario.Open;

Código Delphi [-]
    qyDetail.Close; 
    qyDetail.SQL.Clear; 
    qyDetail.SQL.Add('SELECT * FROM ORDERS'); 
    qyDetail.SQL.Add('WHERE CUSTNO = :CUSTNO AND PAYMENTMETHOD <> :BORRADO'); 
    qyDetail.Parameters.ParamByName('BORRADO').Value := cb.Items[cb.ItemIndex]; 
    qyDetail.Open;