[giantonti]

por un momento lo dude, pero revise todo y creeme el datasource esta con el adoquery

Código Delphi [-]
FormSelequipo.adoQuery1.SQL.Text := 'Select * From mov where cod_cli = '+QuotedStr(ADOQuery1rif.asstring);
    FormSelequipo.adoQuery1.Open;
    //If FormSelequipo.adoQuery1.Eof Then
    If FormSelequipo.adoQuery1.IsEmpty Then
    ShowMessage ('No se ha encontrado ningun articulo relacionado ' +
      'con el cliente.')
  Else
  Begin
    Application.CreateForm (TFormSelequipo, FormSelequipo);
     Try
      If FormSelequipo.ShowModal = mrOK Then
      Begin
        ADOQuery1equipo.asstring := FormSelequipo.adoQuery1articulo.AsString;
       ADOQuery1serial.AsString := FormSelequipo.adoQuery1serial.AsString;
      End;
    Finally  // Nos aseguramos de destruir el objeto FormSelequipo
      FormSelequipo.Free;
    End;
  End;