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

[Delphi4Us]

السلام عليكم

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

كائن الاتصال يوازي مكون AdoConnection

طبعا بالامكان جعل هذه الفئات مرئية بسهولة UserControl

PHP كود :

Dim con As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source='|DataDirectory|\Contacts.mdb'") 


الربط بين الجداول على طريقة الدلفي

PHP كود :

       TCustomer.Connection = con
        TCustomer.PrimaryKey = "ID"
        TCustomer.TQuery = "Select * from Customers"
        TCustomer.Open()

        TTotal.Connection = con
        TTotal.PrimaryKey = "ID"
        TTotal.Keyindex = "CustomerID"
        TTotal.PrimaryTable = TCustomer
        TTotal.TQuery = "Select * from Total"
        TTotal.Open()


        DataGridView1.DataSource = TCustomer.DataSource
        DataGridView2.DataSource = TTotal.DataSource 


الاضافة والتعديل والحذف على طريقة الدلفي

PHP كود :

Try
            TCustomer.Edit()
            TextBox1.Text = TCustomer.Fields("ID")
            TCustomer.Fields("FirstName") = TextBox2.Text
            TCustomer.Fields("LastName") = TextBox3.Text
            TCustomer.Fields("Company") = TextBox4.Text
            TCustomer.Save()
            MsgBox("Save OK")
        Catch ex As Exception
            MsgBox("Error")
        End Try 


كل الكائنات مغلفة بحيث تتعامل معها وكأنك تتعامل مع مكون الجدول في الدلفي .
طبعا طالما هي بثقنية الدوت نت يمكن العمل بها مع اي لغة سواء في دلفي دوت نت او VB.net او C#.net او C++.net

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

هل تريدون ان ارفع المكتبة كملف Dll ام مفتوحة المصدر بلغة VB.net او C#.net