Убрать программу из автозапуска (автозагрузки) в Delphi
Для удаления программы из автозапуска поместим на форме Button:
1) В обработчике событий OnClick, пишем :
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 |
var Reg:Tregistry; begin Reg:= Tregistry.Create; Reg.Rootkey:= HKEY_CURRENT_USER; Reg.OpenKey('Software', true); Reg.OpenKey('Microsoft', true); Reg.OpenKey('Windows', true); Reg.OpenKey('CurrentVersion', true); Reg.OpenKey('Run', true); Reg.DeleteValue('Proga'); Reg.CloseKey; Reg.Free; end; |
Там где ‘Proga’ — указываем имя программы, которое было указано для автозапуска.