Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Делфи _ програмное создание альяса

Автор: kr3v3tkus 28.10.2007 8:32

блин пардон не туда создал =/ модеры перекиньте плз

помогите с альясом, никак не могу понять как его создать... т.к. его нет, он появляется после компилирования, и если в програме его создать - пишет ошибку, если сначала удалить и сделать заного, то ошибки нет, но эксник потом не запускается, наверно альяс удаляется из системы...

Код

List:=TStringList.Create;
Session1.GetAliasNames(List);
memo1.Lines.Assign(List);
  for i:=1 to memo1.Lines.Count do if pos('diary_base',memo1.Lines[i])<>0 then
  begin
    Session1.DeleteAlias('diary_base');
    Session1.AddStandardAlias('diary_base',GetCurrentDir,'Paradox');
  end
  else Session1.AddStandardAlias('diary_base',GetCurrentDir,'Paradox');

зы не смотрите на каменты rolleyes.gif


Прикрепленные файлы
Прикрепленный файл  Diary.rar ( 16.86 килобайт ) Кол-во скачиваний: 193