طلب عن كيفية استخدام ال Grid .. عأااااااااااااااااااااااااجل

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

تتطابق الطريقتين من ناحية المبدأ

ولطلبك الأول

على افتراض أن لديك حقل رقمي أساسي في الجدول الاول وهو هنا EmpNo

ضع التالي في اجراء DblClick الخاص بــ Grid1

lnEmpNo=Table1.EmpNo
select Table2
locate for EmpNo=lnEmpNo    or you can use Seek 
if !found()
	insert into Table2 (EmpNo, EmpName, EmpSalary) select EmpNo, EmpName, EmpSalary from Table1;
		where Table1.EmpNo= lnEmpNo
	thisform.Grid2.refresh
endif

وفي اجراء DblClick الخاص بـ Grid2 ضع الاجراء التالي لحذف السجل

lnEmpNo=Table2.EmpNo
delete for EmpNo=lnEmpNo IN Table2

ولا تنسى تغيير خاصية AllowCellSelection لكل من Grid1 و Grid2 الى .F.

هذه أحد الأفكار وطبعا عليك تعديلها بما يتناسب مع الجداول لديك....

وقليل من التعديل عليها للوصول لطلبك الثاني

بسم الله الرحمن الرحيم

السلام عليكم

السلام الى الاخ العزيز ابو فرح..

اما بالنسبة الى الاخ اكرم

لقد وضعت برنامج في االتحميل التالي لا اعرف اخي اكرم هل هو ما تقصد ؟؟؟

VFP.rar

اهلا أخي جواد...كيفك ؟؟؟.. وين هالغيبة.. ان شاء الله خير

Shadowz كتب:

اهلا أخي جواد...كيفك ؟؟؟.. وين هالغيبة.. ان شاء الله خير

الحمد لله اخي واستاذي عبد الله ..والله كنت مشغول بتصميم برنامج ؟؟؟؟

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

انا تلقيت ردودكم .. وبارك الله فيكم