delphi4arab منتديات دلفي للعرب

السلام عليكم و رحمة الله

التعامل مع المسارات في قواعد البيانات
شرح فلاشي لمحاولة رفع اللبس عن كيفية تصميم و بناء بـرنامج تسيير قواعد البيانات يشتغل على اجهزة اخرى غير التي برمج عليها، في هذا الشرح حاولت ان شاء الله ايصال المبدأ العام يدويا و على المبرمج ان يقوم بتطوير الفكرة برمجيا، بمعنى جعل برنامجه يقوم بالعملية أليا...
الشرح في المرفقات.

رابط الجزء الثاني:
http://www.delphi4arab.net/forum/showthr...p?tid=4000

بالتوفيق ان شاء الله

اذكر ان مشكل المسارات في قواعد البيانات لدلفي كان من بين الامور المقلقة بالنسبة لي سابقا .
اضن مع Absolute database لا يوجد مشكل مع المسارات

وعليكم السلام ورحمة الله وبركاته
فكرة جيدة باستخدام الرمز "." كإشارة إلى المسار الحالي عند استخدام البرنامج 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; 

بالتوفيق.

مشكوووور اخي

اين تكتب هذه التعليمات لقد حاولت كتابتها في الوحذة الرئيسية للمشروع لم ينفذالبرنامج؟

STRELiTZIA

virtual

kachwahed

ibrabarca

awatef98