قرارگیری برنامه در Startup با پارامتر

[ihpled]

با چه کدی میشه کاری کرد که وقتی برنامه هنگام بالا آمدن ویندوز (Starup) اجرا میشه بصورت مینیمایز باشه و وقتی برنامه توسط کاربر بصورت مستقیم باز میشه بصورت نرمال باز بشه

من دو تا فایل exe کامپایل کردم که یکیشون WindowsStat رو برابر wsMinimized گذاشتم و دیگری نرمال و آدرس برنامه ی مینیمایز رو با کد زیر در شاخه Run قرار دادم


reg:=Tregistry.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVer sion\Run',true);
reg.WriteString(Application.Title,Application.exen ame);
reg.CloseKey;
reg.Free;



روش بهتری هست که بشه با یک فایل اجرایی برنامه رو از استارت آپ اجرا کرد (استفاده از پارامتر یا ..) ممنون میشم راهنماییم کنید

[Mahmood_M]

می تونید آدرس فایل رو با پارامتر در رجیستری ذخیره کنید و در هنگام اجرای برنامه با ParamCount و ParamStr ( یا با ParamStr(1) ) چک کنید که آیا پارامتری به برنامه ارسال شده که اگه پارامتر مورد نظر بود برنامه رو Minimize کنید ...

موفق باشید ...

[Felony]

کدی که بالا نوشتید رو به صورت زیر تغییر بدید :


var
reg:TRegistry;
begin
reg:=Tregistry.Create;
reg.RootKey:=HKEY_LOCAL_MACHINE;
reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVer sion\Run',true);
reg.WriteString(Application.Title,'"'+Application.exename+'" Minimize');
reg.CloseKey;
reg.Free;

این کد رو هم تو رویداد Activate فرمتون بنویسید :

if ParamStr(1)='Minimize' then Application.Minimize;

[Felony]

من پاسخ Mahmood_N رو ندیدم ، کدی که من نوشتم پیرو همون روشی هست که Mahmood_N گفت .