¿Cómo ejecutar un Query con TADOQuery?

[Draco]

lo estoy haciendo de la siguiente manera:

Query:='Select Nombre, Cantidad from Producto';
ADOQuery1.Active:=false;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(Query);
ADOQuery1.ExecSQL;
ADOQuery1.Active:=True;

de lo que acabo de hacer me genera los resultados obtenidos, mi pregunta es como saco todos a la vez para mandarlos como parametro a una funcion (y no sacando uno por uno con los campos activos o Fields).

(Lo que pasa es que estoy pasando parametros entre DLL y es muy pesado estar mandando registro por registro de la consulta, por eso quiero saber si puedo mandar todos a la vez)