Tema: FindNext que da error
Ver Mensaje Individual
  #2  
Antiguo 28-09-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
  
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Reputación: 10
marcoszorrilla Va por buen camino
Prueba esto a ver si te funciona:
Código Delphi [-]
 ADOTabla.Filtered := False;
 ADOTabla.Filter := 'codart = ' + QuotedStr(Codigo);
 ADOTabla.Filtered := True;
 ADOTabla.FindFirst;
 while (
Código Delphi [-]
    ADOTaulaCompres.FindNext;) do
   begin  
      // AQUI HAGO ACUMULO DATOS
  
   end;


Un Saludo.

__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita