Delphi - Modificar el papel tapiz

Hola!! como se puede modificar el papel tapiz desde un evento de Delphi, lo que trate de hacer es modificar la dirección del papel taíz activo del registro de windows, pero no sirve. Como le puedo hacer?? o que otras formas hay de hacerlo?? Gracias

Aqui tienes un codigo, que ni tan siquiera he probado, espero que te sea de ayuda...

Bitmap:='c:\file\back.bmp';
SystemParametersInfo(SPI_SETDESKWALLPAPER,0,Pchar(BitMap),SPIF_UPDATEINIFILE +
SPIF_SENDWININICHANGE);

Saludos
Efren