Borrar carpetas en delphi7

[Kivan]

Muchas gracias Roman esto me funciona a la perfeccion cuando le meto directamente la ruta en la funcion (ej: deletefolder ('.\data\edit'); ), pero en cambio cuando le asigno el valor del string mediante una variable
(ej : cadena:= '.\data\edit';
deletefolder (cadena); )
me da un fallo que me dice lo siguiente : No se puede eliminar Archivo: No se puede leer del disco o archivo de origen , No entiendo el por qué de ese fallo cuando se supone que a la funcion le pasas el mismo string. Me podrian dar una explicacion? Gracias.