05-04-2018, 09:49 PM
ما في مشكلة ،
عوضا عن تسمية الحقول باسمها الحقيقي ، يمكنك ان تستعمل ترتيبها.
بمعنى ، عندك جدول فيه الحقول التالية :
C1 ,C2,C3...
لاستدعائها ، اما نستعمل اسم الحقل ، او ترتيبه.
Source.fields [o] هو الحقل C1 وهكذا....
While not source.eof do
Begin
For i:=o to 25 do
Begin
Destination.close
Destination.parametrs[i] := source.fileds[i]
Destination.exexsql
Source.next
End
عذرا على الأخطاء لاني اكتب بواسطة هاتفي.
وفقك الله.
عوضا عن تسمية الحقول باسمها الحقيقي ، يمكنك ان تستعمل ترتيبها.
بمعنى ، عندك جدول فيه الحقول التالية :
C1 ,C2,C3...
لاستدعائها ، اما نستعمل اسم الحقل ، او ترتيبه.
Source.fields [o] هو الحقل C1 وهكذا....
While not source.eof do
Begin
For i:=o to 25 do
Begin
Destination.close
Destination.parametrs[i] := source.fileds[i]
Destination.exexsql
Source.next
End
عذرا على الأخطاء لاني اكتب بواسطة هاتفي.
وفقك الله.
اللهم اجعلني من أهل القرآن ، الذين هم أهلك و خاصتك.
تذكر بأن الوقت الذي تلهو فيه ، غيرك يبني مجده فيه.
تذكر بأن الوقت الذي تلهو فيه ، غيرك يبني مجده فيه.