| 
| 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 |  |  |  |  |