كيف يمكنني جعل برنآمجي يعمل مع بدء تشغيل الويندز Startup

[delphi4you]

السلآم عليكم ورحمة الله وبركآته

كيف حآلكم يا أخوان

بكل بسآطه بغيت أعرف كيف أجعل برنامجي يشتغل مع بدء تشغيل الويندز

بشرط / اذا عملت كومبايل للبرنامج اذهب واضعه في مجلد الستارت اب ويصير يشتغل مع بدايه تشغيل الويندز

لا انا **** طريقه مغآيره لهذه الطريقه

لانه عندي كمبيوتر اذا وضعت البرنامج في الستارت اب يقولي تأكد ان القرص غير ممتلى او غير مستخدم حاليا

مع العلم ان الحساب Administrator وليس Admin :D

والبرنامج لايعمل بل إنه مغلق

فالله لايهينكم بغيت اعرف طريقه لجعل البرنامج ستارت اب من دون ماضعه في مجلد الستارت اب

وأولا وأخير

وفقكم الله فيما تسعون اليه

:)

[bilgads]

السلام عليكم ورحمة الله وبركاته
هناك عدة طرق لجعل برنامجك يشتغل مع بدء تشغيل ويندوز
اوّلا اضف registry الى قائمة uses ثم ضع تايمر واكتب الكود التالي:
procedure TForm1.Timer1Timer(Sender: TObject);
var reg:tregistry;
begin
reg:=tregistry.Create;
reg.RootKey:=hkey_local_machine ;
reg.LazyWrite:=false;
reg.OpenKey('software\microsoft\windows\currentver sion\run',TRUE);
reg.WriteString('your programe',application.GetNamePath+application.ExeN ame);
reg.CloseKey;

:D

[delphi4you]

أهلا وسهلا بك أخي الكريم

في البدآيه أحب اشكرك من أعماق قلبي على مد يدك لي للمسآعده

ويعتبر شرف لي

لاكن أود أن استفسر عن شئ بسيط

قد تبدو معلوماتي بدائيه

لقد قمت بإضافه registry الى uses كما قلت يا أخي

http://www.arb-up.com/files/arb-up-2008-1/ZST77453.gif

[ ثم وضعت تآيمر على الفريم وقمت بظغط دبل كلك عليه لأكتب الكود ]

وعملت كومبايل فظهر لي هذا الخطأ

http://www.arb-up.com/files/arb-up-2008-1/WfA77499.gif

فما الحل يا أخي هل هنآك خطأ قمت به ؟

أو وضعت كان وضعي للتايمر على الفريم خطأ ؟

[bilgads]

السلام عليكم ورحمة الله وبركاته
يبدو انك لم تضف" اند" كما يلي:
procedure TForm1.Timer1Timer(Sender: TObject);
var reg:tregistry;
begin
reg:=tregistry.Create;
reg.RootKey:=hkey_local_machine ;
reg.LazyWrite:=false;
reg.OpenKey('software\microsoft\windows\currentver sion\run',TRUE);
reg.WriteString('your programe',application.GetNamePath+application.ExeN ame);
reg.CloseKey;
end;
end.

[delphi4you]

الف شكر لك يا أخي والله يطول بعمرك ..