AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Lokaler Pfad oder Netzwerk-Pfad - wie könnte man das ermitteln?
Thema durchsuchen
Ansicht
Themen-Optionen

Lokaler Pfad oder Netzwerk-Pfad - wie könnte man das ermitteln?

Ein Thema von Piro · begonnen am 7. Mai 2013 · letzter Beitrag vom 7. Mai 2013
Antwort Antwort
Benutzerbild von Piro
Piro

Registriert seit: 14. Jul 2003
Ort: Flintbek
810 Beiträge
 
Delphi XE2 Professional
 
#1

Lokaler Pfad oder Netzwerk-Pfad - wie könnte man das ermitteln?

  Alt 7. Mai 2013, 12:44
Schönen guten Tag zusammen,

ich möchte gerne das meine Anwendung immer lokal ausgeführt wird (soll heißen, immer auf einer lokalen Partition des Computers) und nicht im Netzwerk (Firmennetzwerk).

UNC Pfade beginnen ja immer mit "\\", die könnte ich abfragen und dann einen Hinweis ausgeben. Bloß wenn ein Benutzer, den Pfad als Netzlaufwerk verbunden hat, hat der Pfad einen Buchstaben und beginnt nicht mehr mit "\\".

Gibt es eine Methode, die mir einen Laufwerkstyp zurück gibt mit dem ich arbeiten könnte?

Vielen Dank im Voraus.

Sven
  Mit Zitat antworten Zitat
Benutzerbild von Piro
Piro

Registriert seit: 14. Jul 2003
Ort: Flintbek
810 Beiträge
 
Delphi XE2 Professional
 
#2

AW: Lokaler Pfad oder Netzwerk-Pfad - wie könnte man das ermitteln?

  Alt 7. Mai 2013, 12:48
Ich habe etwas brauchbares gefunden.
WMI unter Verwendung von Win32_LogicalDisk und da den Wert DriveType.

Gibt es auch eine Methode ohne WMI?

Schönen Tag noch.
Sven
  Mit Zitat antworten Zitat
Benutzerbild von sh17
sh17
Online

Registriert seit: 26. Okt 2005
Ort: Radebeul
1.664 Beiträge
 
Delphi 11 Alexandria
 
#3

AW: Lokaler Pfad oder Netzwerk-Pfad - wie könnte man das ermitteln?

  Alt 7. Mai 2013, 12:56
Ich nutze das

Delphi-Quellcode:
class function TLclFileUtils.IsNetworkFile(const _Filename: String): Boolean;
var
  Size: LongWord;
  Dummy: array[0..1023] of Byte;
begin
  Size := SizeOf(Dummy);
  Result := WNetGetUniversalName(PWideChar(_Filename), UNIVERSAL_NAME_INFO_LEVEL, @Dummy, Size) = NO_ERROR;
end;
Sven Harazim
--
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
 
Delphi 12 Athens
 
#4

AW: Lokaler Pfad oder Netzwerk-Pfad - wie könnte man das ermitteln?

  Alt 7. Mai 2013, 13:20
Ich hätte spontan GetDriveType genommen und auf DRIVE_REMOTE geprüft.
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#5

AW: Lokaler Pfad oder Netzwerk-Pfad - wie könnte man das ermitteln?

  Alt 7. Mai 2013, 14:48
Delphi-Quellcode:
Function IsNetFile(const fn:String):Boolean;
begin
  Result := ExpandUncFileName(fn) <> fn;
end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:27 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz