![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как зарегистрировать новый тип файлов в Vista?
Евгений Тарабановский © (2007-03-12 16:10:00)В ХР делал так:
procedure TForm1.RegisterFileType(ext: 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('', Application.ExeName + ',0');
CloseKey;
OpenKey(ext + 'file\shell\open\command', True);
WriteString('', Application.ExeName + ' "%1"');
CloseKey;
Free;
end;
end;
В Windows Vista, похоже, какие-то проблемы правами доступа возникают.
Спасибо
Евгений Тарабановский (2007-03-28 11:17:00) [1]А можно подробнее объяснить, как это сделать?
Eraser (2007-03-12 19:04:00) [2]> [0] Евгений Тарабановский (12.03.07 16:10)
там только с отключенной виртуализацией можно такое, т.е. из под админа с elevated правами либо из программы подправленным token'ом.