مكتبة AsDelphi لانشاء برامج سريعة

[Delphi4Us]

لماذا اسمها AsDelphi ...؟

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

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

[size=small]
  1.jpg (الحجم : 17.78 ك ب / التحميلات : 182) [/size]

مكون الجدول

ومهمته الاتصال بجدول معين وربط الادوات بالحقول ولا يطلب إلا اسم الجدول فقط

[size=small][size=small]
  2.jpg (الحجم : 18.79 ك ب / التحميلات : 170) [/size][/size]

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

[size=small][size=small][size=small]
  5.jpg (الحجم : 75.75 ك ب / التحميلات : 172) [/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 تماما مثل دلفي لا يرتبط بالجدول مباشرة وانما لانشاء استعلامات معقدة

وجربت المكتبة على باسكال دوت نت 


  4.jpg (الحجم : 154.21 ك ب / التحميلات : 173)


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

  AsDelphi.rar (الحجم : 9.69 ك ب / التحميلات : 100)