procesar secuencialmente registros de una tabla

[claudio3920]

Hola, vengo de otros lenguajes de programación, soy nuevo en Lazarus. Mediante  TSQLQuery (salvo que sea con otra cosa y yo no lo sepa) obtengo varios registros de una tabla de SQLite, necesito que el programa procese registro a registro volcando los datos de cada campo a variables para realizar un proceso.
Lo que no logro entender es como accedo a los registros de la consulta y extraer los datos.
Gracias

[lucamar]

Muy, muy basicamente, accede a los campos del registro actual con: TheQuery.FieldValues, TheQuery.FieldByName o a través de su Fields property; y muévete de un registro a otro con TheQuery.First, TheQuery.Next, etc.

Puedes encontrar explicaciones bastante buenas, aunque algo cortas, en la documentación de la FCL, y hay varios tutoriales, ejemplos y páginas de ayuda en el wiki; empieza en Database Portal y sigue desde ahí.

¡Feliz caza!

[BlueIcaro]

Hola, puedes echar un vistazo al tutorial que hay el wiki de Lazarus.

https://wiki.freepascal.org/SQLdb_Tutorial1

/BlueIcaro

[claudio3920]

Exelente..!! gracias a ambos..!!

[daragor]

Aporto un poco mas, es sensillo, te doy una opción

con un query ya ejecutado con un SELECT, puedes recorrerlo secuencialmente con un while o un for.

Code: Pascal  [Select][+][-]

1.   qtodos.Active:= false;
2.   qtodos.SQL.Text:= 'SELECT * FROM tabla';
3.   qtodos.Open;
4.   // consultamos que no este vacio
5.   if not qtodos.IsEmpty then
6.   begin
7.     while not qtodos.EOF do {irá del principio hasta el final!}
8.     begin
9.      // Aquí ejecutas el codigo que necesites;
10.      qtodos.Next; {pasa al siguiente registro}
11.     end;
12.   end;
13.  

Yo uso siempre los componentes de ZeosLib, tanto para conectar con la BD como los querys y demas.

saludos!

[claudio3920]

Excelente..!!