كيف يمكن نقل سجيلات من جدول الى اخر باستعمال الفلترة مع العلم ان DatabaseName مختلفة

[AbdouProg]

ولكن حبد لو انه هناك طريقة اخرى من اجل تقليص هده الكتابة لانه باستعمال مثلا عدد كبير من الحقول يصبح الكود مملء نوعا ما
; params[0].value:= DM1.source.Fields[0].Value
; params[1].value:= DM1.source.Fields[1].Value

اكتب الكود في حلقة for

كود :

for j:=0 to 4 do params[j].value:= DM1.source.Fields[j].Value;

السلام عليكم اخي بارك الله فيك على الاهتمام
لقد ثم طرح ما كتبته في هدا الكود في الردود السابقة انظر الى ما سبق و سوف يتبين لك المشكل الدي ارهقني و اثعبني و شكرا مرة اخرى على الاهتمام بارك الله فيك و شكرا و اثمنى ان نجد الحل النهائي مع بقية الاعضاء