VPF::расширение в реестр - Форум программистов

Михалыч

Дата 13.4.2009, 19:52 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 472
Регистрация: 1.7.2008

Репутация: нет
Всего: нет

Добавляю в реестр тип файла "txt" из текстовика,что бы моя программа открывала по умолчанию,но по умолчанию он ни как не хочет становится,как был блокнот по умолчанию,так и остается.
Любые другие расширения устанавливаются,но только если у этих расширений по умолчанию ни какой программы не было,типа "ini".А если в ручную файлу с расширением "ini" выставить блокнот,то после этого моя программа так же не может сделать через реестр себя по умолчанию.
пробовал так:

Код


begin
reg := TRegistry.Create; 
reg.RootKey := HKEY_CLASSES_ROOT; 
reg.OpenKey('.txt',true);
reg.WriteString('', 'LETER');
reg.CloseKey;
reg.OpenKey('LETER\DefaultIcon',true);
reg.WriteString('', paramstr(0) + ', 0');
reg.CloseKey;
reg.OpenKey('LETER\shell\open\command', true);
reg.WriteString('', ParamStr(0) + ' "%1"');
reg.CloseKey;
reg.Free;

--------------------

За частый поиск был забанен во всех известных поисковых системах.
Обиженных комодераторов: 1

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »