Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Псевдонимы... [D6, D7, Paradox]

makvell © (2005-11-08 09:28:00)
Пишу примерно следующее:

Var
ALLAlias: TStringList;
Y: boolean;
i: integer;
Begin
Y:=false;
ALLAlias:=TStringList.Create;
//Получаю список всех псевдонимов
Session.GetAliasNames(AllAlias);
//Проверяю есть ли такокой какой нужен
for i:=0 to AllAlias.Count-1 do
if AllAlias.Strings[i]=AName then
y:=true;

AllAlias.Free;

if Y then exit
else
//Создаю псевдоним
With Session do
begin
ConfigMode:=cmSession;
AddStandardAlias(AName, APath, 'PARADOX');
SaveConfigFile;
ConfigMode:=cmAll;
end;

Но!!! После закрытия программы он не сохраняется.
Как оставить его зарегистрированным?
Заранее спасибо.

makvell (2005-11-08 09:44:00) [1]
Все, все, все... Спасибо, уже исправил.

makvell (2005-11-08 09:37:00) [2]
Спасибо!
Ну и может быть тогда сразу спросить:
Какой?

Digitman (2005-11-08 09:35:00) [3]
сначала нужно установить соответствующий ConfigMode, и только послеэтого вызывать SaveConfigFile

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »