Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Name der Anwendung ermitteln (https://www.delphipraxis.net/14773-name-der-anwendung-ermitteln.html)

Alex_ITA01 15. Jan 2004 11:54


Name der Anwendung ermitteln
 
hallo erstmal
ich habe mal ne frage und zwar brauche ich in diesem source den namen der anwedung

Delphi-Quellcode:
 
  //Autostart eintragen
    Reg := TRegistry.Create;
    Reg.RootKey := HKEY_CURRENT_USER;
    Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', True);
    Reg.WriteString(NameDerAnwedung, ParamStr(0));
    Reg.Destroy;
    //Autostart eintragen
Wenn ich die Exe jetzt in Hallo.exe umbenenne , hat das einfluss auf den Source da oben oder reicht da Project1???
Mfg Alex

Luckie 15. Jan 2004 11:56

Re: Name der Anwendung ermitteln
 
ParamStr(0) enthält immer Pfad und Name der Anwendung - egal wie sie heißt.

Jens Schumann 15. Jan 2004 11:57

Re: Name der Anwendung ermitteln
 
Hallo,
der Name der Anwendung ist Application.Title.
Was Du mit dem zwweiten Teil Deiner Frage wissen möchtest habe ich nicht verstanden.

Sharky 15. Jan 2004 11:58

Re: Name der Anwendung ermitteln
 
Hai Alex,

ich verstehe die Frage nicht so ganz. Wenn Du in den Reg-Schlüssel z.B. HELLO.EXE einträgst und benennst dann die EXE um kann sie natürlich nicht gestartet werden.

Alex_ITA01 15. Jan 2004 11:59

Re: Name der Anwendung ermitteln
 
danke luckie , also ist es egal wie sie heißt
danke Jens auch gut zu wissen :-)
mfg alex

scp 15. Jan 2004 12:00

Re: Name der Anwendung ermitteln
 
Den Namen der Anwendung kannst du mit Application.Title ermitteln.
Allerdings hat das nicht mit dem Namen der EXE, also der Datei, zu tun. Dieser wird schon richtig mit ParamStr(0) ermittelt, dort ist der Ordner und der Name der Exe enthalten. Dies ändert sich auch, wenn du die EXE umbenennst.


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:31 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz