delphi 设置桌面壁纸

只要您的uses子句中有Winapi.Windows单元，这在 VCL 和 FMX 中都适用。对于这个 API 调用，我们可以使用SystemParametersInfo()和SPI_SETDESKWALLPAPER作为第一个参数。

SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, PChar('Z:\delphicon_wallpaper-1559859.png'), SPIF_SENDCHANGE);