مشکل در insert کردن در بانک

[Batman]

با سلام
دوستان من یه بانک دارم با حدود 30 تا فیلد
سوال اینجاست که چجوری تشخیص بدم که کدوم edit ها پر شده تا فقط همونها رو درج کنم در ضمن استفاده از if هم فکر نمیکنم کار جالبی باشه چون ممکنه حدود 20 تا از فیلدها مقدار بگیره یا نه (چون اختیاری هستش)
لطفا اگر نظری در این باره من رو راهنمایی بفرمایید
ممنونم

[SYNDROME]

با سلام
نام Editها را به طور مثال اینجوری بذار.
Edit و سپس نام فیلد داخل جدول را قرار بده.
حالا کلیه کامپونتهای روی صفحه را بخوان و هر کدام Editّبود و داخل ان پر بود را در جدول ذخیره کن(نام فیلد را هم با دستور Copyبه دست بیاور-با توجه به اینکه نام فیلد بعد از کلمه Editآمده است)
موفق باشید

[ms_mohaghegh]

شما چرا از Data Controls استفاده نمی کنی. فکر می کنم استفاده از TDBEdit (از تب Data Controls) مشکل شما رو برطرف کنه. با استفاده از این کنترل ها شما فقط دستور Inser یا Edit و یا Post رو صادر می کنی و مابقی کارا رو خودش انجام می ده. یعنی کدهایی که شما می نویسی به همین چند خط محدود می شه:

YourDataTable.Insert;
...
YourDataTable.Edit;
...
YourDataTable.Post;

[vahid64]

به نظر من از این پروسیجر استفاده کن ;)


procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
for i:= 0 to ComponentCount-1 do
begin
if Components[i] is TEdit then
if (Components[i] as TEdit).Text<>'' then
begin
....
....
end;
end;
end;


البته این فقط برای تشخیص پر یا خالی بودن فیلد ها به شما کمک می کنه :چشمک: