Ver Mensaje Individual
  #4  
Antiguo 14-12-2022
Avatar de pgranados
pgranados pgranados is offline
Miembro
 
Registrado: sep 2022
Ubicación: México
Posts: 266
Reputación: 2
pgranados Va por buen camino
Talking

Cita:
Empezado por duilioisola Ver Mensaje
Hay ciertos casos en los que este código podría no funcionar.
Por ejemplo, si el DataSet es unidireccional. La propiedad RecordCount no está "disponible".
La propiedad Unidirectional hace que solo puedas ir hacia adelante y no guarda registros anteriores en memoria, lo que lo hace más rápido y eficiente.

Además de esto, he agregado algunas comprobaciones para asegurar que todo funcione correctamente.
  • Inicializo variables.
  • Posiciono en primer registro.

Código Delphi [-]
var
   valores : string;
begin
[...]
  // Inicializo variable
  valores := '';

  // Me aseguro de estar en el primer registro del DataSet
  FDQuery.First;

  // Recorro DataSet hasta que no haya mas registros
  while not FDQuery.EOF do
  begin
    valores := valores + FDQuery.FieldByName('A').Value;
    FDQuery.Next;
  end;
[...]
end;

Gracias por las respuestas, como siempre, un maestro. Saludos.
Responder Con Cita