Autor Beitrag
Bomania
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 139

Win XP

BeitragVerfasst: Sa 08.03.03 18:23 
Hallo,

wie kann man den Laufwerksbuchstaben ermitteln, auf dem sich gerade das auszuführende Programm befindet?

Gruß,
toms
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 1099
Erhaltene Danke: 2



BeitragVerfasst: Sa 08.03.03 18:35 
ExtractFileDrive gibt die Laufwerksangabe eines Dateinamens zurück.

Unit

Sysutils

Kategorie

[Dateizugriff]

function ExtractFileDrive(const FileName: string): string;

Beschreibung

ExtractFileDrive gibt einen String mit der Laufwerksangabe der mit FileName angegebenen Datei zurück. Bei Dateinamen mit Laufwerksbuchstaben hat der Rückgabewert das Format '<Laufwerk>'. Enthält der Dateiname einen UNC-Pfad, wird '\\<Servername>\<Freigabename>' zurückgegeben. Ist im angegebenen Pfad keine dieser Angaben vorhanden, wird ein leerer String zurückgegeben.


Beispiel:

ExtractFileDrive(ParamStr(0));
Popov
ontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic starofftopic star
Beiträge: 1655
Erhaltene Danke: 13

WinXP Prof.
Bei Kleinigkeiten D3Pro, bei größeren Sachen D6Pro oder D7
BeitragVerfasst: Sa 08.03.03 18:39 
ExtractFileDrive

ausblenden Quelltext
1:
ShowMessage( ExtractFileDrive(ParamStr(0)) );					

_________________
Popov
Bomania Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 139

Win XP

BeitragVerfasst: Sa 08.03.03 18:48 
Danke
DaRkFiRe
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 526

WinXP Home & Professional
C, C++, Delphi
BeitragVerfasst: Sa 08.03.03 21:52 
Es geht sogar noch einfacher: wenn man nur den Buchstaben (im Pfad IMMER das erste Zeichen), dann kann man auch

Application.Exename[1] oder Paramstr(0)[1] benutzen

_________________
Lang ist der Weg durch Lehren - kurz und wirksam durch Beispiele! Seneca