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

Оформил: DeeCo

 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.}