добавление приложения delphi в автозагрузку

[detalik]

Использую для добавления в автозагрузку вот такую вот процедуру

procedure changereg(strname: shortstring; delete: boolean);
var
reg: tregistry;
begin
reg := nil;
try
reg := tregistry.create;
reg.rootkey := hkey_local_machine;
reg.lazywrite := false;
reg.openkey('softwaremicrosoftwindowscurrentversionrun',false);
if not delete then reg.writestring(strname, application.exename)
else reg.deletevalue(strname);
reg.closekey;
reg.free;
except
if assigned(reg) then reg.free;
end;
end;

procedure TForm1.Button3Click(sender: tobject);
begin
changereg('my app',false); //добавляем в Автозагрузку
end;

procedure TForm1.Button4Click(sender: tobject);
begin
changereg('my app',true); //удаляем из Автозагрузки
end;

Но почему то ничего не работает, что я не так делаю?

[tsar_]

Первое, что бросилость в глаза

...'softwaremicrosoftwindowscurrent versionrun',...

Дальше не читал...

Когда-то и я искал ответ на этот вопрос, нашел в инете (рекомендую) готовый код и состряпал тестовую прогу, которая по нажатию одной кнопки записывает в автозапуск, а по нажатию на другую - удаляет ранее записанную ветку, думаю поможет:

[GunSmoker]

Ребят, не надо использовать реестр для прикладных программ. Используйте папку Автозагрузка - это гораздо более дружелюбнее к пользователю.

[Стелс]

reg := TRegistry.Create;
reg.RootKey := HKEY_CURRENT_USER;
reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\run',True);
reg.WriteString('Start',ExtractFileName);
reg.Free;

вот этот код. должно работать

[mihali4]

Тема наверху. Дабы избежать набивших оскомину вопросов.

Перед тем, как создавать тему, скачайте себе...
http://programmersforum.ru/showthread.php?t=120429

При таком уровне внимательности программист из вас никогда не получится... В лучшем случае - "быдлокодер"...

[Alex11223]

Используйте папку Автозагрузка - это гораздо более дружелюбнее к пользователю.

Однако из используемых программ только dropbox добавляется туда (хотя мб потому что у меня в автозагрузке мало что стоит).

[Пепел Феникса]

Однако из используемых программ только dropbox добавляется туда (хотя мб потому что у меня в автозагрузке мало что стоит).

это значит что надо повторять глупости за другими?