Псевдонимы

Советы » Alias » Псевдонимы

Попробуйте следующий код:

var

theStrList: TStringList; GPath: String

; begin

theStrList := TStringList.Create; {Используем GetAliasParams для получения псевдонимов и ассоциированных с ними путей} Session.GetAliasParams(<Здесь псевдоним из выпадающего списка>,theStrList); {Удаляем первые шесть символов, которые всегда равны "PATH="} GPath := copy(theStrList[0],6,length(theStrList[0])) theStrList.Free; end;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com