![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как зарегистрировать файлы для открытия их определенной программо
}|{yk © (2005-04-25 13:08:00)Собственно, зачем это. Дорабатываю фронтенд mplayer (для себя).
Понятно, что нужно написать определенную строку в реестр. Но какую? В какую ветвь? Где прочитать?
P.N.P. (2005-04-25 14:12:00) [1]А чего это в форуме пишется 0 ответов в этой ветке?
P.N.P. (2005-04-25 13:23:00) [2]Вот :
procedure RegisterFileType(ext: string; FileName: string);
var
reg: TRegistry;
begin
reg := TRegistry.Create;
with reg do
begin
RootKey := HKEY_CLASSES_ROOT;
OpenKey('.' + ext, True);
WriteString('', ext + 'file');
CloseKey;
CreateKey(ext + 'file');
OpenKey(ext + 'file\DefaultIcon', True);
WriteString('', FileName + ',0');
CloseKey;
OpenKey(ext + 'file\shell\open\command', True);
WriteString('', FileName + ' "%1"');
CloseKey;
Free;
end;
end;