hi all
wie kann ich in der registry in runonce mein programm zu laufen kriegen?
woher weiss ich wo es liegt?
wie ich den schlüssel und so anlege weiss ich nur nicht wie ich feststellen kann in welchem verzeichnis meine exe liegt damit sie aufgerufen wird
thx für hilfe

Hallo,

Code :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31

uses Registry; procedure speichern_in_der_registry; var reg: TRegistry; begin   reg:=TRegistry.Create;   reg.Rootkey:=HKEY_LOCAL_MACHINE;   reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run', true); //bei true wird der Schlüssel erstellt, falls er noch nicht existiert   reg.WriteString('Programm_Name',Application.ExeName);   reg.free; end;   procedure lesen_aus_der_registry; var reg: TRegistry;     s  : string; begin   reg:=TRegistry.Create;   reg.Rootkey:=HKEY_LOCAL_MACHINE;   reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run', true);   s:= reg.ReadString('Programm_Name');   reg.free; end;   procedure loeschen_des_Eintrags; var reg: TRegistry; begin   reg := TRegistry.Create;   reg.RootKey := HKEY_LOCAL_MACHINE;   reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run',true);   reg.DeleteValue('Programm_Name');   Reg.Free; end;

also kriege ich mit Application.ExeName den standort meiner exe-datei raus?

ich werds mal so versuchen wenns nciht klappt schreib ichs nochmal

thx dafür

Hallo,

hab' i.M. kein Delphi installiert, aber Application.Exename dürfte richtig sein.

Viel Erfolg,

jo war richtig BIG THX dafür

----------
http://www.toplist4learner.de
---
BETA-Test:
http://www.piranho.com/home/boards/s...01ac32d5742557