¡Hola!
Lo que buscas es perfectamente viable pasando la información del
Query al TClientDataSet de la forma habitual: usando un TDataSetProvider.
Pero si aún lo quieres hacer con la función que has puesto, sólo tendrías que cambiar la instrucción
Open por
CreateDataSet.
Pruébalo y nos dices cómo te funciona.
Una cosa más: no hagas el
Close al conjunto de datos cliente, porque eso causará que se pierda todo su contenido.
Saludos.
Al González.
