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

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

← →
Maniak ©   (2003-01-16 16:18) [0]

Мастера! Помогите пожалуйста! Как можно программно создать Alias?

---

← →
gsu ©   (2003-01-16 16:26) [1]

procedure TSession.AddAlias(const Name, Driver: string; List: TStrings);

---

← →
Maniak ©   (2003-01-16 16:37) [2]

Ага, спасибо. А где указывать путь к БД и название Alias"a?

---

← →
gsu ©   (2003-01-16 16:58) [3]

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;

---

← →
MsGuns ©   (2003-01-16 19:30) [4]

Для Paradox лучше AddStandardAlias

---

← →
Reindeer Moss Eater   (2003-01-16 19:42) [5]

Для всего (не только для Paradox) лучше без Alias

---

← →
gsu ©   (2003-01-16 19:42) [6]

procedure TSession.AddStandardAlias(const Name, Path, DefaultDriver: string);
var
AliasParams: TStringList;
begin
AliasParams := TStringList.Create;
try
AliasParams.Add(Format("%s=%s", [szCFGDBPATH, Path]));
AliasParams.Add(Format("%s=%s", [szCFGDBDEFAULTDRIVER, DefaultDriver]));
AddAlias(Name, szCFGDBSTANDARD, AliasParams);
finally
AliasParams.Free;
end;
end;

но есть зависимость.

---

← →
Reindeer Moss Eater   (2003-01-16 20:14) [7]

А все же лучше без Alias

---

← →
MsGuns ©   (2003-01-16 20:35) [8]

>Reindeer Moss Eater (16.01.03 20:14)
>А все же лучше без Alias

Чем же конкретно-то лучше ?

---

← →
Reindeer Moss Eater   (2003-01-16 20:57) [9]

Тем, что не пересечешься с возможно уже сущестующюим алиасом

---

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

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



Память: 0.46 MB
Время: 0.015 c