Problemas con Tquery

[delphi.com.ar]

Brrrr... Feo, feo, feo...
Estas creando un objeto en una variable global (supongo) y luego en la mismo bloque de ejecución una función te lo devuelve... ¿Con qué sentido complicar así las cosas?
No me agrada pero no sería mejor pasar por referencia el TQuery a la función obtenerSQL

Código Delphi [-]
procedure OpenQuery(var AQuery: TQuery; const ASql: string);
begin
  AQuery.DatabaseName:=cnconexion;
  AQuery.Sql.Text := ASql;
  AQuery.Open;
end;

Empezado por Coco_jac

cuando jalo un TQuery y quiero hace lo mismo no me pinta nada.

¿Que quieres decir con esto?