دخول

العيد1403 · 21-10-2019, 09:53 AM

(19-10-2019, 09:58 AM)delphi17 كتب : يتم ربط zupdatesql مباشرة مع الجدول أو الكيري وهو يقوم بتوليد كود سكيال المناسب من إضافة وتحديث أو حذف
لتطبيق الكود لا تحتاج إلى شئ كل ما عليك هو الترميز المعتاد لكل إجراء على الجدول أو الكيري اي تكفي ztable1.post أو ztable1.edit ....الخ وهو يستدعي كود الإستعلام المناسب

السلام عليكم

بارك الله فيك أخي
لقد جربت هذا المثال لعميلة الإدراج

كود :
ZQuery1.Open;
 ZQuery1.Append;
 ZQuery1.FieldByName('CODE1').Value := 7;
 ZQuery1.FieldByName('NAME').Value := 'bbbbbb';
 ZQuery1.FieldByName('SUMNAME').Value := 'bbbbbbb';
 ZQuery1.FieldByName('AGE').Value := 50;

 ZQuery1.Post;
 ZQuery1.Close;
 ZQuery1.Open ;

مع العلم أن محتوى ZUpdateSQL1.InsertSQL.Text ;
كمايلي

كود :
INSERT INTO tt
  (CODE1, NAME, SUMNAME, AGE)
VALUES
  (:CODE1, :NAME, :SUMNAME, :AGE)

ونجح الأمر و لكن بالنسبة لعملية التغيير والحذف لم ينجح الأمر فمثلا هذا الكود الخاص بعملية الحذف لم يعمل

كود :
ZQuery1.UpdateObject.Params.ParamByName('OLD_CODE1').AsInteger :=1;
 ZQuery1.Open;
 ZQuery1.Append;
 ZQuery1.Delete  ;
 ZQuery1.Close;
 ZQuery1.Open ;

ممكن معرفة أينا يكمن الخطأ أو النقص الموجود في الكود البرمجي
وشكرا

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة