Учимся добавлять программу в автозапуск.

Опубиковано: 09.06.2008 г., автор: , просмотров: 184258

Уроки програмирования на языке Delphi. исходники

В этом уроке пойдет речь о том как добавить свою delphi программу в автозапуск или cделать так что бы она запускалась при каждом страте Windows. Для этого нам нужно добавить некоторые записи в реестр Windows. Для начала, в раздел uses добавляем RegisTry. В любом обработчике событий (можно в OnCreate у формы или в OnClick у кнопки) прописываем код приведенный ниже.

var reg: tregistry;
begin
reg := tregistry.create;
reg.rootkey := hkey_local_machine;
reg.lazywrite := false;
reg.openkey('software\microsoft\windows\currentversion\run', false);
reg.writestring('progrmma', application.exename); {вместо programma можно вставить что нибудь своё}
reg.closekey;
reg.free;
end;

До встречи www.delphiexpert.ru



Похожие материалы

Последние из рубрики

Korral 08 Mar 2009 в 00:00 #
А я создал такой модуль!
Dezz 08 Mar 2009 в 00:00 #
для выключение автозапуска делаем следющее- HKLMSOFTWAREMicrosoftWindowsCurrentVersionpoliciesExplorer SetValue "DisableLocalMachineRun"=dword:00000001 (1) HKLMSOFTWAREMicrosoftWindowsCurrentVersionpoliciesExplorer SetValue "DisableLocalMachineRunOnce"=dword:00000001 (1) HKLMSOFTWAREMicrosoftWindowsCurrentVersionpoliciesExplorer SetValue "DisableCurrentUserRun"=dword:00000001 (1) HKLMSOFTWAREMicrosoftWindowsCurrentVersionpoliciesExplorer SetValue "DisableCurrentUserRunOnce"=dword:00000001 (1)

Я надеьс,никто не повёлся на это? xD
www.rml.do.am 08 Feb 2009 в 00:00 #
для выключение автозапуска делаем следющее-
HKLMSOFTWAREMicrosoftWindowsCurrentVersionpoliciesExplorer
SetValue "DisableLocalMachineRun"=dword:00000001 (1)
HKLMSOFTWAREMicrosoftWindowsCurrentVersionpoliciesExplorer
SetValue "DisableLocalMachineRunOnce"=dword:00000001 (1)
HKLMSOFTWAREMicrosoftWindowsCurrentVersionpoliciesExplorer
SetValue "DisableCurrentUserRun"=dword:00000001 (1)
HKLMSOFTWAREMicrosoftWindowsCurrentVersionpoliciesExplorer
SetValue "DisableCurrentUserRunOnce"=dword:00000001 (1)
Andriuxa 20 Jan 2009 в 00:00 #
А как сделать выкючение автозапуска?
Makcum 26 Dec 2008 в 00:00 #
А как сделать выкючение автозапуска?

ОтменитьДобавить комментарий