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 that you have read and understand our privacy policy and code of conduct.

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