+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : هل يمكنني حجز عدد معين من السطور في DBGrid (/showthread.php?tid=1468)
هل يمكنني حجز عدد معين من السطور في DBGrid - medreg - 03-01-2010
السلام عليكم ورحمة الله تعالى وبركاته
لدي جدولين
table1 مربوط بـ Datasource1
table2 مربوط بـ Datasource2
ووضعت على الفورم 1
مكون DBGrid1 مربوط بـ Datasource1
و مكون DBGrid2 مربوط بـ Datasource2
وفي خصائص Table2
وضعت في الحدث MasterSource
Datasource1
ما اسأل عنه هو هل يمكنني حجز عدد معين من السطور في DBGrid2 تلقائيا من خلال كود برمجي
يعني كلما اضفت تسجيلة جديدة في DBGrid1 يظهر لي في DBGrud2 عدد معين من السطور على ان يكون مفتاح Table2 المسمى Cde_Produit مرقم
وهذ حسب السطور التي تكون مجذحجوزة تلقائيًا
ولنفرض ان يكون عدد السطور او السجلات في DBGrid2 خمسة
المطلوب كلما اضفت سجل جديد في DBGrid1 المربوط بDataSource1
اجد في DBGrid2 حسب هذا المثال
Cde_Produit
01
02
03
04
05
وسأرفق مثال للتعديل إذا أمكن المثال لايعمل بالشكل المطلوب لكن ما هو إلا لتوصيل الفكرة فقط
هل يمكنني حجز عدد معين من السطور في DBGrid - medreg - 07-01-2010
لقد اشار علي احد الأصدقاء بان استعمل الأمر Append
واكررها حسب عدد السجلات التي اضفتها تلقائيا على ان تبدأ برقم واحد كلما اردت هذه العملية من جديد
لكن عندما استعملت هذا الكود ربما العملية كانت بالطلب المقصود لكن غير كافي لأنه يبدأ بسجل فارغ
كود :
procedure TForm1.Table1BeforeInsert(DataSet: TDataSet);
begin
table2.Append;
table2.Append;
table2.Append;
table2.Append;
if table2.state=dsEdit then table2.Post;
table2.Post;
end;