[marcoszorrilla]

Esto colócalo justo antes de abrir la consulta, te ayudará a ver dónde está el error, aunque yo apostaría por una concatenación no deseada:

Código Delphi [-]
ShowMessage(Query_Producto.Sql.Text);

Sql.Add(Campos +'From Producto ');
//Prueba esto otro
Sql.Add(Campos +'  From Producto ');

Un Saludo.