Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Файлы

asd © (2006-01-08 18:32:00)
Как прикрепить к файлам картинки программно?

asd (2006-01-12 21:48:00) [1]
Спасибо всем за помощь

Хинт (2006-01-11 20:09:00) [2]
Вот код для связи типа файлов (их расширения) с приложением:
Uses windows, sysutils, registry procedure RegisterFileType(prefix:string; exepfad:string; IconIndex:byte); var reg:TRegistry; begin reg:=TRegistry.Create; try reg.RootKey:= HKEY_CLASSES_ROOT; reg.OpenKey('.'+prefix,True); reg.WriteString('',prefix+'file'); reg.CloseKey; reg.CreateKey(prefix+'file'); reg.OpenKey(prefix+'file\DefaultIcon',True); reg.WriteString('',exepfad+','+IntToStr(IconIndex)); reg.CloseKey; reg.OpenKey(prefix+'file\shell\open\command',True); reg.WriteString('',exepfad+' "%1"'); reg.CloseKey; finally reg.Free; end; end; Пример: procedure TfmOptions.Button1Click(Sender: TObject); begin //сопоставляем нашу програму для работы с таблицами Парадокс //используется 1 иконка из ресурсов Application RegisterFileType('db',Application.ExeName,1); //сопоставляем нашу програму для работы с DBF таблицами //используется 2 иконка из ресурсов Application RegisterFileType('dbf',Application.ExeName,2); //информируем пользователя о случившимся... dlgInfo('Registry suchessfully updated!'); end;

Задавать каждому файлу свою иконку нельзя. Если менять, то всем TXT файлам сразу. Поэтому, как выход:
Зарегистрировать новое расширение, связать его с блокнотом и установить свою иконку на эти файлы.

alex_*** (2006-01-11 19:45:00) [3]
иконку можно задать для конкретного ярлыка, а можно для расширения файлов. Что нужно?

umbra (2006-01-11 16:44:00) [4]
как программно, я не знаю, но вручную это можно сделать если зайти в
пуск\настройка\свойства папки\типы файлов там в списке найти нужный тип, нажать в окошке кнопку "изменить" и в новом окошке нажать кнопку "изменить значок". В третьем окошке будут иконки из редактора для этого типа файлов по умолчанию, но можно выбрать и другой файл с иконками.

asd (2006-01-11 16:00:00) [5]
Поменять иконку. Где-то в свойствах происходит изменение иконки файла. Точнее не знаю, поэтому и спрашиваю.

Плохиш (2006-01-10 16:58:00) [6]

> asd © (10.01.06 16:13) [8]

в эксплорере это не реализовано.

umbra (2006-01-10 16:23:00) [7]
2 asd © (10.01.06 16:13) [8]

т.е надо изменить иконку, которая ассоциирована в экплорере с текстовыми файлами?

Fay (2006-01-10 16:15:00) [8]
2 asd © (10.01.06 16:13) [8]
Скажи лучше, как это делается ручками. М.б. тогда все догадаются, о чём идёт речь...

asd (2006-01-10 16:13:00) [9]
palva, как это сделать программно. Приведу пример: я сохраняю файл формата txt. Я бы хотел, чтобы его иконка была иная - моя личная картинка. Я не знаю кода для реализации. Помогите, пожалуйста!!!

alex_*** (2006-01-09 17:10:00) [10]
текстовый файл по определению не может содержать ничего кроме текста.

palva (2006-01-09 17:08:00) [11]
Может быть нужно создать ярлык, который ссылался бы на ваш текстовый файл и нужную иконку?

asd (2006-01-09 16:41:00) [12]
Извините, но вы не поняли меня. Есть файл формата txt. Я хотел бы, чтобы когда я программно создавал этот txt с данными у него была картинка формата ico.

palva (2006-01-08 19:37:00) [13]
Поместить на форму компоненту TImage

asd (2006-01-08 18:57:00) [14]
А как отобразить картинку?

Gero (2006-01-08 18:45:00) [15]
Пометить файлы с картинками в один архив.

Gero (2006-01-08 18:45:00) [16]
> Пометить

Поместить

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »