السلام عليكم ورحمة الله تعالى وبركاته
مشكلة مسار DatabaseFileName
ماذا اضع في هذا الحدث بدون ما اكتب المسار باكمله
يعني بدلا من ان اكتب
c:\exemple\fichiers.abs
كنت في الدلفي7 اكتب فقط
.\fichiers.abs
اما في xe8 لم يتعرف عليها الا بكتابة المسار بالكامل
سلام عليكم
ضع connection string فالحدث OnActivate للفورم
مثال على database access
كود :
procedure TForm2.FormActivate(Sender: TObject);
begin
q.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;'+
'User ID=Admin;Data Source=.\db.mdb;'+
'Mode=Share Deny None;'+
'Jet OLEDB:System database="";'+
'Jet OLEDB:Registry Path="";'+
'Jet OLEDB:Database Password="";'+
'Jet OLEDB:Engine Type=5;'+
'Jet OLEDB:Database Locking Mode=1;'+
'Jet OLEDB:Global Partial Bulk Ops=2;'+
'Jet OLEDB:Global Bulk Transactions=1;'+
'Jet OLEDB:New Database Password="";'+
'Jet OLEDB:Create System Database=False;'+
'Jet OLEDB:Encrypt Database=False;'+
'Jet OLEDB:Don''t Copy Locale on Compact=False;'+
'Jet OLEDB:Compact Without Replica Repair=False;'+
'Jet OLEDB:SFP=False;';
end;
.