[birasa]

хочу ч/з регистр поменять програмно обои:

Код:

if extractFileExt(s)='.jpg' then begin
        reg.WriteString('Wallpaper',reg.ReadString('OriginalWallpaper'));
        reg.WriteString('ConvertedWallpaper',myDir+s)
       end else reg.WriteString('Wallpaper',myDir+s);
      Reg.WriteString('WallpaperStyle','2');

с *.bmp получается, а с *.jpg нет, нужно в ConvertedWallpaper Last WriteTime поменять binary-данные, может кто знает?