19-09-2010, 03:22 PM
مثال سأضع البرنامج داخل Procedure
لاحظ أن داتاباز لها 'Nom alias' المستعمل في إنشاء الأليس
ExtractFilePath(Application.ExeName)+'data' يبين مكان وجود قاعدة البيانات
في انتظار ردودكم تقبلوا تحياتي
PHP كود :
Procedure Connexion;
Begin
Session.ConfigMod := CmSession;
Try
Session.AddStandardAlias('Nom alias', ExtractFilePath(Application.ExeName)+'data', 'Paradox');
finally
Session.ConfigMod := CmAll;
end;
Database1.AliasName := 'Nom alias';
//Open All Tables
end;
لاحظ أن داتاباز لها 'Nom alias' المستعمل في إنشاء الأليس
ExtractFilePath(Application.ExeName)+'data' يبين مكان وجود قاعدة البيانات
في انتظار ردودكم تقبلوا تحياتي