0

Пишу прогу по добавлению параметров в реестр, но всё бы не чего, всё получается, тут запустил антивирус и доступ к реестру через программу оказался закрыт и у меня исключение -

Project Project1.exe raised exception class ERegistry with message 'Failed to set data for 'HungAppTimeout'. Process Stopped. Use Step or Run to continue .

Как обработать исключение с выводом сообщения о невозможности добавления параметра помогите, пол интернета облазил не понял.

Вот исходник :

**{
TRegistry *reg=new TRegistry;
reg->RootKey=HKEY_CURRENT_USER;
reg->OpenKey("\Control Panel\\Desktop",true);  // Навернека строковый параметр
reg->WriteString("AutoEndTasks", 2);  // Auto closed programm
reg->CloseKey();

Application->MessageBox("Параметр добавлен, значение 2  ", "Registry", MB_OK | MB_ICONINFORMATION);
delete reg;

exit;
}**
10
  • наверное, ответ остался в другой половине, которую вы не облазили
    – DreamChild
    18 мар 2013 в 11:24
  • Читал как обработать исключение при копировании файла, то что про файлы не подходит к реестру .... 18 мар 2013 в 11:26
  • 1
    @KoVadim: интересно, как можно вставить русский текст, чтобы он испортился? Разве что браузер виноват.
    – VladD
    18 мар 2013 в 11:30
  • 1
    Можно, если у него система 64 битная, браузер также, а билдер старый, 32битный. Правда есть один старый трюк - перед копированием текста нужно переключиться на русский, и когда в броузере делать вставку - также на русский. @Programmist Syvorov, да, слеши! в строке "\Control Panel\\Desktop" \C значит совсем другое. Должно быть либо "Control Panel\\Desktop", либо "\\Control Panel\\Desktop". Но мой комментарий будет снова проигнорирован.
    – KoVadim
    18 мар 2013 в 11:35
  • 2
    @Programmist Syvorov: и правда, исправьте слеши, шансы на то, что это решит по крайней мере кусок проблемы, очень высоки.
    – VladD
    18 мар 2013 в 12:27

1 ответ 1

2

примерно так:

TRegistry *reg=new TRegistry;
try
{
  try
  {
    reg->RootKey=HKEY_CURRENT_USER;
    reg->OpenKey("\Control Panel\\Desktop",true);  // Íàâåðíåêà ñòðîêîâûé ïàðàìåòð
    reg->WriteString("AutoEndTasks", 2);  // Auto closed programm
    reg->CloseKey();

    Application->MessageBox("Ïàðàìåòð äîáàâëåí, çíà÷åíèå 2  ", "Registry", MB_OK | MB_ICONINFORMATION);
  }
  catch(...)
  {
    Application->MessageBox("Шеф, всё пропало!!!", "Кабздец", MB_OK | MB_ICONSTOP);
  }
}
__finally
{
  delete reg;
}

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge you have read our privacy policy.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.