Hallo, ich hab folgenden Code um meine Freeware in den Autostart der Registry einzutragen:
Delphi-Quellcode:
procedure TForm1.Autostartein1Click(Sender: TObject);
begin
// Anwendung in die Registry aufnehmen...
DoAppToRun('Programm', ExtractFilePath(ParamStr(0)) + 'MyProgramm.exe');
Autostartaus1.Checked:=False;
Autostartein1.Checked:=True;
end;
Wie kann ich diesen ändern, dass der Name der exe-Datei automatisch ermittelt und in die Registry eingetragen wird. Denn mit meinem Code darf der Nutzer den Namen der exe-Datei nicht ändern, sonst funktioniert dann das ganze nicht.