Membuat Form Login Dengan Delphi

Form Login digunakan untuk memverifikasi user yang ingin menggunakan sebuah aplikasi. tentunya, aplikasi tersebut 
tidak diinginkan diakses oleh sembarang user. disinilah peran sebuah fasilitas login.
nah, pada tutorial kali ini, mari kita belajar membuat form login dengan Delphi.
1. Buat dua Buah Form. Form Pertama untuk Login dan Form Kedua untuk lanjutan jika login sukses. artinya, jika login sukses,
user akan diarahkan ke form 2

2. Desain Form Anda seperti ini :

Pada Edit2.teks, klik sekali lalu pada objek inspector gantilah passwordchar menjadi *.

Pada Tombol Batal tambahkan code : application.terminate;
pada tombol login, masukan kode ini :
var
user,pass : string;
begin
user:=Edit1.Text;
pass:=Edit2.Text;
if user='tauhid' then
begin
if pass='masuk' then
begin
form2.Show;
Form1.Visible:=false;
Form2.Label2.Caption:=user;
end
else
begin
ShowMessage('Username Atau Password salah!!');
end;
end
else
begin
ShowMessage('Username Atau Password salah!!');
end;
end;

3. Pada Form kedua, tambahkan dua buah Label, Label Pertama Ganti captionnya menjadi Selamat Datang dan Label 2 kosongkan captionnya

Nah, Hasil Punya Saya seperti ini :
Jika Username atau password salah

Jika username dan password benar user akan menuju form dua