фон папки

[zmeyy]

Terran Спасибо за большую помощь!!! Почему-то у меня на некоторых папках написано отказано в доступе создания ini файла

[Terran]

И мне надо сделать кнопку смены цвета шрифта.

Дополнение к коду из поста №18:

Procedure TForm1.Button3Click(Sender: TObject);
Begin
If ColorDialog1.Execute Then
Begin
S:=TStringList.Create;
S.Clear;
S.LoadFromFile(ShellTreeView1.Path+'\desktop.ini');
S.Delete(3);
S.Insert(3,'IconArea_Text='+IntToStr(ColorDialog1.Color));
S.SaveToFile(ShellTreeView1.Path+'\desktop.ini');
S.Free;
End;
End;

Почему-то у меня на некоторых папках написано отказано в доступе создания ini файла

Возможно эти папки с ограниченным доступом или в них уже есть ini файл, который используется...

[zmeyy]

Конечно большое спасибо за помощь, но мне надо не много подругому чтоб нажимаешь клавишу шрифт и высвечивались цвета и я мог выбрать подходящий цвет. Можно такое как-то сварганить?

[zmeyy]

А можно еще личный вопрос откуда ты все это знаешь? Просто я тоже хочу начать изучать программирование и благодаря тебе много интересного и полезного нашел

[Terran]

Конечно большое спасибо за помощь, но мне надо не много подругому чтоб нажимаешь клавишу шрифт и высвечивались цвета и я мог выбрать подходящий цвет. Можно такое как-то сварганить?

Конечно можно. Чтобы не повторять код заново, я изменил пост №22.

А можно еще личный вопрос откуда ты все это знаешь?

Сам научился. Сначала немного по книжкам, а потом сидел разбирался как и что работает. Позже, когда появится опыт, уже будет не сложно в чём-либо разбираться, если даже этого не знаешь. Особенно премного благодарен этому форуму. Можно сказать он мне дал большую часть знаний и помог в решении многих проблем. Отдельное спасибо всем его модераторам и администратору!

[zmeyy]

Помогите пожалуйста где можно достать информацию на курсовик по файлу desktop.ini по которой прогу я делал которая находится выше. И что вобще во этой теме можно в курсовик напечатать. Тема: "Разработать программу прозволяющую изменить стиль папки". Заранее спасибо!!!

[DomiNick]

Наверное что-то можно взять здесь...

[zmeyy]

Может еще кто-то поделится?

[Кириллушка]

надо сделать в блокноте файл
deskpot.ini
и вставить в него этот текст
[ExtShellFolderViews]
{BE098140-A513-11D0-A3A4-00C04FD706EC}={BE098140-A513-11D0-A3A4-00C04FD706EC}
[{BE098140-A513-11D0-A3A4-00C04FD706EC}]
Attributes=1
IconArea_Image=Folder Settings\Background.jpg
IconArea_Text=0x00FFFFFF
[.ShellClassInfo]
ConfirmFileOp=0
потом в этой папке делаем папку с названием
folder Settings
и в неё кладём картинку которую назвали background.jpg
и скачиваем с этой ссылки http://narod.ru/disk/26800900000/Thumbs.db.html файл thumbs.db и кладем его туда же
готово!!!