delphi4arab منتديات دلفي للعرب

نسخة كاملة : اضافة زر يقوم بادخل محتوى edit الى جدولين في نفس الوقت
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم و رحمة الله وبركاته

كيف اضافة زر يقوم بادخل محتوى edit الى جدولين في نفس الوقت t1 .t2 نوع الجدوين paradox
وعليكم السلام

اضن ان الكود واضح لا يحتاج لشرح
كود :
procedure TForm1.Button1Click(Sender: TObject); begin Table1.Append; Table2.Append; Table1.FieldValues['Field']:=Edit1.Text; Table2.FieldValues['Field']:=Edit1.Text; Table1.Post; Table2.Post; end;
جزاك الله خيرااا اخي الكريم
الكود شغال
ياريت تشرح

كود :
FieldValues['Field']
نستطيع ان نسند قيمة لحقل ما من الجدولد بعدة طرق منها :
كود :
Table1.FieldValues['اسم الحقل']:=Edit1.Text; او Table1Filed.Value:=Edit1.Text; او Table1.Fields[ترتيب الحقل].Value:=Edit1.Text;[B][/B]
شكرا على التوضيح هل تقصد بترتيب
كود :
3 2 1 nom prenom aderesse
متلا لو نريد adresse
فنقوم باسناد رفم 3 حسب ترتبيه في الجداول
كود :
Table1.Fields[3].Value:=Edit1.Text;
نعم لكن الترتيب يبدا من ال 0