Суббота, 21.12.2024, 18:35 Приветствую вас Гость | Группа "Гости" 
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: Волк-1024, Anton93, xXxSh@dowxXx  
Нужна помощь!
SlashДата: Четверг, 10.01.2013, 19:39 | Сообщение # 1
Постоянный
Зарегистрирован: 20.12.2012
Группа: Пользователи
Сообщений: 161
Статус: Offline
Нужно поменять
[HKCR\exefile\shell\open\command]
"(По умолчанию)" = "%1" %*"
на
[HKCR\exefile\shell\open\command]
"(По умолчанию)" = "С:\exp.exe" "%1" %*"

Пробовал так

r:=TRegistry.Create;
R.RootKey:= HKEY_CLASSES_ROOT;
R.OpenKey('exefile\shell\exefile\shell',True);
R.WriteString('(default)','"%2" %*"');
R.CloseKey;
R.Free;

Не выходит!
Что поставить вместо (default)???
 
ms301Дата: Четверг, 10.01.2013, 21:35 | Сообщение # 2
Постоянный
Зарегистрирован: 28.11.2012
Группа: Пользователи
Сообщений: 101
Статус: Offline
r:=TRegistry.Create;
R.RootKey:= HKEY_CLASSES_ROOT;
R.OpenKey('exefile\shell\open\command',True);
R.WriteString('default','С:\exp.exe');
R.CloseKey;
R.Free;
____________________________________________
Если память не подводит-то нужно сделать так)
____________________________________________
И кажется доступ к этой ветке в виндовс выше Виста предоставляется только с правами администратора


Сообщение отредактировал ms301 - Четверг, 10.01.2013, 21:37
 
  • Страница 1 из 1
  • 1
Поиск:

delphicode.ru © 2008 - 2024 Хостинг от uCoz