لقد اخذ الموضوع اكثر من حقه
ساقدم الان طريقة تنزع المشكل نهائيا و تنزع العبء على اخانا Mahdi
وهي بالبرمجة بدون alise نعم و اليك الطريقة
عليك تصميم واجهة لبرنامجك
بعده اضغط مرتين على Form1 واكتب ما يلي في : USES
Inifiles
وفي VAR أكتب ما يلي :
Fichierini : tinifile ;
; Rep,RepExe: string
ثم نفتح المفكرة Note-Pad ونكتب ما يلي :
[Base]
rep=bd/
Fichier=bd.hbd
تقوم بحفظ المذكرة باسم test.ini بجانب
الملف التنفيذي
الجدول مثلا يكون باسم : 'Reintégration.DB' داخل المجلد التالي: bd الذي بدوره يكون في data
و الذي يكون بجانب الملف التنفيذي
اجباري واكيد
ثم نعود إلى الدالفي ونضغط على الــ Form1 مرتين ونكتب ما يلي:
[HTML]procedure TForm1.FormCreate(Sender: TObject);
begin
RepExe:=ExtractFilePath(Application.EXEName);
FichierIni:=TIniFile.Create(repexe+'test.ini');
rep:='data\'+fichierini.ReadString('base','rep','nonbd');
if rep='nonbd.' then
showMessage('Désole mais vous n"avait pas cree une base de donnée')
else
begin
rep:=repexe+'data\'+fichierini.ReadString('base','rep','nonbd');
table1.DatabaseName:=Rep;
table1.TableName:='Reintegration.DB';
table1.Active:=true;
end;
end[/HTML]
و واصل برمجتك الى آخرها و ضع برنامجك اينما تريد.
مهدي كتب :تقوم بتنصيبه بشكل مستقل في النظام الذي لا يقرأ الفلاش
البيانات).
نعم اخي مهدي لابد ان يضع قارئ الفلاش في الحزمة احتمال عدم احتوائه في جهاز المستخدم
و لكن لا تضعه مع الملف التنفيذي وانما بملف وحده و انما يكون مع ملف البرنامج
اظن كما في الصورة المرفقة اليس كذلك اخ مهدي.