如何開機時就自動執行某程式
發表於 : 2008年 11月 27日, 17:47
[轉貼自 Delphi K. Top]
http://delphi.ktop.com.tw/topic.asp?TOPIC_ID=26139
以下這幾個機碼下的值,為每次開機時都會執行的檔案(也是病毒常用的進入點)
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRun
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRunOnce
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRunOnceEx
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRunServices
HKEY_USERS.DEFAULTSoftwareMicrosoftWindowsCurrentVersionRunonce
作為應用程序的替代,Title你可以為應用程序另寫一個唯一的字串作為Title,ExeName處你可以寫應用程序的完整地址(如果執行需要命令和參數的話亦可加上).
http://delphi.ktop.com.tw/topic.asp?TOPIC_ID=26139
以下這幾個機碼下的值,為每次開機時都會執行的檔案(也是病毒常用的進入點)
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRun
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRunOnce
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRunOnceEx
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsCurrentVersionRunServices
HKEY_USERS.DEFAULTSoftwareMicrosoftWindowsCurrentVersionRunonce
代碼: 選擇全部
procedure Tform1.Button1Click(Sender: TObject);
begin
SetRegistryData(HKEY_LOCAL_MACHINE,
'SoftwareMicrosoftWindowsCurrentVersionRun',
Application.Title, rdString, Application.ExeName);
end;