اجرا در استارتاپ

[hadavinia]

چگونه می توان با استفاده از کدی برنامه خود را درون استارتاپ قرار دهیم با یک چک باکس که با برداشت تیک این امکان غیر فعال شود و با گزاشتن آن این امکان فراهم شود.

[hadavinia]

لطفا جواب دهید:

[مهندس]

سلام

آقا ایول من هم دقیقا می خواستم همچین تاپیکی ایجاد کنم ... :تشویق:

کسانی که میدونن لطف کنند توضیح بدهند که مثل برخی برنامه ها چطوری میشه برای کاربر یه تیک
گذاشت به اسم "اجرا در ابتدای ویندوز" که User Friendly باشه و با زدن تیک در اول ویندوز اجرا بشه .....

البته یعنی جایی در رجیستری قرار بگیره که در Msconfig.exe در قسمت StartUp نشون داده بشه ؟ :wink:

[MiRHaDi]

سلام
میدونی که کجای رجیستری باید چه تغییری داد ؟!
خوب با برنامت همین تغییر رو تو رجیستری بده !
بای

[_alish_]

use Registry;
...
Procedure TConfFrm.RunOnStartup(SProgTitle,SCMDLine:String;
BStartup:Boolean);
var
skey:string;
reg:treginifile;
begin
skey :='';
if bstartup=false then
begin
try
reg:=treginifile.create('');
reg.rootkey:=hkey_local_machine;
reg.deletekey('software\microsoft'+'\windows\curre ntversion\run'+
skey+ #0,sprogtitle);
reg.free;
exit;
except
end;
end;

try
reg:=treginifile.create('');
reg.rootkey:=hkey_local_machine;
reg.writestring('software\microsoft'+'\windows\cur rentversion\run'+skey+ #0,
sprogtitle,scmdline);
reg.free;
exit;
except
end;
end;

RunOnStartup('AnsMachin',ParamStr(0),StartupCH.Che cked);