الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اضهار المعلومات في خانات Edit بمجرد الضغط فوق اسم الشخص في الجدول

بدأه aderfiad في 24 يوليو 2008 · 3 رد · 716 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

هده اول مشاركة لي باكبر موقع برمجة عربي ماشاء الله مواضيع وافرة ومفيدة

اخواني مشكل بسيط كما تمتل الصورة

89393568my1.jpg

paradox قاعدة البيانات من نوع

وهدا هو الكود الدي وضعته في زر الاضافة


begin
Table1.Insert;
Table1.FieldByname('رقم التسجيل').AsString:=Edit1.Text;
Table1.FieldByname('الاسم والنسب').Value:=Edit2.Text;
Table1.FieldByname('الجنس').Value:=Edit3.Text;
Table1.FieldByname('تاريخ الازدياد').AsString:=Edit4.Text;
Table1.FieldByname('المستوى').Value:=Edit5.Text;
Table1.FieldByname('الملاحظات').Value:=Edit11.Text;
end;
procedure TForm1.Button1Click(Sender: TObject);

اضنه انه مشكل بسيط بالنسبة لكم

فهلا ساعدتموني جازاكم الله خيرا

تقبلو تحياتي

تم تعديل هذه المشاركة بواسطة B.M.AbdelAziZ في 24 يوليو 2008 في 09:22

#2

تعكس ما كتبته في الزر

Edit1.Text := Table1.FieldByname('رقم التسجيل').AsString;
Edit2.Text := Table1.FieldByname('الاسم والنسب').AsString;
Edit3.Text := Table1.FieldByname('الجنس').AsString;
Edit4.Text := Table1.FieldByname('تاريخ الازدياد').AsString;
Edit5.Text := Table1.FieldByname('المستوى').AsString;
Edit11.Text := Table1.FieldByname('الملاحظات').AsString;

على ان تضعه ف يالمكان المناسب

مثلا تكتبه في الحدث AfterScroll للجدول Table1

-

ملاحظة: في زر الاضافة كتبت Table1.Insert ولكن لاتنسى عليك ان تضيف Table1.Post سواء في نهاية الزر او في زر جديد باسم "حفظ" اوي اي مكان تراه مناسب

والسلام عليكم ورحمة الله

d4baa0.gif
#3

الاستاذ الفاضل

مرحبا بك في المنتدى

الحل لمشكلتك بسيط

بدلا من ان تستخدم (Edit) استخدم (DBEdit) ثم اربط جميع (DBEdit) ب (DataSource)

ارجو ان يكون ما تقدم ذو فائدة لكم

وشكرا

#4

السلام عليكم

الف شكر لكم اخواني لقد حللتم مشكلتي الف شكر مرة اخرى (:

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…