چطور مقادیرفعلی اشیاءداخل یک فرم را Reset کنیم.

[arshia_]

یه برنامه دارم که توی اون از تعداد زیادی list box, combo, editbox,....استفاده کردمو برای ورود اطلاعات استفاده می کنم...
وقتی کاربر اطلاعات رو وارد می کنه دکمه ذخیره کردن رو فشار می ده تا مقادیر ذخیره بشه. حالا دوست دارم مثل صفحات وب دکمه ای هم برای Reset اطلاعات بذارم تا با فشار دادن اون اطلاعات وارد شده ریست بشه...
البته خودم با روش غیر استاندارد معمول (یعنی تک تک مقادیر رو خودم ریست می کنم.)
انجام دادم حالا می خوام بدونم آیا این امکان با کمکک یه فرمان استاندارد وجود داره؟
حتی اگر بشه بعد از بستن فرم اونو برای دفعه بعد که می خواد باز بشه ریست کرد باز هم خوبه...

[vcldeveloper]

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


var
i : word;
begin
for i := 0 to ControlCount-1 do
if Controls[i] is TEdit then
TEdit(Controls[i]).Text := '';
end;



حتی اگر بشه بعد از بستن فرم اونو برای دفعه بعد که می خواد باز بشه ریست کرد باز هم خوبه...
برای این کار هم می تونی فرم رو از لیست Auto create forms خارج کنی و هر وقت نیاز بود اونو بصورت دینامیک ایجاد کنی و پس از پایان کار هم آزادش کنی. در این حالت تغییرات کاربر با هر بار ساخته شدن/آزاد شدن فرم از بین میره :


Application.CreateForm(TYourFormClass,YourForm);
try
YourForm.ShowModal;
finally
YourForm.Free;
end;


هر دو روش قبلا توضیح داده شده بود :wink:

موفق باشی

[arshia_]

ممنون آقای کشاورز...
:wink: شرمنده سوال تکراری شد...