AutoStart für Delphi-Programme über Systemregistrierung

[TOC]

Hi!

Ihr kennt sicher den Ordner "Start/Programme/Autostart" in den man seine selbstgeschriebenen Delphi-Programme ablegen kann um diese beim Start von Windows automatisch zu starten. Nungut, das funktioniert zwar, hat aber auch so seine Nachteile.

Es gibt nun aber auch die Möglichkeit ein AutoStart-Programm in die Systemregistrierung zu schreiben wie das professionelle Programme machen. Dies hat erhebliche Vorteile, da man seinem Programm so zum Beispiel auch beliebige Parameter beim Programmstart übergeben kann.

Im Anhang findest Du zwei kleine Delphi-Beispiel-Programme, eines für Delphi 3.0 und eines für Delphi 7.0. Über die CheckBox kannst Du ein/ausschalten ob das Beispiel-Programm beim Windows-Start, oder beim Anmelden eines neuen Benutzers, automatisch gestartet werden soll.

In der Unit "Global" findest Du die entsprechenden Funktionen:

// Erzeugt den Namen und den Pfad der Anwendung aus ParamStr(0)
Procedure GetProgramNameAndPath(Var ProgramName,ProgramPath:String);

// Systemregistrierungseintrag schreiben/löschen und somit AutoStart ein/ausschalten
Procedure SetAutoStart(Form:TForm; Flag:Boolean; Param:String);

// In der Systemregistrierung nachschauen ob AutoStart für diese Anwendung eingeschaltet ist
Function GetAutoStart(Form:TForm):Boolean;

Wenn Du nun aus Deinem Delphi-Programm ein AutoStart-Programm machen willst dann binde einfach die Unit "Global" in Dein Programm ein.

Grüsse von TOC !

[Luckie]

Oder guck in meinen Code.

[TOC]

Hi!

Zitat von Luckie:

Oder guck in meinen Code.

Dein Code ist echt genial ! Ach, so ist dass, bei D7 kann man im TRegistry.Create also in der überladenen Version den Zugriffsmodus angeben. Das wusste ich wirklich noch nit weil das in D3 noch nit geht. Danke für den Tipp!

Also, nun haben wir das Problem also schon einmal mit ner Klasse und einmal mit ner Unit gelöst. Ich schreib heut nacht vielleicht noch ne Komponente, falls ich mal wieder nicht schlafen kann (zuviel Kaffee ) und mir wieder langweilig ist...

Grüsse von TOC !