ما هي طريقة ربط firebird كقاعدة مضمنة
#1
السلام عليكم

ما هي كيفية ربط firebird مع دالفي 2010 بواسطة ado و تكون قاعدة مضمنة في مجلد البرنامج حتى ادا تم تغير مسار المجلد يعمل البرنامج كما هو الحال من الأكسس
بحث في منتدى طويل و وجدت شرحات لكن لم افلح في عمل دالك علما اني حملت دايفر و برنامج Firebird-2.1.3.18185-0_Win32_embed و كدالك Firebird-2.5.2.26539_0_Win32
الرد
#2
السلام عليكم

موضوع "استخدام الفايربيرد Firebird كقاعدة بيانات مضمنة" يشرح الامر جيدا
http://www.delphi4arab.net/forum/showthr...p?tid=4015
إقتباس :وجدت شرحات لكن لم افلح
"لم افلح" غير كافية لايجاد الخلل
ما المشكل ؟ ماذا فعلت ؟ وكيف ؟ رسالة الخطأ ؟ اصدار النظام ؟
الرد
#3
السلام عليكم

شكرا اخي لكني تتبعت الشرح من قبل
تم الاتصال و تعمل القاعدة جيدا لكن عند نقل مجلد البرنامج الى مسار اخر لا يعمل اي يجب وضع قاعدة البيانات في مسار محدد لا يتغير

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

و في ربط firebird مع دالفي 2010 بواسطة ado و تكون قاعدة مضمنة في مجلد البرنامج مادا يلزم عمله لكي يعمل على جهاز الزبون
الرد
#4

واضح لديك خلل بالمسار
ما ذا كتبت في ال
ConnectionString
الرد
#5
السلام عليكم
اولا قمت بوضع الملفات التالية في مجلد البرنامج
aliases.conf firebird.conf fbembed.dll ib_util.dll firebird.msg
وقمت بعمل اسم مستعار بواسطة درايفر firebrid ODBC

.jpg   firebird odbc 1.jpg (الحجم : 39.23 ك ب / التحميلات : 104)
ثم الاتصال بالقاعدة عن طريق ADO

.jpg   firebird odbc 2.jpg (الحجم : 44.12 ك ب / التحميلات : 88)
كانت العملية ناجحة . لكن عند تغيير اسم مجلد البرنامج لا يعمل البرنامج

.jpg   firebird odbc 3.jpg (الحجم : 14.32 ك ب / التحميلات : 86)
الرد
#6
السلام عليكم
هذا مثال
وعدل فيه مايلزم
ضعه في الحدث OnCreate
كود :
procedure TForm1.FormCreate(Sender: TObject); var Conn, DB: string; begin DB := ExtractFilePath(Application.ExeName) + 'db.mdb'; Conn := 'Provider=Microsoft.Jet.OLEDB.4.0;' + 'Data Source=' + DB + ';' + 'Persist Security Info=False;' + 'Mode=Share Deny None;Extended Properties="";'; Adoconnection1.LoginPrompt := False; Adoconnection1.ConnectionString := Conn; Adoconnection1.Open; Adotable1.Connection := Adoconnection1; Adotable1.TableName := 'Table1'; ADOTable1.Open; end;
الرد
#7
السلام عليكم الاحسن استخدام الحدث BeforeConnect للمكون ADOConnection1 بدل OnCreate للـ Form
يمكن الاستزادة http://www.delphi4arab.net/forum/showpos...ostcount=2
و لرب نازلة يضيق لها الفتى ذرعا و عند الله منها المخرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج
الرد


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


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم