jonassondaniel
asked on
Set wallpaper
How do I set the wallpaper in windows in a "professional" way? I want to be able to choose alignment and tile on/of etc.
ASKER
thanks, blackdeath. it works nicely. Please "propose answer" so I can reward you.
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
try this:
procedure ChangeWallpaper(BmpName: string; Tile: Boolean);
var
Reg: TRegIniFile;
begin
Reg := TRegIniFile.Create('Contro
Reg.WriteString('desktop',
if tile then
Reg.WriteString('desktop',
else
Reg.WriteString('desktop',
Reg.Free;
SystemParametersInfo(SPI_S
end;
& then call
ChangeWallpaper('C:\LOGO.B