Witam
Zrobiłem zmiane tła pulpitu, ktore są zapisane lecz nie natychmiastowo. Plik jaki ma być ustawiony jako tło jest podany odpowiednio lecz nie zmienia się tło pulpitu. Tło zmieni się dopiero po zastosowaniu zmian w opcjach ekranu. Oto kod.
var
Reg : TRegistry;
sciezka : String;
begin
Reg := TRegistry.Create;
Reg.OpenKey('Control Panel\Desktop',false);
Label1.Caption :='Poprzednia tapeta: ' + Reg.ReadString('ConvertedWallpaper');
if open.Execute then
begin
sciezka := open.FileName;
Reg.WriteString('ConvertedWallpaper',sciezka);
end;
Label2.Caption := 'Aktualna tapeta: ' + Reg.ReadString('ConvertedWallpaper');
Jaki kod wpisać aby zmiany się dokonały?