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

Delphi , Интернет и Сети , Сеть

Оформил: 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.}

Программный код на Delphi использует функцию ExpandUNCFileName для преобразования локального пути к файлу в формат UNC (Universal Naming Convention), который полезен для доступа к сетевым ресурсам.

Функция принимает имя файла как параметр и возвращает полный путь к файлу с частью сети в формате UNC. Например, если передать K:\sharename.tmp как входной параметр, функция вернет \\Servername\sharename.tmp, где Servername - это фактический серверный имя сетевого ресурса.

Вот шаги, которые выполняются в коде:

1. Функция ExpandUNCFileName вызывается с аргументом K:\sharename.tmp.
2. Функция преобразует локальный путь к файлу в формат UNC, включая имя сервера и имя ресурса.
3. Полученный UNC-путь возвращается как строка.

В примере кода результат функции ExpandUNCFileName присваивается свойству Caption контрола метки (Label1.Caption). Это означает, что метка будет отображать путь UNC файла вместо локального пути.

Вот альтернативное решение с использованием встроенной функции Delphi NormalizePath:

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

Функция NormalizePath выполняет схожее преобразование, как и ExpandUNCFileName, но также обрабатывает дополнительные задачи нормализации, такие как конвертацию обратных слешей в прямые и удаление ненужных символов. Однако она может не всегда производить тот же результат, что и ExpandUNCFileName.

Функция ExpandUNCFileName возвращает полный путь к файлу с зашареной сетевой частью в формате UNC, например, \Servername\sharename.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Сеть ::