بســم الله الـرحمــن الرحيــم
كما تعلمون اننا بحول الله سنجمع اكبر قدر من الدروس الممكنه في الدلفي وهذه الدروس ليست نضرية بل هي تطبقية لذا سنرى انها تختلف عن كل كتب الدلفي العربية وكما اقررو اقول اننا لا نقوم الا بجمع المعلومات و الترجمة ان لزم الامر فقط
اما بما يخص هذا الموضوع كنت اعلم عنوجود درس جيد في منتدى الاخ على عروة لكن لسوء اللحض وجدت الصور محذوفة هذا مما يتطلب من من يريد المشاركة في هذا العمل الراءع ان يقوم بوضع الصور و اكمال ما قام به الاخ
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
5- اضف المكون MyQuerey و اضبط الخاصية Connaction علي القيمة MyConnaction1 اي مكون الاتصال المضاف في الخطوه 1
6-اضغط DClick علي MyQuerey1يمكن كتابه استعلام عن الجدول المراد استخدامه و استخدام ال Biluder في الاصدار 4 اما الاصدار 5 فيمكنك ذلك بالضغط بالزر الايمن علي المكو ن و اختيار SQLBuilder
اما عن كتابه الاستعلام فيكن مثل
Select * From EMP_table
او
Select * From EMP_Table Where Working=true
7-بعدها اختر القسم SQL Generator و تاكد من و جود اسم الجدول في القائمة Table Name و ان Insert Update Delete Refresh مختاره
اضغط بعدها علي Generate SQL
8- اختر القسم Update SQLs و تاكد من وجود اوامر SQL الخاصه ب Insert Update Delete Refresh
9- اضغط علي موافق و اضبط الخاصية Active علي True
10- اختر المكون DataSource من المجموعه Data Access
11- اضبط القيمة dataset علي القيمة MyQuery1 المكون المضاف في الخطوه 5
12- اذاكنت تستخدم الاصداره 5 يمكنك اضافة المكون MyDataSource بدل من DataSource و افعل مثل ما فعلنا معه
13- اضف مجموعه من المكونات لادخال البيانات في الحقول
و اضبط القيمتان DateSourece علي DateSourece1 و FiledName علي اسم الحقل
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







