Delphi World - Получить сетевой путь к зашаренному файлу по локальному пути

Delphi World - это проект, являющийся сборником статей и малодокументированных возможностей по программированию в среде Delphi. Здесь вы найдёте работы по следующим категориям: delphi, delfi, borland, bds, дельфи, делфи, дэльфи, дэлфи, programming, example, программирование, исходные коды, code, исходники, source, sources, сорцы, сорсы, soft, programs, программы, and, how, delphiworld, базы данных, графика, игры, интернет, сети, компоненты, классы, мультимедиа, ос, железо, программа, интерфейс, рабочий стол, синтаксис, технологии, файловая система...

Получить сетевой путь к зашаренному файлу по локальному пути

Оформил: DeeCo
Автор: http://www.swissdelphicenter.ch


 ExpandUNCFileName returns the full path of the FileName
 with the network drive portion in UNC format.
 The pathname in the UNC-Format has the format:
 \\Servername\sharename

 ExpandUNCFileName gibt einen String mit dem vollstandigen
 Pfadnamen der in FileName ubergebenen Datei zuruck.
 Ein vollstandig qualifizierter Pfadname besteht aus der
 Laufwerkskomponente des Dateinamens im UNC-Format:
 \\Servername\sharename


 // Example, Beispiel: 

Label1.Caption := ExpandUNCFileName('K:\sharename.tmp'));

 {where "K" is a Network Drive.}