وعليكم السلام ورحمة الله وبركاته
فكرة جيدة باستخدام الرمز "." كإشارة إلى المسار الحالي عند استخدام البرنامج CurrentDirectory
غير أن هذا المسار قد يتغير إما عند إقلاع البرنامج من موضع آخر
أو تغيير المسار الحالي أثناء استخدام البرنامج (تنفيذ علبة حفظ مثلا)
لذلك من المهم أن يتم التأكد من أن المسار الحالي هو نفسه مسار وجود البرنامج قبل الإقلاع
أو استخدام مسار البرنامج عوض استخدام "."
يمكن أيضا ضبط الثابت ForceCurrentDirectory على True من Dialogs.pas:
بالتوفيق.
فكرة جيدة باستخدام الرمز "." كإشارة إلى المسار الحالي عند استخدام البرنامج CurrentDirectory
غير أن هذا المسار قد يتغير إما عند إقلاع البرنامج من موضع آخر
أو تغيير المسار الحالي أثناء استخدام البرنامج (تنفيذ علبة حفظ مثلا)
لذلك من المهم أن يتم التأكد من أن المسار الحالي هو نفسه مسار وجود البرنامج قبل الإقلاع
PHP كود :
...
SysUtils;
{$R *.RES}
begin
SetCurrentDir(ExtractFilePath(ParamStr(0)));
Application.CreateForm(TForm1, Form1);
...
يمكن أيضا ضبط الثابت ForceCurrentDirectory على True من Dialogs.pas:
PHP كود :
{ Win98 and Win2k will default to the "My Documents" folder if the InitialDir
property is empty and no files of the filtered type are contained in the
current directory. Set this flag to True to force TOpenDialog and descendents
to always open in the current directory when InitialDir is empty. (Same
behavior as setting InitialDir to '.') }
var
ForceCurrentDirectory: Boolean = False;
اللهم احقن دماء المسلمين، لا تنسوهم بالدعاء...