Поддержка / Donate
 

WebMoney

Яндекс.Деньги

SMS.Копилка
Деньги@Mail.ru
Rupay
E-gold
PayPal

 

Благодарю за поддержку!

Лента RSS - Новости сайта Новости сайта
Лента RSS - Новости форума Новости форума
Добавить в закладки и поделиться Bookmark and Share

 

Архив исходников

 


Automatic translation

 
English German French
Italian Spanish Portuguese
Greece Japan Chinese
  Korean  

  

 

  Форум  

Delphi FAQ - Часто задаваемые вопросы

| Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа |
| ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |



Google  
 

Псевдонимы

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


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;




Источник - Проект "Delphi World" © Выпуск 2002 - 2004
Автор проекта: Акулов Николай

|  Самые новые сериалы на dvd можно купить на сайте  |

   Rambler's Top100             Яндекс цитирования