КАК ПРОГРАММНО ИЗМЕНИТЬ ОБОИ НА РАБОЧЕМ СТОЛЕ - 19 Марта 2011 - Блог

Приветствую Вас Гость | RSS


	Меню сайта
	Главная страница Фотоальбомы Файлы Блог Карта Тобольска Доска объявлений Видео Видуо Уроки Статьи Тесты Гороскоп Онлайн игры Гостевая книга Форум Обратная связь Информация о сайте

Категории раздела

Тобольск [0]

ТГСПА [0]

Delphi [40]

Basic [0]

Разное [4]


	Радио

ЧАТ


	Облако тегов


	Облако фото
	//tobolsk.clan.su/_ph/4/1/150873535.jpg //tobolsk.clan.su/_ph/7/1/453341996.jpg //tobolsk.clan.su/_ph/7/1/806852865.jpg //tobolsk.clan.su/_ph/7/1/29321847.jpg //tobolsk.clan.su/_ph/7/1/859769387.jpg //tobolsk.clan.su/_ph/7/1/236430429.jpg //tobolsk.clan.su/_ph/7/1/33755069.jpg //tobolsk.clan.su/_ph/7/1/794102126.jpg //tobolsk.clan.su/_ph/7/1/571510624.jpg //tobolsk.clan.su/_ph/7/1/777819466.jpg //tobolsk.clan.su/_ph/7/1/938444522.jpg //tobolsk.clan.su/_ph/7/1/267511815.jpg //tobolsk.clan.su/_ph/7/1/289331199.jpg //tobolsk.clan.su/_ph/7/1/771608972.jpg //tobolsk.clan.su/_ph/7/1/585881247.jpg //tobolsk.clan.su/_ph/7/1/124811471.jpg //tobolsk.clan.su/_ph/7/1/545950401.jpg //tobolsk.clan.su/_ph/7/1/970751943.jpg //tobolsk.clan.su/_ph/7/1/530207562.jpg //tobolsk.clan.su/_ph/7/1/364189560.jpg


	Форум
	композитная арматура (0) Справедливо ли это???? (1) Недвижимость в Тюмени (1) Качество услуг и обслуживания (2) строительный эксперт (0) гид по Греции (0) винные туры по Италии (0) деревянные лестницы (0) гид по Италии (0) Разные поздравления (1)

Главная » » КАК ПРОГРАММНО ИЗМЕНИТЬ ОБОИ НА РАБОЧЕМ СТОЛЕ

21:45

КАК ПРОГРАММНО ИЗМЕНИТЬ ОБОИ НА РАБОЧЕМ СТОЛЕ

uses ...Registry; //подключаем модуль ...

procedure TForm1.Button1Click(Sender: TObject);
var Reg: TRegIniFile;
begin
Reg := TRegIniFile.Create('Control Panel');
Reg.WriteString('desktop', 'Wallpaper', 'c:\windows\Установка.bmp');
Reg.WriteString('desktop', 'TileWallpaper', '0');
Reg.Free;
SystemParametersInfo(SPI_SETDESKWALLPAPER, 0, nil, SPIF_SENDWININICHANGE);
end;

Категория: Delphi | Просмотров: 548 | Добавил: SeM | Рейтинг: 0.0/0

Всего комментариев: 0

Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]


	Поиск по сайту

Календарь


	Новый Год


	Опрос
	Были вы в Тобольске? Да Нет Хотел бы Не хочу Всего ответов: 23 Всего голосовало: 23 Обсудить на форуме


	Друзья сайта
	Проверьте интернет скорость


	Статистика


	Погода


	Коменнтарии
	Delphi. Создание компонентов Не за что )) Delphi. Создание компонентов Извиняюсь, заработал. Спасибо за урок Delphi. Создание компонентов Компонент не работает Radio Play Давайте помогу разобраться ? вы хотите что бы когда выбиралась станция сразу начинала проигрывать? скиньте исходник или как лучше связаться с вами? настройка скрытого TeamViewera у меня все работает! настройка скрытого TeamViewera Нифига не робит... Кто знает как сделать чтобы на жесткий жертвы сохранял.. ISQ 606017777 Танчики FSDGHDFJHRG Танчики V5TGRH


	Отзывы Фото
	6 МИКР 6 микр. Красивое место.... Ершов Ершов )))) Старый музей Старый музей но щас его перенесли... ПодГора Фотография под горы Закат Красивое фото!!!