Текущий архив: 2006.01.29;
Скачать: CL | DM;
Вниз
Файлы Найти похожие ветки
← →
asd © (2006-01-08 18:32) [0]Как прикрепить к файлам картинки программно?
← →
Gero © (2006-01-08 18:45) [1]Пометить файлы с картинками в один архив.
← →
Gero © (2006-01-08 18:45) [2]> Пометить
Поместить
← →
asd © (2006-01-08 18:57) [3]А как отобразить картинку?
← →
palva © (2006-01-08 19:37) [4]Поместить на форму компоненту TImage
← →
asd © (2006-01-09 16:41) [5]Извините, но вы не поняли меня. Есть файл формата txt. Я хотел бы, чтобы когда я программно создавал этот txt с данными у него была картинка формата ico.
← →
palva © (2006-01-09 17:08) [6]Может быть нужно создать ярлык, который ссылался бы на ваш текстовый файл и нужную иконку?
← →
alex_*** © (2006-01-09 17:10) [7]текстовый файл по определению не может содержать ничего кроме текста.
← →
asd © (2006-01-10 16:13) [8]palva, как это сделать программно. Приведу пример: я сохраняю файл формата txt. Я бы хотел, чтобы его иконка была иная - моя личная картинка. Я не знаю кода для реализации. Помогите, пожалуйста!!!
← →
Fay © (2006-01-10 16:15) [9]2 asd © (10.01.06 16:13) [8]
Скажи лучше, как это делается ручками. М.б. тогда все догадаются, о чём идёт речь...
← →
umbra © (2006-01-10 16:23) [10]2 asd © (10.01.06 16:13) [8]
т.е надо изменить иконку, которая ассоциирована в экплорере с текстовыми файлами?
← →
Плохиш © (2006-01-10 16:58) [11]
> asd © (10.01.06 16:13) [8]
в эксплорере это не реализовано.
← →
asd © (2006-01-11 16:00) [12]Поменять иконку. Где-то в свойствах происходит изменение иконки файла. Точнее не знаю, поэтому и спрашиваю.
← →
umbra © (2006-01-11 16:44) [13]как программно, я не знаю, но вручную это можно сделать если зайти в
пуск\настройка\свойства папки\типы файлов там в списке найти нужный тип, нажать в окошке кнопку "изменить" и в новом окошке нажать кнопку "изменить значок". В третьем окошке будут иконки из редактора для этого типа файлов по умолчанию, но можно выбрать и другой файл с иконками.
← →
alex_*** © (2006-01-11 19:45) [14]иконку можно задать для конкретного ярлыка, а можно для расширения файлов. Что нужно?
← →
Хинт © (2006-01-11 20:09) [15]Вот код для связи типа файлов (их расширения) с приложением:
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 файлам сразу. Поэтому, как выход:
Зарегистрировать новое расширение, связать его с блокнотом и установить свою иконку на эти файлы.
← →
asd © (2006-01-12 21:48) [16]Спасибо всем за помощь
Страницы: 1 вся ветка
Текущий архив: 2006.01.29;
Скачать: CL | DM;
Память: 0.5 MB
Время: 0.059 c
