المشاركات : 2
المواضيع 1
:
: 0
الإنتساب : Jan 2013
إخواني السلام عليكم
كيف اقوم بالتمركز عند اخر سطر تمت اظافته في قاعدة البيانات ونقوم بعملية اخر سطر+1 تم ننقوم باظافة المعلومات عن طريق DATASET.append
لانه حالىاعند اضافة اى سطر في قاعدة البيانات اضافة تمسح اخر سطر تمت اظافته
استعمل الكود الاتي
procedure TForm1.Button6Click(Sender: TObject);
begin
;ADODataSet1.Append
end;;
سؤالى الثانى ماهو الفرق بين append et insert في dataset
شكرا مقدما
المشاركات : 842
المواضيع 49
:
: 65
الإنتساب : Jun 2010
و عليكم السلام و رحمة الله
مثال
كود :
ADODataSet1.Append;
ADODataSet1.FieldByName('field1').AsString := 'valfield1';
ADODataSet1.FieldByName('field2').AsString := 'valfield2';
ADODataSet1.Post;
كود :
ADODataSet1.InsertRecord(['valfield1', 'valfield2']);
Post تستعمل للحفظ بعد Edit, Insert, Append
بالتوفيق
المشاركات : 25
المواضيع 2
:
: 0
الإنتساب : Jan 2013
الـ Edit لتعديل سجل حالي
الـ Append لإضافة سجل تحت آخر سجل بالجدول
الـ Insert هو إدخال سجل جديد في الجدول
يوجد اختلاف بسيط بين Insert و Append الأخيره تقوم بوضع السجل في آخر الجدول إجباريا بينما الأولى لا يهم الموقع.
المشاركات : 64
المواضيع 32
:
: 0
الإنتساب : Apr 2012
post للحفظ
insert تدخل تسجيلة جديدة في الجدول
append تنشا تسجيلة جديدة في أخر الجدول
المشاركات : 2
المواضيع 1
:
: 0
الإنتساب : Jan 2013
شكرا لكم اخواني، قمت بما يلي
كود :
ADODataSet1.Append;
ADODataSet1.FieldByName('Num_E').AsString := dbedit1.text;
ADODataSet1.FieldByName('Nom_E').AsString := dbedit2.text;
ADODataSet1.FieldByName('Prenom_E').AsString := dbedit3.text;
ADODataSet1.FieldByName('D_Nais_E').AsString := dbedit4.text;
ADODataSet1.FieldByName('A_Etud_E').AsString := dbedit5.text;
ADODataSet1.Post;
لكن المشكلة تقع عند ادخال المعلومات للمرة الثانىة فهنا يتم مسح اخر سجل وتعويضه بالذي ادخلته ماخرا
المشكلة الثانية هي عندما اقوم بتنفيد البرنامج تظهر لي معلومات السجل الاول من القاعدة البيانات لكن كيف تكون DBEDIT فارغة لكى اتمكن من ملئ المعلومات
شكرا مقدما و جزاكم الله خيرا
المشاركات : 842
المواضيع 49
:
: 65
الإنتساب : Jun 2010
السلام عليكم
عندك خياران
- تستخدم DBEDIT تضيف زرين واحد Append و الآخر Post فقط
- تعوض كل DBEDIT بـ TEDIT و تستخدم الكود الذي كتبته ( مع تعويض dbedit بما يقابلها )
بالتوفيق