Hola, estoy trabajando con D6 y empiezo con Oracle 9i + componentes ODAC. Mi pregunta es como conseguir que al realizar una consulta, si el nº de filas devueltas es muy grande, aparezca un mensaje informativo y si es posible, pregunte si deseamos continuar o no, con la consulta.
Por ejemplo, cuando hago la siguiente consulta, desconozco el nº de filas que me devolverá la consulta, por lo que me gustaría poder saber a priori que si el nº de filas devueltas supera, por ejemplo las 100 , entonces aparezca un mensaje de aviso dando la opción de continuar o limitar el rango de la consulta.
Un saludo
Jose Manuel
Código:
procedure TfDNI.Btn_fechasClick(Sender: TObject);
begin
fdm.tbNif.close;
fdm.tbNif.SQL.Clear;
fdm.tbNif.SQL.Text := 'SELECT * FROM &tablename1 ' +#13+
'WHERE (F_ULTIMO_CONTACTO >= :desde' +#13+
'and F_ULTIMO_CONTACTO <= :hasta)' +#13+
'ORDER BY A_nombre';
fdm.tbNif.MacroByName('TableName1').Value := cb_tablespace.Text;
fdm.tbNif.ParamByName('desde').AsDateTime := desde.date;
fdm.tbNif.ParamByName('hasta').AsDateTime := hasta.date;
fdm.tbNif.Open;
end;