تعریف مسیر برنامه

[ord1383]

با سلام خدمت دوستان
من برنامه ای نوشته ام و در مسیر e:/project ذخیره کرده ام . در برنامه ام برای پس زمینه برخی فرمها از عکسهایی استفاده کرده ام که در هنگام باز شدن فرم از مسیر e:/project/picture خوانده می شود . در ضمن مقدار connectionstring را هم در یک فایل متنی درمسیر e:/project/path.txt ذخیره کرده ام که در ابتدای برنامه آنرا خوانده و به بانک اطلاعاتی متصل می شود . حال مشکل من این است که کاربر باید حتماً برنامه را در یکی از درایوهای اصلی در مسیر
project/ نصب کند تا برنامه اجرا شود و اگر مثلاً در مسیر /program files/project نصب شود در فراخوانی عکسها و فایل متنی با مشکل روبرو می شود .
ممنون می شوم مرا در حل این مشکل راهنمایی کنید.

[HamidSI]

فکر کنم دستور GetCurrentDir بتونه کمکت کنه

[saniak_robot]

از دستور getdir استفاده نمایید .



موفق باشید .

[babak869]

از این کد در برنامه برای پیدا کردن مسیر پوشه جاری استفاده کن


Image1.Picture:=ExtractFileDir(ParamStr(0))+'/1.jpg';
یا
....:=ExtractFilePath(Application)+'/....';

موفق باشید

[ord1383]

خیلی ممنون از راهنمایی دوستان

[ord1383]

با تشکر مجدد .
دستور

Image1.Picture.loadfromfile(ExtractFileDir(ParamSt r(0))+'picture/1.jpg');
را نوشتم و جواب گرفتم .

[babak869]

با سلام


Image1.Picture:=ExtractFileDir(ParamStr(0)+'\1.Jpg ';

موفق باشید