استفسار حول نفس المعلومات في ثلاث FORM
#1
السلام عليكم و رحمة الله و بركاته عندي ثلاثة ليفورم FORM  بنفس المعلومات للشخص اي نفس التاريخ و نفس تاريخ الميلاد  
و يختلفون في المعلومات واريد عندما يتم ملء الاول تظهر الاسماء في الفورم 3  و الفورم الثاني كيف ذلك
الصور مرفقة لانني احسست انني ما فهمتكمش


الملفات المرفقة
.png   01.png (الحجم : 5.96 ك ب / التحميلات : 14)
.png   02.png (الحجم : 6.34 ك ب / التحميلات : 13)
.png   03.png (الحجم : 6.17 ك ب / التحميلات : 11)
الرد
#2
سلام عليكم
الذي فهمته منك هو عند ملئ اسم المريض و العمر يتم اعتماده ايضا في الفورم 2 و الفورم3 ؟
ان كان كذلك فالامر سهل قم بالتصريح uses لكل فورم
كود :
uses unit2, unit3;

وفي الحدث onchange للعنصر Edit الخاص مثلا بإسم المرض (فورم1)
ضع
كود :
procedure TForm1.Edit2Change(Sender: TObject); begin form2.Edit2.Text:= edit2.Text; form3.Edit2.Text:= edit2.Text; end;
الفاشلون نوعان : الأول : فكر ولم يفعل .. والآخر: فعل ولم يفكر
[-] كل من 2 users say قال شكرا ل Mr.DOS على المشاركة المفيدة
  • ahmedhossin, justnick
الرد
#3
(15-12-2023, 08:12 PM)Mr.DOS كتب : سلام عليكم
الذي فهمته منك هو عند ملئ اسم المريض و العمر يتم اعتماده ايضا في الفورم 2 و الفورم3 ؟
ان كان كذلك فالامر سهل قم بالتصريح uses لكل فورم
كود :
uses unit2, unit3;

وفي الحدث onchange للعنصر Edit الخاص مثلا بإسم المرض (فورم1)
ضع
كود :
procedure TForm1.Edit2Change(Sender: TObject); begin form2.Edit2.Text:= edit2.Text; form3.Edit2.Text:= edit2.Text; end;
 جزاك الله خيرا و حفظك و رعاك 
عندي استفسار لو سحمت و
بالنسبة uses unit2.unit3
اضعها في الفورم 2 و الثالث فقط 
ام بخصوص  الحدث onchange للعنصر Edit
اكرر الكود في كل edit في الفورم 01
الرد
#4
نجحت العملية بارك الله فيك و لكن كيف يمكنني اظهارها في dbgrid
عند التنفيذ تظهر لي هذه اللافتة بارك الله فيك


الملفات المرفقة
.png   02.png (الحجم : 4.63 ك ب / التحميلات : 6)
الرد
#5
السلام عليكم
كود :
Uses unit2, Unit3;

تضيفها في الفورم 1 تحت Implementation
وفي الحدث Onchange للعنصر EditName الخاص مثلا بالاسم تضع كود

كود :
form2.Edit2.Text:= EditName.Text;

و نفس الشيئ مع العمر

[ مثال ]

.
الفاشلون نوعان : الأول : فكر ولم يفعل .. والآخر: فعل ولم يفكر
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم