مكتبة AsDelphi لانشاء برامج سريعة
#1
لماذا اسمها AsDelphi ...؟

في دلفي تعاملنا مع قواعد البيانات بسيط وسهل جدا ، لهذا اسميتها مثل دلفي

الاداة عبارة عن مكونين 
مكون الاتصال
ومهمته الاتصال بقاعدة البيانات ولا يطلب الا اسم قاعدة البيانات فقط والتي تكون بمجلد المشروع
[صورة مرفقة: attachment.php?aid=4069]
[size=small]
.jpg   1.jpg (الحجم : 17.78 KB / التحميلات : 24) [/size]


مكون الجدول

ومهمته الاتصال بجدول معين وربط الادوات بالحقول ولا يطلب إلا اسم الجدول فقط
[صورة مرفقة: attachment.php?aid=4070]
[size=small][size=small]
.jpg   2.jpg (الحجم : 18.79 KB / التحميلات : 23) [/size]
[/size]


هنا اجريت مثال على طريقة الاستخدام لمثال كامل من اضافة وتعديل وحذف .
[صورة مرفقة: attachment.php?aid=4071]
[size=small][size=small][size=small]
.jpg   5.jpg (الحجم : 75.75 KB / التحميلات : 23) [/size]
[/size]
[/size]



لاضافة سجل جديد

[size=small]كود :[/size]
كود :
Table1.Append()

لحذف سجل


[size=small]كود :[/size]
كود :
Table1.Remove()

للحصول على موقع المؤشر


[size=small]كود :[/size]
كود :
Label1.Text = "Courent Postion : " & int.ToString


لفتح الاتصال


[size=small]كود :[/size]
كود :
  Connection1.Open = True
       Table1.open()


لربط اداة بمصدر البيانات


[size=small]كود :[/size]
كود :
DataGridView1.DataSource = Table1.DataSource


لربط مكونات بمصدر البيانات


[size=small]كود :[/size]

كود :
TextBox1.DataBindings.Add("text", Table1.DataSource, "mname")
       TextBox2.DataBindings.Add("text", Table1.DataSource, "note")
       TextBox3.DataBindings.Add("text", Table1.DataSource, "phon1")
       TextBox4.DataBindings.Add("text", Table1.DataSource, "phon2")
       TextBox5.DataBindings.Add("text", Table1.DataSource, "FIRST_DATE")
       TextBox6.DataBindings.Add("text", Table1.DataSource, "LAST_DATE")
       TextBox7.DataBindings.Add("text", Table1.DataSource, "EMAIL")


ايضا اضفت لها مكون Query تماما مثل دلفي لا يرتبط بالجدول مباشرة وانما لانشاء استعلامات معقدة

وجربت المكتبة على باسكال دوت نت 
[صورة مرفقة: attachment.php?aid=4073]

.jpg   4.jpg (الحجم : 154.21 KB / التحميلات : 23)


لنحميل المكتبة

.rar   AsDelphi.rar (الحجم : 9.69 KB / التحميلات : 4)
فائدة رمضان تتجلى الان فحافظوا على ما كنتم عليه من الطاعات
[-] كل من 3 users say قال شكرا ل Delphi4Us على المشاركة المفيدة
  • Mohamed Allam, rm31, wadoud
الرد


التنقل السريع :


مستخدمين يتصفحوا هذا الموضوع: 1 ضيف