الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

نرجو وضع مثال تفصيلي للتعامل مع قواعد البيانات

مغلق
بدأه المتميز في 19 يوليو 2005 · 6 رد · 646 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

تحية طيبة وبعد

أنشات تطبيق يتصل بقاعدة البيانات عن طريق ADOConnection

وأيضاADOTable

و DataSource

و DBGrid ربطتها بالداتا سورس

والحمد لله يعمل بنجاح

ايضا استطعت البحث عن طريق

ADOTable.locate('name',Edit1.text,[])

وهذا الكود فقط يؤشر على السجل المطلوب في الشبكة .

أنا اريد أن يتم إزالة السجلات - من الشبكة أو أي أداة أخرى - ما عدا النتيجة المطلوبة

من أجل وضع ( السابق - التالي )

مثلا في فيجول بيسك اضع

rs.open"select * from Table1 where id=5"

كيف أعمل مثلها بالدلفي

ونأسف على الاطالة

460.gif

#2
with ADOQuery1 do begin
  with SQL do begin
    Clear;
    Add('SELECT EmpNo, LastName, FirstName, HireDate');
    Add('FROM Employee');
  end;
  Open;
end;

هذا انا على عجالة ساكمل لك الاجابة اصبر قليلا

أضاعوني وأي فتى أضاعـوا * * * ليـوم كــريهـة وســـداد ثغــــر

وخـــــلونـي ومعتـرك المنايـا * * * وقد شـــرعوا أسنــتهم لنحـري

كأني لم أكــــــن فيهـم وسيطـا * * * ولم تك نســبتي في آل عمــرو

أجرر في الجـــوامع كـل يـوم * * * ألا لله مظــــلمتـي وهـصـــري

عسى الملك المجيب لمن دعاه * * * سينجيني فيعلم كيــف شكـري

فأجـــزي بالكرامـة أهـل ودي * * * وأجزي بالضـغينة أهل ضري

منتديات الرياضيات العربية

#3

لا تنسانا اخي العزيز :)

460.gif

#4

أترك كل شيء على ماهو عليه في برنامج السابق ,.

أستبدل AdoTable ب AdoQuery من نفس الصفحة في شريط أدوات دلفي .

أضبط الAdoQuery الجديد إلى AdoConnection

أضبط الDatasource إلى AdoQuery بدلا من AdoTable

الآن بإمكانك وضع شفرة Sql مباشره في الخاصية Sql من ضابط الكائنات , وإعطاء Active = true

أو في زمن التشغيل نكتب مثلا كما كتب الأخ رومانوف :

with ADOQuery1 do begin
close;
  sql.Clear;
  sql.Add('SELECT EmpNo, LastName, FirstName, HireDate FROM Employee');
Open;
end;
#5
/index.ph...=0entry356398

أضاعوني وأي فتى أضاعـوا * * * ليـوم كــريهـة وســـداد ثغــــر

وخـــــلونـي ومعتـرك المنايـا * * * وقد شـــرعوا أسنــتهم لنحـري

كأني لم أكــــــن فيهـم وسيطـا * * * ولم تك نســبتي في آل عمــرو

أجرر في الجـــوامع كـل يـوم * * * ألا لله مظــــلمتـي وهـصـــري

عسى الملك المجيب لمن دعاه * * * سينجيني فيعلم كيــف شكـري

فأجـــزي بالكرامـة أهـل ودي * * * وأجزي بالضـغينة أهل ضري

منتديات الرياضيات العربية

#7

جزاكم الله خير جميعا

460.gif

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…