Buen día, ya lo resolví, pero esta solución la estuve buscando en el foro y no la encontré, se las comparto si alguien la necesita o si algún día me olvido de ella.
Si tenemos una tabla con los campos
A B C D E
1
1
1
Y queremos imprimir: 111
Hacemos lo siguiente:
Código Delphi
[-]
var
valores : string;
for I := 0 to FDQuery.RecordCount-1 do
begin
valores:= valores+FDQuery.FieldByName('A').Value;
FDQuery.Next;
end;
Al final de recorrer el For, valores será: 111
Saludos.