Текущий архив: 2004.07.18;
Скачать: CL | DM;
Вниз
ComboBox и расширения файлов Найти похожие ветки
← →
Theli (2004-07-03 00:27) [0]Доброго времени суток.
Помогите новичку:) Имеется ComboBox, со списком определенных расширений файлов, нужно ассоцировать приложение с этими расширениями.
← →
KilkennyCat © (2004-07-03 01:10) [1]Стандартная работа с TRegistry
RootKey := HKEY_CLASSES_ROOT
Если такого расширение нет в системе, то пишем следующее:
Reg.СreateKey(".нашерасширение", True);
Reg.WriteString("", "Етосуперфайл");
здесь "етосуперфайл" - имя раздела для нашей проги.
Создаем его такой веткой: "Етосуперфайл\Shell\Open\Command" со значением True и вписываем в нее строку ("",путькэзешнику + , " "%1"")
еще можно присвоить иконку всем нашим файлам. Для этого достаточно набрать в консоли regedit и посмотреть как.
← →
Marser © (2004-07-03 01:15) [2]Асссоциирование:
r:=Tregistry.Create;
with r do
begin
rootkey:=HKEY_CLASSES_ROOT;
openkey(".ext",true);
writestring("","Type Description");
closekey;
openkey("Type Description\Shell\open",true);
writestring("","Menu item");
closekey;
openkey("Type Description\Shell\open\command",true);
writestring("", somepath+"appl.exe %1");//Имя файла в первом параметре
closekey;
openkey("Type Description\DefaultIcon",true);
writestring("",somepath2+"icon.ico");
closekey;
end;
Страницы: 1 вся ветка
Текущий архив: 2004.07.18;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.043 c
