Compago

...free knowledge

 
  • Increase font size
  • Default font size
  • Decrease font size
Home Manuali Programmazione Far partire un programma allo startup del sistema

Far partire un programma allo startup del sistema

E-mail Stampa PDF

Questo articolo indica uno dei tanti modi per far partire una applicazione allo startup del sistema.
La funzione proposta riceverà tre parametri:

  1. Il nome della applicazione
  2. La riga di comando necessaria per l'avvio della stessa applicazione
  3. Un valore booleano che indica se il programma deve essere avviato solo una volta o ad ogni avvio di sistema
procedure RunOnStartup(
sProgTitle,   sCmdLine: string;
bRunOnce: boolean );
var
 sKey : string;
  reg  : TRegIniFile;
begin
 if( bRunOnce )then
    sKey := 'Once'
 else
   sKey := '';
  reg := TRegIniFile.Create('');
 reg.RootKey := HKEY_LOCAL_MACHINE;   reg.WriteString('Software\\Microsoft\\Windows\\CurrentVersion\\Run'
+sKey+#0,sProgTitle,sCmdLine );
  reg.Free;
end;

Esempio di utilizzo:

RunOnStartup( 'Titolo programma','MyProg.exe',False );
Ultimo aggiornamento ( Sabato 31 Luglio 2010 10:26 )  
Loading

Login