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 и посмотреть как.

Асссоциирование:
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;

ComboBox и расширения файлов Найти похожие ветки