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

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

سؤالي هو : كيف اغير مسار Alias
مثلا نعلم ان مسار قواعد بينات DBDEMOS :

كود :
C:\Program Files\Fichiers communs\Borland Shared\Data

كيف اغيره برمجيا بالدلفي الى :

كود :
C:\MY BDE

وعليكم السلام ورحمة الله
لِم لا تستخدم مسار نسبي (Relative)
انظر أيضا:
http://www.delphi4arab.net/forum/showthread.php?tid=100
http://www.delphi4arab.net/forum/showthread.php?tid=71
http://www.delphi4arab.net/forum/showthr...p?tid=3820

السلام عليكم ورحمة الله
إضافة لما قاله الاخ كاش واحد

كود :
var
dir :String;
begin
  with Session do
    begin
      try
      Dir:=DirectoryListBox1.Directory;
        if not DirectoryExists(Dir) then
        ForceDirectories(Dir);
        AddStandardAlias('AliasExample',Dir,'PARADOX');
      finally
      ConfigMode := cmAll;
      end;
    end;
end;

اوضيح أكثر لكن على العموم يمكنك إنشاء alias باستعمال module base de donnees الموجود في delphi أو باستعمال odbcdriver بكتابة odbcad32.exe في Exécuter
أذكر الطريقة التي تريد و سأشرحها بالكامل
ثم إستعمل ttable أو tquery و اكتب في الكود الخاص بـ button
'إسم الalias الجديد' =: databasename

King SofT

kachwahed

paix144

live05