Смена обоев в Windows 7 ultimate

Discussion in 'Болталка' started by tracy, 12 Jul 2010.

  1. tracy

    tracy Elder - Старейшина

    Joined:
    24 Mar 2009
    Messages:
    244
    Likes Received:
    119
    Reputations:
    40
    Не меняются обои в Windows 7 ultimate , захожу под админом (
    [​IMG]
     
  2. Lilo

    Lilo Banned

    Joined:
    10 Mar 2009
    Messages:
    462
    Likes Received:
    784
    Reputations:
    313
    выход один :BolgenOS!!
    а то надоели скучные обои виндовс



    а по сабжу,попробуй темы применить с офф сайта.
     
  3. tracy

    tracy Elder - Старейшина

    Joined:
    24 Mar 2009
    Messages:
    244
    Likes Received:
    119
    Reputations:
    40
    по сабжу )) там только статьи по w7 starter на ultimate не найдеш ))
     
  4. Logatel

    Logatel Member

    Joined:
    6 Oct 2009
    Messages:
    59
    Likes Received:
    15
    Reputations:
    0
    Создай нового пользователя
    После чего оно вылезло?
    :D
     
  5. tracy

    tracy Elder - Старейшина

    Joined:
    24 Mar 2009
    Messages:
    244
    Likes Received:
    119
    Reputations:
    40
    мм.... как бы в первом посте написано что захожу с админа ..
     
  6. Logatel

    Logatel Member

    Joined:
    6 Oct 2009
    Messages:
    59
    Likes Received:
    15
    Reputations:
    0
    И? это мешает чему-то, создай нового пользователя и сиди через него
     
  7. tracy

    tracy Elder - Старейшина

    Joined:
    24 Mar 2009
    Messages:
    244
    Likes Received:
    119
    Reputations:
    40
    Зачем ?
     
  8. HellXi

    HellXi Member

    Joined:
    18 Nov 2008
    Messages:
    74
    Likes Received:
    17
    Reputations:
    0
    во первых, слушай лило :)
    во вторых, ты будешь терроризировать всех пока тебе не обяснят зачем нужен новый юзер? или сделаешь его и отпишешься потом ?
    зы
    если ты думаешь что темы от стандарта не пойдут на ультимейт, то тебе на другой форум, куда нибудь на ответы меил.ру :)
     
  9. tracy

    tracy Elder - Старейшина

    Joined:
    24 Mar 2009
    Messages:
    244
    Likes Received:
    119
    Reputations:
    40
    Все перепробывал уже,пробывал я через персонализацию и regedit,вчера обновил 7 с starter до ultimate МБ прав не хватка ?
     
  10. Logatel

    Logatel Member

    Joined:
    6 Oct 2009
    Messages:
    59
    Likes Received:
    15
    Reputations:
    0
    WinTuning 7
     
  11. h(f)ucker

    h(f)ucker Member

    Joined:
    11 Jul 2009
    Messages:
    81
    Likes Received:
    84
    Reputations:
    32
    Попробуй одним из этих способов установить.
    Code:
     //Делфи
    1)SystemParametersInfo(SPI_SETDESKWALLPAPER,0,PChar('C:\Windows\Plus.bmp'),
    SPIF_SENDWININICHANGE); //С:/windows/... взято для примера, форум почему-то вставил лишний пробел, внимательней.
    
    2)program wallpapr;
    uses Registry, WinProcs;
    
    procedure SetWallpaper(sWallpaperBMPPath : String; bTile : boolean );
    var
      reg : TRegIniFile;
    begin
    // Изменяем ключи pеестpа
    // HKEY_CURRENT_USER
    //   Control Panel\Desktop
    //     TileWallpaper (REG_SZ)
    //     Wallpaper (REG_SZ)
      reg := TRegIniFile.Create('Control Panel\Desktop' );
      with reg do begin
        WriteString( '', 'Wallpaper',
          sWallpaperBMPPath );
        if( bTile )then
        begin
          WriteString('', 'TileWallpaper', '1' );
        end else begin
          WriteString('', 'TileWallpaper', '0' );
        end;
      end;
      reg.Free;
    // Оповещаем всех о том, что мы
    // изменили системные настpойки
    SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, Nil, SPIF_SENDWININICHANGE );
    end;
    
    begin
     // пpимеp установки WallPaper по центpу pабочего стола
     SetWallpaper('c:\winnt\winnt.bmp', False );
    end.
    Если не получится, то наверное встало что-то не так.
    У меня даже на неактивированную семерку устанавливались ;)
     
    #11 h(f)ucker, 12 Jul 2010
    Last edited: 12 Jul 2010