Programm in Autostart-Ordner

[Tubos]

Ich schätze mal, du meinst den Autostart-Ordner im Startmenü.
Da musst du zuerst die Umgebungsvariable %userprofile% ermitteln:

Delphi-Quellcode:

function profilpfad: string;
var res: string;
begin
 if GetEnvironmentVariable(pchar('userprofile'), buf, SizeOf(buf)) <> 0 then
      res := buf
    else
      res := 'fehler';
Result:=res;
end;

Wenn du jetzt z.B. das Programm c:\programme\auto.exe in den Autostart-Ordner kopieren willst:
copyfile(pchar('c:\programme\auto.exe'),pchar(profilpfad+'\Startmenü\Programme\Autostart\auto.exe'),false);