إجبار التطبيق لإستعراض محتوي القرص على مسار ما

[ibba2010]

لقد صممت واجهة للقرص المضغوط بواسطة دالفي7 وعندما نسختها على القرص يطالني البرنامج بوضع محتويات القرص في المسار الأصلي للمشروع(d://)

ملاحظة::laugh:

علما أني أستخدم shellapi لإستعراض المسار
فهل هناك من كود أو طريقة أخرى لإجبار التطبيق لإستعراض محتوي القرص على أي مسار كان

[format82]

ضع قاعدة البيانات مع ملف exe
في ADOConnection احذف المسار واترك اسم قاعدة البيانات فقط

[TF6M]

السلام عليكم
1- إستخراج مسار الملف التنفيذي :

PHP كود :

Var
 sDir: String;
begin
SetLength(sDir,255);
GetCurrentDirectory(Length(sDir),Pchar(sDir));
Caption:= sDir;
///.....
Caption:= GetCurrentDir;{GetDir};
Caption:= ExtractFileDir(ParamStr(0));{Application.ExeName}
end; 


2- المسارات في دلفي
3- هنا & هنا
بالتوفيق ,,