Delphi สามารถเพิ่มโปรแกรมลงในรายการเริ่มต้นโดยการสร้างค่าคีย์รายการเริ่มต้น ด้วยโค้ดตัวอย่างนี้ คุณสามารถเพิ่มโปรแกรมของคุณลงในการเริ่มต้นระบบอย่างรวดเร็ว เริ่มต้นด้วย Windows และรันโปรแกรมทันทีหลังจากบูตเครื่อง โค้ดตัวอย่างนั้นเรียบง่ายและส่วนใหญ่จะนำไปใช้โดยการเพิ่มค่าคีย์รีจิสทรี
รหัสฟังก์ชันเฉพาะมีดังนี้:
หน่วย dy97; อินเทอร์เฟซ Windows, ข้อความ, SysUtils, ตัวแปร, คลาส, กราฟิก, การควบคุม, แบบฟอร์ม, กล่องโต้ตอบ, รีจิสทรี, StdCtrls, ExtCtrls; พิมพ์ TForm1 = class (TForm) Label1: TLabel Image1: TImage; ขั้นตอน FormCreate (ผู้ส่ง: TObject) ; ส่วนตัว { ประกาศส่วนตัว } สาธารณะ { ประกาศสาธารณะ } ขั้นตอน zdyx(a,b: string;c: boolean); end;var Form1: TForm1;implementation{$R *.dfm}{ TForm1 }ขั้นตอน TForm1.zdyx(a, b: string; c: boolean);var d: string; e: TReginiFile; เริ่มต้นถ้า c แล้ว d := 'อีกครั้ง' อื่น d:= ''; TRegIniFile.Create(''); e.RootKey := HKEY_LOCAL_MACHINE; e.WriteString('ซอฟต์แวร์/microsoft/windows/currentversion/run'+d +#0,a,b); FormCreate(ผู้ส่ง: TObject);begin self.zdyx('ZDYX',application.ExeName,false);ปลาย;ปลาย