O Delphi pode adicionar programas aos itens de inicialização criando um valor-chave de item de inicialização. Através deste código de exemplo, você pode adicionar seu programa à inicialização rápida, iniciá-lo com o Windows e executar o programa imediatamente após a inicialização. O código de exemplo é simples e é implementado principalmente pela adição de valores de chave de registro.
O código de função específico é o seguinte:
unit dy97;interfacea Windows, Mensagens, SysUtils, Variantes, Classes, Gráficos, Controles, Formulários, Diálogos,registro, StdCtrls, ExtCtrls;tipo TForm1 = class(TForm) Label1: TLabel Imagem1: TImage procedimento FormCreate(Sender: TObject) ; private {declarações privadas} public {declarações públicas} procedimento zdyx(a,b: string;c: boolean);end;var Form1: TForm1;implementação{$R *.dfm}{ TForm1 }procedimento TForm1.zdyx(a, b: string; c: boolean);var d: string; e: TReginiFile;começar se c então d := 'uma vez' senão d:= ''; TRegIniFile.Create(''); e.RootKey := HKEY_LOCAL_MACHINE; e.WriteString('software/microsoft/windows/currentversion/run'+d +#0,a,b); FormCreate(Sender: TObject);begin self.zdyx('ZDYX',application.ExeName,false);fim;fim.