تنظیم برنامه [بایگانی]

Abbasgholami

دوشنبه 08 اسفند 1384, 20:09 عصر

فرض کنید 3 تا checkbox داریم که در زمان طراحی 2تای آنها تیک خورده است هر بار که برنامه اجرا می شود این 2تا تیک خورده نشان داده میشوند. میخواهم قابلیتی داشته باشد که اگر در اجرا کاربر تیکها را عوض کرد دفعه دیگر که برنامه اجرا میشود همانطور که کاربر دفعه آخر مشخص کرده نمایش داده شود. باید چه کار کرد؟؟؟
متشکرم

Mahmood_M

دوشنبه 08 اسفند 1384, 20:17 عصر

فکر کنم با فایلهای Ini این کار عملی باشه ( می تونید توی فایلهای Ini مشخصاتی مثل طول عرض فرم های برنامه موقعیت فرم و خیلی چیزهای دیگه رو ذخیره کنید و بعد اونا رو فراخونی کنید ).
البته من تا حالا برای CheckBox امتحان نکردم !!!!
راههای دیگه ای هم هست مثلا رجیستری ( بستگی به نوع کاری که اون چک باکس می کنه داره ) ...

Abbasgholami

چهارشنبه 10 اسفند 1384, 21:10 عصر

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

Mahmood_M

چهارشنبه 10 اسفند 1384, 21:17 عصر

آقای غلامی ، فکر کنم من به شما جواب دادم !!!!!
لطفا چشمهاتون رو باز کنید ....

mzjahromi

پنج شنبه 11 اسفند 1384, 08:15 صبح

همونطوری که دوستمون گفتن یکی از راهها استفاده از رجیستری هست . شما میتونید هنگام خروج از فرم وضعیت CheckBoxها رو ذخیره و هنگام ورود به فرم بازیابی کنید.

procedure TSelForm1.FormClose(Sender: TObject; var Action: TCloseAction);
Var
R:TRegistry;
begin
R:=TRegistry.Create;
R.RootKey:=HKEY_CURRENT_USER;
r.OpenKey('ProgramName\Info',True);
R.WriteBool('PrintF1',CheckBox1.Checked);
R.WriteBool('PrintF2',CheckBox2.Checked);
R.WriteBool('Descr',CheckBox4.Checked);
R.WriteBool('Panel3Visible',Panel3.Visible);
R.WriteBool('SelIndex',RadioButton1.Checked);
R.CloseKey;
R.Free;
end;

یه کد شبیه به این هم باید تو OnShow بنویسید