Удаление из автозагрузки

[Mrsqler]

нашел тему,где описывался способ добавления своей проги в автозагрузку.Всё хорошо работает,только...Как теперь всё назад вернуть?))
Вот как добавлял

 var  
h: TRegistry;
begin 
 h := TRegistry.Create; 
 with h do 
 begin    
RootKey := HKEY_LOCAL_MACHINE;
  OpenKey('\Software\Microsoft\Windows\CurrentVersion\Run', true);
    WriteString('Proga', 'C:\Users\Äåíèñ\Desktop\Translit\Progect1.exe');
CloseKey;
  Free;
 end;

Я попытался удалить таким способом

var
  reg:tregistry;
begin
  reg := tregistry.create;
  reg.rootkey := hkey_local_machine;
  reg.openkey('software\microsoft\windows\currentversion\run', false);
  reg.DeleteValue('C:\Users\Äåíèñ\Desktop\Translit\Progect1.exe');
  reg.closekey;
  reg.free;
  end;

Но у меня ничего не вышло.

[Dozent]

зайди в реестр по этому пути и удали) Или тебе надо чтобы программа это делала?

[Mrsqler]

Ну да,желательно чтобы программа)

[FaTaL]

Тут пиши не reg.DeleteValue('C:\Users\Äåíèñ\Des ktop\Translit\Progect1.exe');
А reg.DeleteValue('Proga');

[Mrsqler]

Написал,но что-то ничего не помогло.Программа так и осталась в автозагрузке)

[Dozent]

http://programmersforum.ru/showpost....7&postcount=11

вот вроде решение твоей проблемы

[FaTaL]

Сообщение от Mrsqler

Написал,но что-то ничего не помогло.Программа так и осталась в автозагрузке)

Быть не может. Значит что-то неправильно делаешь.

[ProgMaster]

Тут пиши не reg.DeleteValue('C:\Users\Äåíèñ\Des ktop\Translit\Progect1.exe');
А reg.DeleteValue('Proga');

Правильно, а еще лучше записывать в RunOnce если надо чтобы она один раз запустилась