contar elemento de un select

[tebre]

lo que yo quiero es que me elimine siempre y cuando exista como minimo un elemento en base de datos. entonces hago un select para saber si hay elemtos en la base de datos....si hay, que me elimine, por ejemplo si tengo 3 elementos...que me elimine a dos...pero que no me deje eliminar si solamente hay uno....como hacer eso???

Código Delphi [-]
 
Datos.QryInsertDetalleSolicitud.Close;
  Datos.QryInsertDetalleSolicitud.SQL.Clear;
  Datos.QryInsertDetalleSolicitud.SQL.Add('SELECT * ');
  Datos.QryInsertDetalleSolicitud.SQL.Add('FROM DetalleSolicitud');
  Datos.QryInsertDetalleSolicitud.SQL.Add('WHERE ClaveProducto='+ QuotedStr(Claveproducto)+ ' AND FolioSolicitud=' + EdfolioSolicitud.Text +';');
  Datos.QryInsertDetalleSolicitud.Open;
  if Datos.QryInsertDetalleSolicitud.RecordCount = 1 then {AQUI.- Quiero saber cuando solamente me quede un elemento. como hacer eso??}
    Begin
      Application.MessageBox('En la solicitud debe contener un producto como minimo !!!', '::: Error :::',MB_ICONERROR);
    End
  else
   {Eliminar}
  end;