Autostart mit Delphi

[Filou]

Hallo, Mitchaak
hier findest du noch mal den Delphi-Code:

Delphi-Quellcode:

uses registry;
//...
procedure Autostart;
var
  reg  : TRegistry;
begin
  reg := tregistry.create;
  with reg do
  begin
    RootKey := HKEY_LOCAL_MACHINE;
    OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', true);
    WriteString('Programm-Name', paramstr(0));
    CloseKey;
    free;                 
  end;
end;

cu