Le he echo la "s" que me faltaba y cuando lo ejecute quedo se cayo y me salio una ventana que dice que no hay sentencia SQL disponible y luego la ventana de la CPU.....lo que estoy tratando de hacer es poder entregar como parametro los campos a seleccionar, los campos para el ordenamiento y los campos del where....
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var consulta,campos,donde,orden : string;
begin
campos := '*';
donde := 'codigo_pricipal = "EC SAC 10 005" ';
orden := 'codigo_principal';
Consulta := 'Select %s from resultados where %s order by %s';
query1.sql.text := format(consulta,[campos,donde,orden]);
query1.ExecSQL;
end;
Gracias y saludos