Yaitu terdiri dari Username dan password
Dan ketika di klik log in maka anda akan diantar ke form selanjutnya yaitu yang utama . ….
Langsung anda buat form anda seperti ini
Setelah anda buat form anda seperti diatas . . .. .
Maka klik 2X button submit anda
Kemudian masukan listing program dibawah ini
procedure TForm1.Button1Click(Sender: TObject);
begin
if (Edit1.text = '') and (edit2.text = '') then
Application.MessageBox('password benar', 'Information',
MB_OK or MB_ICONINFORMATION)
else
Application.MessageBox('Pastikan password benar', 'Warning',
MB_OK or MB_ICONERROR)
end;
*Listing source tombol reset
procedure TForm1.Button2Click(Sender: TObject);
begin
Edit1.Text := '';
Edit2.Text := '';
end;
Jika anda ingin membuat password nya dengan password anda
Atau nama anda tinggal anda edit di
if (Edit1.text = 'disini anda set nama') and (edit2.text = 'disini anda set password anda')
jika anda bingung silahkan tinggalkan coment anda ..
Selamat Berjuang Go n Keep Your Spirit . .