delphi4arab منتديات دلفي للعرب

نسخة كاملة : كيف يمكنني ان اضع دالة اتصال بقاعدة بوحدة ومناداتها
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم

كيف يمكنني ان اضع دالة اتصال بقاعدة بوحدة ومناداتها كل ما ااحتاج اليها
وعند مناداتها تعود ب TADOConnection استخدمه في التعامل مع الجداول او الاستعلامات؟
بحيث تكون هذه الدالة منفصلة في وحدة.
السلام عليكم...

لماذا لا تضع مكون TADOConnection جاهز على الـ Form الرئيسية أو في Data Module و تربط به كل ما لديك من مكونات الجداول و الاشستعلامات و غيرها (TADOTable, TADOQuery, TADOCommand ... إلخ).

أنا شخصياً أضع مكون TADOConnection جاهز على الـ Form الرئيسية، و أضيف اسم الوحدة الرئيسية إلى جملة uses في قسم الـ interface لكل وحدة بها DataSets **** ربطها بالـ TADOConnection.

طبعاً أقوم بفتح الاتصال عند بدء تشغيل البرنامج، و أغلقه عند إغلاق البرنامج.

سلام.
شكرا الاخ ناجي واتمنى ان تكون طيب
كما تعرف انا من مبرمجي المهجر (الفجوال الى دلفي) وكالعادة دوال الاتصال بقاعدة البيانات توضع في موديول
اشكر ك كثيرا ... بدأت في التعرف على ال Data Module
اعمل اجراء وقم بتمرير البارامترت له وهذه البارامترات بتكون عبارة عن المكونات
في الحقيقة لا اعرف طرق التعامل مع قواعد البيانات ... إلخ

لكن إذا اردت ان تعمل دالة تعطيها الباارمترات وتعيد لك بيانات من نوع TADOConnection تكتب function
بهذه الطريقة : ( مثال )
PHP كود :
// Name function  //Parameter One //Type   //Parameter Two//Type      // Type Return Function
function GetDataFromDataBase(NameDataBase : TDateBase; NumberType : Integer ): TADOConnection;
begin
  
//....
  //Your Command
  //....
end; 

قم بالتعديلات التي تريدها واكتب الدالة وبعد ذلك النيتجة التي تريد ان يتم إعادتها ضعها في سطر هكذا :
PHP كود :
Result := Return 

طبعاً يوجد العديد من الطرق لتعامل مع الدوال ( Function ) وما ذكرته هو احد تلك الطرق

اتمنى اني افدتك والسلام عليكم ورحمة الله وبركاتة