Delphi i tapeta pulpitu

Jak mogę zmienić tapetę pulpitu z poziomu mojej aplikacji?

s:='plik.bmp';
SystemParametersInfo(SPI_SETDESKWALLPAPER,0,PChar(s),SPIF_UPDATEINIFILE
                     or SPIF_SENDWININICHANGE);