+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute (/showthread.php?tid=1832)
الصفحات:
1
2
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - medreg - 26-03-2010
المقصود بهذا السؤال هو :
لدي برنامج يحتوي على قاعدة بيانات من نوع absolute
واستعمله شهريًا
قاعدة البيانات تحتوي على ستة حقول وهي كالتالي :
NUM من نوع smallint
GRP من نوع String
SRP من نوع String
MT_ANT من نوع Float وهو مخصص للمبلغ السابق أي MT_TOT السابق
MT_MS من نوع Float وهو مخصص للمبلغ الحالي
MT_TOT من نوع Float وهو يساوي MT_ANT + MT_MS
ولنفترض ان لدي جدولين الأول يسمى ABSTABLE1
والثاني يسمى ABSTABLE_ARCHIVE
كل ما ابحث عنه هو :
1- ماهي الطريقة التي يجب علي استعمالها لحفظ المعطيات الأخيرة للجدول ABSTABLE1 في جدولABSTABLE_ARCHIVE كلما تم التغيير في المعطيات الحالية بالجدول ABSTABLE1 .
2- ماهي الطريقة التي يجب استعمالها لإستدعاء الحقل MT_TOT الموجود بالجدول ABSTABLE_ARCHIVEالذي تم به حفظ المعطيات الأخيرة ووضع محتوياته بالحقل MT_ANT الموجود بالجدول ABSTABLE1 الحالي
ملاحظة
بطبيعة الحال في بداية إستعمال البرنامج تكون قاعدة البيانات فارغة وعند الشروع في إدخال المعطيات يكون الحقل MT_ANT فارغ وهذا يعود لعدم وجود معطيات في الجدول ABSTABLE_ARCHIVE
اما في استعمال البرنامج مرة ثانية يجب ان يتم جلب المعطيات الموجودة بالحقل MT_TOT من الجدول ABSTABLE_ARCHIVE الى الحقل MT_ANT الموجود بالجدول ABSTABLE1 وهذا طبعا بعد حفظ معطيات السابقة
اسأل الله التوفيق
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - محمد عبد العزيز - 27-03-2010
السلام عليكم ورحمة الله
بالنسبة لنسخ الجدول باخر يمكن ان تستخدم BatchMove او استعلام SQL او حلقة...
اما الحقل فيمكن ان تاخذ قيمته من جدول لجدول
اين المشكل بالضبط ؟
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - medreg - 27-03-2010
لقد حاولت استعمال مكون BatchMove مع ABSTable
لكن لم أجد في خصائصه مكان
Sible و Source
أما عن استعمال SQL فكيف ذلك
وكيف استعمل الحلقة
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - محمد عبد العزيز - 27-03-2010
السلام عليكم
تعرف ماذا ساقولك لك:
ارفق محاولتك
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - medreg - 27-03-2010
b.m.abdelaziz كتب :ارفق محاولتك
سأفعل بعد 10 دقائق سأرفعها إن شاء الله
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - kachwahed - 27-03-2010
مثال مرفق:
المركبة batchmove
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - medreg - 27-03-2010
medreg كتب :سأفعل بعد 10 دقائق سأرفعها إن شاء الله
اليك المرفق
بالنسبة للزر المكتوب عليه Transferer to TB_1
يعني يبحث في الجدول TB_ARCHIVE على MT_TOT المقابل للـ GRP و SRP
ويضعه في TB_1 في MT_ANT المقابل للـ GRP و SRP
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - medreg - 27-03-2010
kachwahed كتب :مثال مرفق:
المركبة batchmove
مشكور أخي لكن كيف اتعامل معها وانا اتعامل مع قاعدة البيانات absolute
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - محمد عبد العزيز - 27-03-2010
القيت نظرة على المرفق ان كان العدد صغيرا بدلا من BatchMove يمكنك فعل ذلك برمجيا
تقريبا نفس ما كان مكتوب بالمرفق بتصرف
للحفظ
كود :
TB_1.First;
while not TB_1.Eof do begin
if TB_Archive.Locate('GRP;SRP',VarArrayof([TB_1GRP.AsString,TB_1SRP.AsString]),[loCaseInsensitive])
then TB_Archive.Edit else TB_Archive.Append;
TB_ArchiveGRP.AsString:= TB_1GRP.AsString;
TB_ArchiveSRP.AsString:= TB_1SRP.AsString;
TB_ArchiveMT_TOT.AsFloat:=TB_1MT_TOT.AsFloat;
TB_Archive.Post;
TB_1.Next;
end;كود :
TB_ARCHIVE.First;
while not TB_ARCHIVE.Eof do begin
if TB_1.Locate('GRP;SRP',VarArrayof([TB_ARCHIVEGRP.AsString,TB_ARCHIVESRP.AsString]),[loCaseInsensitive])
then TB_1.Edit else TB_1.Append;
TB_1GRP.AsString:= TB_ARCHIVEGRP.AsString;
TB_1SRP.AsString:= TB_ARCHIVESRP.AsString;
TB_1MT_TOT.AsFloat:= TB_ARCHIVEMT_TOT.AsFloat;
TB_1.Post;
TB_ARCHIVE.Next;
end;ملاحظتين:
لم تذكراي شيئ عن قيمة الحقل NUM بالجدول الاول الذي يبقى دون قيمة عند الاسترجاع
بالنسبة للمكون ABSDatabase1 من الاحسن ان تكون DataBaseName دون مسار test_A.ABS
كيف يمكنني ان احفظ معطيات جدول في جدول أخر باستعمال absolute - amar_del2007 - 27-03-2010
السلام عليكم:
عفواً اخي لم يشتغل البرنامج هل يمكن ارفاق المكون ..