membuat form login di delphi

hehehe posting lagi ah.... sekarang saya akan posting tentang bagaimana caranya membuat form login di delphi. cukup sederhana sekali. yuk ikuti tutorialnya dibawah ini,,,,,

• buka delphi teman teman.....
• buat aplikasi baru
• kecilkan aplikasinya sesuai dengan kemauan

mulai.......

1. tambahkan 2 label dua button dan dua edit. lihat gambar di bawah
   
2. seperti contoh diatas ya!!!!
3. lalu tambahkan form baru. form barunya minimize dahulu
4. klik button login. dan isi kode ini di bawah begin

if (Edit1.Text='admin') and (Edit2.Text='password') then
begin
MessageBox(0,'Log In Sukses','information',MB_OK+MB_ICONINFORMATION);
Form1.Hide;
Form2.Show;
end
else
MessageBox(0,'Log In Gagal','error',MB_OK+MB_ICONERROR);

end;

• ganti user dan passwordnya sesuka hati
• lalu ke bagian atas. dan tambah unit2 pada uses. lihat gambar dibawah
  
• dan pada button cancel. klik 2kali lalu isi kode ini di bawah begin

application.terminate; 

selesai.... selamat berkreasi
saya mohon maaf apabila ada kesalahan kata atau penulisan. karena saya amatiran :D