Como mudar o papel de parede do windows
Para mudar o papel de parede do windows, primeiro deve-se adicionar à cláusula Uses, ShellApi.
Em seguida deve-se digitar os seguinte comandos:
procedure TForm1.FormCreate(Sender: TObject);
var
Arquivo: String;
begin
Arquivo:=’c:\windows\nuvens.bmp’;
SystemParametersInfo(SPI_SetDeskWallPaper, 0, PChar(Arquivo), 0);
End