Extraer datos de un dataset?

[Durbed]

Tengo una base en IB6.5 y uso Delphi7. Quiero obtener un dato de una consulta que hago con un IBDataSet, y quiero que ese dato lo recoja en el evento DrawColumnCell. He provado con:

 var aux: STRING;
 ...
 aux:=IBDataSet1.FieldByName('DOCUMENTO'.AsCurrency;

Esto me genera un error de tipos.

Tambien he provado con la funcion CurrToStr

   var aux: STRING;
   ...
   aux:=CurrToStr(IBDataSet1.FieldByName('DOCUMENTO'.AsCurrency);

pero me genera un erro en tiempo de ejecucion:

"Project PApuntes.exe raised exception class EConvert Error whith message 'R00054' is not a valid floating point value.

'R00054' es el primer valor que ha de recoger la variable aux
El tipo de dato de DOCUMENTO en la base de datos es VARCHAR(6)

Gracias.