FoxPro/Visual FoxPro - Cambiar fondo de escritori con API

Hola a todos!
Quiero cambiar el fondo de mi escritorio desde foxpro, para ello e encontrado este articulo en portalfox

http://www.portalfox.com/index.php?name=News&file=article&sid=136

y pone esto:
**************************************************************************************
FUNCTION CambiarWallPaperWindows(c_Archivo)

DECLARE INTEGER SystemParametersInfo IN USER32.DLL ;
LONG uAction, ;
LONG uParam, ;
STRING lpvParam, ;
LONG fuWinIni

uAction = 20
uParam = 0
lpvParam = ALLTRIM(c_Archivo)
fuWinIni = 0

*--- realiza el cambio
n_Resultado = SystemParametersInfo(@uAction,@uParam,@lpvParam,@fuWinIni)

RETURN n_Resultado

****************************************************************************************

la funcion que uso es esta:

LOCAL Resultado

DECLARE INTEGER SystemParametersInfo IN USER32.DLL ;
LONG uAction, ;
LONG uParam, ;
STRING lpvParam, ;
LONG fuWinIni

uAction = 20
uParam = 0
lpvParam = ALLTRIM("C:\Documents and Settings\practicas\Escritorio\foto.jpeg")
fuWinIni = 0

Resultado = SystemParametersInfo(@uAction,@uParam,@lpvParam,@fuWinIni)

MESSAGEBOX (Resultado)


pero no funciona, que esta mal?

Prueba con un archivo .bmp

Pues ahora funciona.
no se me ocurrio probar con una bmp, gracias plinio

Explicacion?, no la tengo.... solo probé y funciono