Скачать: CL | DM;

Как програмно создать алиас в BDE?   Найти похожие ветки 

← →
Whippi ©   (2002-12-09 15:01) [0]

Делаю так:

Session.AddStandardAlias("Kursovik","C:\Evdokimova\date","DBASE");
Session.SaveConfigFile;
Session.Close; // иначе он у меня не был сpазу виден
Session.Open;
но почему то не получается, подскажите так ли я действую?

---

← →
asdf   (2002-12-09 15:07) [1]

ну глянь в help!

var
MyList: TStringList;
begin
MyList := TStringList.Create;
try
with MyList do
begin
Add("SERVER NAME=IB_SERVER:/PATH/DATABASE.GDB");
Add("USER NAME=MYNAME");
end;
Session1.AddAlias("NewIBAlias", "INTRBASE", MyList);
finally
MyList.Free;
end;
end;

---

← →
asdf   (2002-12-09 15:09) [2]

begin
with Session do
begin
ConfigMode := cmSession;
try
AddStandardAlias("TEMPDB", ExtractFilePath(ParamStr(0)), "PARADOX");
finally
ConfigMode := cmAll;
end;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c