Форум: "Базы";
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];
ВнизКак создать Alias Найти похожие ветки
← →
Basil (2002-02-06 15:15) [0]Подскажите, пожалуйста, как программно добавить новый Элиас к таблице, но так, чтобы он остался в idapi.cfg, т.е., чтобы после перезагрузки не пропадал.
← →
Mike_Goblin (2002-02-06 15:35) [1]Использовать объект сессии (компонент TSession)
Приблизительно так:
with Session1 do
begin
ConfigMode := cmPersistent;
AddStandardAlias("TEMPDB", ExtractFilePath(ParamStr(0)), "PARADOX");
end;
Фишка в установке ConfigMode
← →
Вячеслав (2002-02-06 17:04) [2]Делается вот так, есть фишка связанная с кириллицей:
Если настраивать через конфигуратор БДЕ, то выбираешь
Pdox Ansi Cyrillic, а если создаешь в рантайме то-ancyrr;
Кроме того, если не писать Session.SaveConfigFile;, то
алиас будет существовать пока работает твоя программа или есть коннекты к нему. Посмотри настройки упомянутого Mike_Goblin ConfigMode.
procedure TfrmAlisByCode.btnNewAliasClick(Sender: TObject);
var
MyList: TStringList;
begin
MyList := TStringList.Create;
try
with MyList do
begin
Add("SERVER NAME= DATABASE.GDB");
Add("USER NAME=SYSDBA");
Add("LANGDRIVER=ancyrr");
end;
Session.AddAlias("SRVDIAGR", "INTRBASE", MyList);
Session.SaveConfigFile;
finally
MyList.Free;
end;
end;
← →
Basil (2002-02-07 09:01) [3]Всем спасибо. Все получилось.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.03.04;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c