AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

eigenen Programmpfad herausfinden?

Ein Thema von malo · begonnen am 23. Okt 2004 · letzter Beitrag vom 23. Okt 2004
Antwort Antwort
Benutzerbild von malo
malo

Registriert seit: 19. Sep 2004
2.115 Beiträge
 
#1

eigenen Programmpfad herausfinden?

  Alt 23. Okt 2004, 20:09
Wie kann mein Programm seinen eigenen Programmpfad herausfinden? Gibt's da irgendeine direkte Möglichkeit, oder geht das nur mit finfirst/findnext?
  Mit Zitat antworten Zitat
Benutzerbild von Nikolas
Nikolas

Registriert seit: 28. Jul 2003
1.528 Beiträge
 
Delphi 2005 Personal
 
#2

Re: eigenen Programmpfad herausfinden?

  Alt 23. Okt 2004, 20:11
Delphi-Referenz durchsuchenextractfilepath sollte da helfen
Erwarte das Beste und bereite dich auf das Schlimmste vor.
  Mit Zitat antworten Zitat
Dax
(Gast)

n/a Beiträge
 
#3

Re: eigenen Programmpfad herausfinden?

  Alt 23. Okt 2004, 20:13
Es gibt zwei Möglichkeiten, sind aber im Prinzip identisch:
Delphi-Quellcode:
MyPath1 := ExtractFilePath(Application.ExeName);

function _ExtractFilePath(Path: string; IncludeDelimiter: boolean = true): PChar;
var i: Integer;
begin
  for i := Length(Path) downto 1 do
    if Path[i] in ['\', '/'] then Break;
  Dec(i, Integer(not IncludeDelimiter));
  GetMem(Result, i);
  Move(Path[1], Result^, i);
end;

MyPath2 := _ExtractFilePath(ParamStr(0));
Letztere Version ist vor allem bei nonVCL-Programmen nützlich. (Hi Luckie )
  Mit Zitat antworten Zitat
omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: eigenen Programmpfad herausfinden?

  Alt 23. Okt 2004, 20:13
Moin,

ExtractFilePath(Application.Exename) das ist dann das Verzeichnis, indem deine ProgrammEXE liegt.

MfG
Thorsten
  Mit Zitat antworten Zitat
Alexander_370
(Gast)

n/a Beiträge
 
#5

Re: eigenen Programmpfad herausfinden?

  Alt 23. Okt 2004, 20:17
Hi malo

Das ist meine erste Antwort!
und ich hoff sie kann dir helfen:

So viel ich weiss gibt es da zwi möglichkeiten:
1.
Code:
Application.ExeName
2.
Code:
ParamStr(0)
In beiden Fällen wird der Pfad+Exename angegeben
(C:\Pfad\File.name)
aber mit
Code:
ExtractFilePath()
kannst du den pfad herausbekommen
(C:\Pfad\)
und mit:
Code:
ExtractFileDir()
Nur Pfad ohne /
(C:\Pfad)

Ich hoff des hatt dir weiter geholfen

Alex
  Mit Zitat antworten Zitat
Benutzerbild von malo
malo

Registriert seit: 19. Sep 2004
2.115 Beiträge
 
#6

Re: eigenen Programmpfad herausfinden?

  Alt 23. Okt 2004, 20:17
Ah, danke Leute, klappt wunderbar

edit: ääh, willkommen in der DP, @Alexander_370 :rolL:
  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 00:08 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