Tutorial Delphi 7 :: Menjalankan Program Ketika Startup

"Aduh , kok lelet sekali start up-nya" Gerutu seorang teman suatu ketika .. Saya pun menghampirinya lalu melihat laptopnya yang masih terus "mikir" .. "Itu program start up nya kebanyakan " Timpal saya .. "Trus gimana dong ?" .. .. ..

"Hapus aja beberapa program start up nya" ..

Start up , mungkin suatu saat kita membutuhkan program yang kita buat untuk di jalankan ketika start up , bisa kah ?

Ya , kita pun bisa membuat program dengan delphi 7 dan menjalankannya pada saat start up ..

Begin ..

Ada beberapa cara agar program yang kita buat bisa dijalankan secara otomatis saat start up.

1.Folder start up

Anda tinggal membuat file short cut dari program anda dan meletakannya pada folder start up , sayangnya cara ini kurang seru menurut saya ..

2.File Win.INI

Untuk melakukannya , anda harus menuliskan path dari program anda pada bagian run / load ..

Cara ini juga kurang asik .

3.Registry

Anda diminta untuk menambahkan value pada key tertentu yang diisi dengan data string berupa path program.Cara ini baru oke :)

Ayo kita bikin ..

Tambahkan Registry pada klausa uses , lalu buatlah sebuah function sebagai berikut  setelah baris 

{$R *.dfm}

function LoadAtStart(AppName, AppComand : string): boolean;
var Reg : Tregistry;
begin
  Reg := TRegistry.Create;

  try
    Reg.RootKey := HKEY_CURRENT_USER;
    Reg.OpenKey('.\Software\Microsoft\Windows\CurrentVersion\RunOnce',true);
    Reg.WriteString('namaProgramAnda','pathProgramAnda');
    Reg.CloseKey;
    Result := true;
  finally
    Reg.Free;
    end;
end;

Lalu , anda tinggal memanggil fungsi tersebut dengan cara sebagai berikut ::

procedure TForm1.Button1click(Sender: TObject);
begin
   if LoadAtStart(ExtractFileName(Application.ExeName),Application.ExeName)
    then
      {perintah bila sukses}
    else
             {perintah bila gagal};
end;

Sangat mudah bukan ? Sekian tutorial kali ini , semoga bermanfaat .. Sampai jumpa pada tutorial selanjutnya ..

End. 

Oia , bila anda berminat untuk mempelajari delphi 7 dari tingkat dasar sampai mahir membuat aplikasi database sendiri.Silahkan kunjungi blog video tutorial saya DISINI.Tersedia video tutorial praktek selama 3 jam yang akan menuntun anda dengan mudah mempelajari pemrograman Delphi 7.

Simak Juga Tutorial Lainnya: