Zmiana tapety pulpitu

Aby po kliknięciu przycisku Button1 zmienić tapetę pulpitu wywołujemy funkcję Windows API SystemParametersInfo() podając jako jeden z argumentów ścieżkę dostępu do pliku tapety (należy zwrócić uwagę na podwójny backslash oddzielający katalogi):

Unit1.cpp

void __fastcall TForm1::Button1Click(TObject *Sender)
{
   SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, "c:\\plik.bmp",                         SPIF_UPDATEINIFILE || SPIF_SENDWININICHANGE);
}