18-06-2020, 07:57 PM
(آخر تعديل لهذه المشاركة: 18-06-2020, 08:07 PM بواسطة larbiparadox.)
(18-06-2020, 02:32 PM)bassem_43 كتب : السلام عليكم
اخي larbiparadox وعند إستخدام الـ dbEXpress بدل FireDAC كيف يكون الربط ؟؟
وعليك السلام ، أنت غائب على الساحة ، الأخ باسم
بالنسبة dbEXpress الامر يخلف قليلا ، حمل النسخة المضمنة بالنسبة لنسخة 2 تحميل الملف [size=small]Firebird-2.5.9.27139-0_Win32_embed.zip[/size] الذي ينتهي بكلمة embed
* فك الضغط عنها لكن أنسخ الملفات مباشرة مع الملف التنفيذي ، الملفات الضرورية : fbembed.dll ، firebird.msg ، ib_util.dll ، icudt30.dll ، icuin30.dll ، icuuc30.dll ، msvcp80.dll msvcr80.dll
* غير إسم ملف fbembed.dll إلى fbclient.dll
* بالاظافة إلى dbxfb.dll ، إبحث عنه في مسار الدلفي مجلد bin
PHP كود :
var repertoire : string;
begin
Repertoire := ExtractFilePath(paramstr(0));
With SQLConnection1 do
begin
Params.Clear;
DriverName :='Firebird';
Params.Add('DriverUnit=Data.DBXFirebird');
Params.Add('LibraryName=dbxfb.dll');
Params.Add('LibraryNameOsx=libsqlfb.dylib');
Params.Add('VendorLib=fbclient.dll');
Params.Add('VendorLibWin64=fbclient.dll');
Params.Add('VendorLibOsx=/Library/Frameworks/Firebird.framework/Firebird');
Params.Add('Database='+repertoire+'DATABASE.FDB');
Params.Add('User_Name=sysdba');
Params.Add('Password=masterkey');
Params.Add('Role=RoleName');
Params.Add('MaxBlobSize=-1');
Params.Add('LocaleCode=0000');
Params.Add('IsolationLevel=ReadCommitted');
Params.Add('SQLDialect=3');
Params.Add('CommitRetain=False');
Params.Add('WaitOnLocks=True');
Params.Add('TrimChar=False');
Params.Add('BlobSize=-1');
Params.Add('ErrorResourceFile=');
Params.Add('RoleName=RoleName');
Params.Add('Trim Char=False');
Params.Add('ServerCharSet=none');
end;
try
SQLConnection1.Connected:=true;
Edit1.Text:='Base connecté';
// SQLQuery1.Open;
// ClientDataSet1.Active:=true;
Except
Edit1.Text:='Pas de connexion';
end;
end;
بالنسبة للملفات واجب ارفاقها حسب نوع قاعدة البيانات
رابط الصفحة


![[-]](https://delphi4arab.net/forum/D4A2020/collapse.png)