ادخال بيانات وحفظها

[alyoseef]

الاخوه الافاضل
ادعل بيانات الى جدول بedit, maskedit واود ان ليطهر خطا عند ما يكون السجل فارغ وكذنك تفريع الedit ,maskedit بعد ان اضعط حفظ button وجزاكم الله خيرا

[hamam2008]

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

كود :

table1.Filtered:=FALSE; IF (maskedit1.Text = ' ') AND( edit1.Text = ' ') THEN messagedlg(' ') ,mtwarning, [mbok] , 0) else IF maskedit1.Text = ' ' THEN Messagedlg (' '),mtwarning, [mbok] , 0) else IF N_edit1.Text = ' ' THEN Messagedlg (' ') ,mtwarning, [mbok] , 0) else BEGIN table1.open; table1.Insert; table1code.Value:=strtodate(maskedit1.Text); table1procn.Value:=edit1.Text; table1name.Value:=edit2.Text; table1carn.Value:=edit3.Text; table1carz.Value:=strtoint(edit4.Text); table1mpr.Value:=strtoint(edit5.Text); table1noc.Value:=strtoint(edit6.Text); table1disc.Value:=strtoint(edit7.Text); table1.Post; end;

و تضع رسائ التوجيه داخل الأقواس و يا لليت ترفق مثال أو صورة
و الله أعلم

[alyoseef]

اشكر ك اخى الفاضل على الاهتمام ماقصدته هو اننى ادخل بيانات الى قاعده بيانا ت بارادوكس
بواسطه ال bedit للبيانات الحرفيه والرقميه وmaskedit للتاريخ وهناك button اضعط غليها للاضافه والحفظ فى قاعده البيانات
المشكله:
اننى اضيف البيانات فلاتحفظ وكذلك القيم المدخله لاتختفى اى بمعنى اننى **** بالضغط على button ان تذهب القيم الى قاعده البيانات وتظهر فى dbgrid مثلا وتختفى من فورم الادخال وان كانت مدخله من قبل فلاتقبل وعذرا للاطاله