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

درس ربط كل من و بقواعد البيانات Dbexpress Mydac

بدأه زكيري عبد العالي في 27 يونيو 2009 · 4 رد · 1,712 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بســم الله الـرحمــن الرحيــم

كما تعلمون اننا بحول الله سنجمع اكبر قدر من الدروس الممكنه في الدلفي وهذه الدروس ليست نضرية بل هي تطبقية لذا سنرى انها تختلف عن كل كتب الدلفي العربية وكما اقررو اقول اننا لا نقوم الا بجمع المعلومات و الترجمة ان لزم الامر فقط

اما بما يخص هذا الموضوع كنت اعلم عنوجود درس جيد في منتدى الاخ على عروة لكن لسوء اللحض وجدت الصور محذوفة هذا مما يتطلب من من يريد المشاركة في هذا العمل الراءع ان يقوم بوضع الصور و اكمال ما قام به الاخ

SmartXega

http://www.orwah.net/modules/newbb/viewtop...hp?post_id=3816

هذه الرابطة الاصلية

ارجوا اعادة كتلة هذا المقال بشكل جميل و وضع الصور

فهل من متطوع

الاخ طلال لم يقصر الاخ على لديه مشروع اخذ كل وقته و انا مازلت لم اكمل درس الويب سرفيس

ارجوا من من يحبون برمجة قواعد البياناة MYSQL ان يضهرو اللان

تعد MyDAC من اجمل المكونات الخاصه بدلفي و التي تتعامل بشكل مباشر مع MySQL Server و صدقني ان قلت انها الافضل من بين الجميع

و تحتوي علي عناصر عديده من اهمها

MyConnaction : مكون الاتصال المباشر بـ MySQL Server

MyCommand : مكون الاوامر حيث يمكن ارسال اوامر SQLمباشرة الي السيرفر

MyQuerey: مكون الاتصال بجداول قاعده البيانات و منفذ لجمل الادخال و التعديل و الحذف

في الاصدار الجديد 5 تجد ايضا المكون MyDataSource حيث هو الوسيط بين الكائنات في البرنامج مثل (Grid,DbEdit,DBComboBox) و MyQuerey

اما عن الاستخدام فهذا مثل لكيفية العمل بها

1- افتح مشروع جديد

2- ضع المكون MyConnactionعلي Form

3- اضغط علي MyConnaction DClick و ادخل اسم المستخدم و كلمة المرور و اسم السيرفر و البورت يمكنك اختيار اسم قاعدة البيانات او تركها عموما اختر اسم قاعده البيانات التى تريد الاتصال بها

4-اضغط علي Connact

xlE88412.jpg

5- اضف المكون MyQuerey و اضبط الخاصية Connaction علي القيمة MyConnaction1 اي مكون الاتصال المضاف في الخطوه 1

6-اضغط DClick علي MyQuerey1يمكن كتابه استعلام عن الجدول المراد استخدامه و استخدام ال Biluder في الاصدار 4 اما الاصدار 5 فيمكنك ذلك بالضغط بالزر الايمن علي المكو ن و اختيار SQLBuilder

اما عن كتابه الاستعلام فيكن مثل

Select * From EMP_table

او

Select * From EMP_Table Where Working=true

vFk88746.jpg

7-بعدها اختر القسم SQL Generator و تاكد من و جود اسم الجدول في القائمة Table Name و ان Insert Update Delete Refresh مختاره

اضغط بعدها علي Generate SQL

nEu88833.jpg

8- اختر القسم Update SQLs و تاكد من وجود اوامر SQL الخاصه ب Insert Update Delete Refresh

eBf88959.jpg

9- اضغط علي موافق و اضبط الخاصية Active علي True

10- اختر المكون DataSource من المجموعه Data Access

11- اضبط القيمة dataset علي القيمة MyQuery1 المكون المضاف في الخطوه 5

LPU89085.jpg

12- اذاكنت تستخدم الاصداره 5 يمكنك اضافة المكون MyDataSource بدل من DataSource و افعل مثل ما فعلنا معه

cM889239.jpg

13- اضف مجموعه من المكونات لادخال البيانات في الحقول

JmB89422.jpg

و اضبط القيمتان DateSourece علي DateSourece1 و FiledName علي اسم الحقل

T6t89679.jpg

14- اضف خمس ازرار للاضافة و التعديل و الحذف و الحفظ و الهروب و كتب في الحدث OnClick ما يلي

procedure TForm1.BCancelClick(Sender: TObject);

begin

MyQuery1.Cancel;

end;

procedure TForm1.BDeleteClick(Sender: TObject);

begin

MyQuery1.Delete;

end;

procedure TForm1.BEditClick(Sender: TObject);

begin

MyQuery1.Edit;

end;

procedure TForm1.BNewClick(Sender: TObject);

begin

MyQuery1.Insert;

end;

procedure TForm1.BSaveClick(Sender: TObject);

begin

MyQuery1.Post;

end;

شغل البرنامج و تاكد ان كل شي سليم

ارجو ان يحوز هذا العبث الضئيل إعجابك

و السلام عليكم و رحمه الله

÷ذا ما قام به اخونا ارجوا تجيديده و الحفاض عليه و كما قلت ان حقوق هذه الموسوعه لكل عربي على قدم ولو كلمة او جمع بين ولو كلمتين

شكرا

انتظر المشارك

---------------------------------------------------------------------------------------

اما عن dbexperss سنكتب عليه بعد االنتهاء من mydac

تم تعديل هذه المشاركة بواسطة زكيري عبد العالي في 17 يوليو 2009 في 10:29

#2

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

أخي زكيري بارك الله فيك على المجهود الذي تبذله في المنتدى

الطريقة التي ذكرتها تنجح 100% في السيرفر المحلي (localhost)

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

في رأيك أين يكمن المشكل ؟؟

بسم الله الرحمن الرحيم " وقل رب زدني علما"

#3

شكرا اخي محمد

اولا لو تكرمت و كنت انت صاحي هذا الموضوع اي

تضع الصور

تشرح قليلا

وستشارك معنا في الموسوعة ان شاء الله

استعملتها في مشروع ISAPI اي موقع واب وبم اري اي مشكلة

لكن سنتناقش بعد اعدادة كتابة الموضوع بشكل جيد .

ارجوا ان تقبل

#4

وهنا الا يجد من يريد الاجر والثواب الصدقة الداءمة .

#5

شكراا لك

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