paso de parametros a tdataset

[Kenobi]

Hola, frecuentemente utilizo una rutina como esta para "enlazar" un dataset con otro

Código Delphi [-]
if not consulta.prepared then consulta.prepare;
consulta.close;
consulta.parambyname('parametro').asLoqueSea := valor
consulta.open;

pues bien, estoy intentando crear un procedure generico que reciba 2 parametros uno el dataset y el otro el campo:

Código Delphi [-]
procedure generico(data:tdataset;campo:String)
begin
data.paramByName(campo).asvariant := campo;

el problema es que el dta set no me acepta el paramByName e intentado con :

Código Delphi [-]
tquery(data).parambyname(campo).asVAriant := campo

pero no resulta...

espero que se entienda la idea
Gracias