| Статистика |
|
Онлайн всего: 1 Гостей: 1 Пользователей: 0 |
|
Псевдонимы
Попробуйте следующий код:
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;
|
| Категория: Alias | Добавил: Skinner (04.07.2008)
|
| Просмотров: 453
| Рейтинг: 0.0/0 |
|
|
