التعرف على قاعدة البيانات في جهازك اخر

السلام عليكم

يا أخي سؤال ماهي الملفات التي أرفقتها من فضلك

وشكرا

انشاء هذا المسار

C:\Program Files\fichiers commun\Borland Shared\BDE

ونسخ هذه الملفات ولصقها في المسار الذي انشاته

CHARSET.CVB ,EUROPE.BTL,IDR20009.DLL,IDAPI32.DLL,SQLINT32.DLL ,USA.BTL, IDR200c.dllCHARSET.CVB , IDPDX32.DLL ,FAREAST.BTL,IDSQL32.DLL ,OTHER.BTL,IDBAT32.DLL
IDDBAS32.DLL ,BANTAM.DLL

ثم انقر نقرتين على الفورم واكتب الكود التالي

var chemin:string;
Begin
chemin := extractfilepath(application.exename)+'DataName'; 
session.configmode := cmsession;
Try session.AddStandardAlias('MyALias',chemin,'Paradox');
Finally
Session.Configmode:=cmAll;
End;
Database1.TestAlias:='MyAlias';
Table1.Open;
End;

بالتوفيق