ساختن alias در BDE به صورت RunTime

[Nastaranm]

چگونه می شود runTime در BDE یک Alias ایجاد کرد.

[mzjahromi]

procedure TForm1.Button1Click(Sender: TObject);
var
S:TStrings;
begin
S:=TStringList.Create;
S.Add('DefaultDriver=Paradox');
S.Add('EnableBCD=False');
S.Add('Path=C:\DB');
session1.AddAlias('aliasName','STANDARD',S);
end;

[mojtaba_z]

سلام
من میخوام از طریق برنامه بتونم
1 - BDE رو نصب کنم (البته بصورت Silent)
2 - بعد درون BDE بتونم DataBase و Alias و Driver ایجاد کنم و یا اونا رو تغییر بدم
چیکار باید بکنم ؟ اگه میشه یه مثال بزنید ؟

البته تا اونجایی که از جستجو در سایت فهمیدم باید regsvr32 / s bdeinst.dll رو اجرا کنم .
ولی فایل bdeinst.dll رو از کجا باید بیارم ؟ بعدش باید دستورات بالا رو که نوشتین باید اجرا کنم . ولی برای اینکار نمیدونم چی باید توی فرمم بزارم و چطوری به هم ارطبات بدم !
آخه من با کامپوننت های BDE دون ذلفی اصلا کار نکردم . و فقط با ADO کار کردم .
به خاطر همین گفتم اگه میشه یه مثال بزنید تا اون رابطه هارو هم یاد بگیرم .

با تشکر