Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Konzeptfrage Autostart (https://www.delphipraxis.net/116244-konzeptfrage-autostart.html)

WIng2005 25. Jun 2008 15:17


Konzeptfrage Autostart
 
Hallo Gemeinde,

ich möchte ein kleines Programm schreiben, welches einmalig ausgeführt werden soll und einen
Eintrag in der Registrierung anlegt. Dies soll bewirken, dass eine 2. Datei von einem
Netzwerkordner bei jedem Start ausgeführt wird.
Dein Beitrag: Autostart habe ich mir durchgelesen und auch umgesetzt.

Delphi-Quellcode:
var
  Reg: TRegistry;
  pfad:string;
begin
  pfad:='\\Rechner1\software\test.txt';
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', True);
    Reg.WriteString(pfad, ParamStr(0));
    Reg.CloseKey;
  finally
    Reg.Free;
  end;
Nun habe ich jedoch das Problem, dass nicht die angegebene Textdatei, sondern mein Programm selbst beim Neustart aufgerufen wird. Hab ich nen Denkfehler, oder was läuft hier falsch?

Vielen Dank für eure Hilfe,
MFG
Steffen

mkinzler 25. Jun 2008 15:24

Re: Konzeptfrage Autostart
 
Der erste Parameter ist ja der Namen des wertes und der 2 der Wert

Fussball-Robby 25. Jun 2008 15:25

Re: Konzeptfrage Autostart
 
Delphi-Quellcode:
Reg.WriteString('Hier kannst du hinschreiben, was du willst, ist nur der Name ;-)', pfad);
Du hattest ParamStr(0) eingetragen, was ja der Name der eigenen Exe ist.

WIng2005 25. Jun 2008 16:27

Re: Konzeptfrage Autostart
 
mmmh.... dumm, werde es morgen mal ändern. Vielen dank!!

MFG
Steffen


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:20 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