Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Ассоциация файлов с программой [D7]


Oddin ©   (2005-01-11 22:07:00) 

Как можно ассоциировать определенные типы файлов с моей программой?


Orc   (2005-01-12 07:43:00) [1]

Например так:

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;


Vasya.ru   (2005-01-12 00:48:00) [2]

в реестре прописать. Куча примеров в сети.


Наверх

Титульная страница Поиск, карта сайта Написать письмо