Minggu, 08 Februari 2015

Membuat Form Login Username dan Password Menggunakan Delphi7 dan Database Access

Form Login
Bertemu lagi dengan saya Een Pahlefi,  Kali ini saya akan menulis sebuah catatan kecil, dimana saya melewati sebuah proses mengerjakan laporan PKL semester7, dimana saya waktu itu membuat sistem informasi yang sebenarnya membuat puyeng kepala saya.

Disini saya menggunakan database microsoft access yang di buat menggunakan versi 2003-2007


1. Persiapkan dulu database dan tabel yang akan digunakan untuk menyimpan dan diakses oleh di delphi7.

Tabel Login













Disini saya membuat 2 buah field username dan password yang akan di tampung di tabel tblogin.

2. Disini saya tidak membahas cara mengkoneksikan/menghubungkan delphi7 ke database access, mungkin saya akan tulis di lain waktu. selanjutnya anda persiapkan form login yang akan diisikan user.











3. Selanjutnya kita isikan coding button Masuk.
Logika nya seperti ini.
A. Jika user tidak mengisikan inputan di username maka akan keluar pesan showmessage
B. Jika user tidak mengisikan inputan di password maka akan keluar pesan showmessage
C. Selanjutnya anda pahami sendiri ya..

Coding/Synax nya seperti berikut
procedure TForm3.BitBtn2Click(Sender: TObject);
  begin
  if Editusername.Text ='' then ShowMessage('Username Kosong')
  else if
  Editpassword.Text ='' then ShowMessage('Passowrd Kosong')

  else with DataModule1 do
  begin
  if (Editusername.Text=ADOTablelogin['username'])and
  (Editpassword.Text=ADOTablelogin['password'])then
  ShowMessage('Login Anda Berhasil') else
  showmessage('Password Anda Salah');
  end;
  end;
end.

Keteranga
with DataModule1 do = disini saya menggunakan datamodule yang digunakan didelphi7, jadi sesuaikan dengan keadaan code anda.

Penulis : Een Pahlefi
Semoga Bermanfaat

3 komentar:

  1. data module itu apaa??
    nama database atau bukan

    BalasHapus
  2. Source apa ini?!!!!

    Gak mutu !!!!!
    Kalo belum bisa coding gak usah nulis di blog deh....menyesatkan !!!!!!

    BalasHapus

Bank Saya

Pembayaran melalui Bank berikut :

Norek : 013 1 001384 5
An. Een Pahlefi

Norek BRI Rencana : 0623 01 000074-55-6
An. Een Pahlefi

Norek : 0623 01 015938 50 9
An. Een Pahlefi

Norek : 0623 01 015938 50 9
An. Een Pahlefi

Norek : 0623 01 015938 50 9
An. Een Pahlefi

Norek : 0623 01 015938 50 9
An. Een Pahlefi

Monitoring

Status Panel Admin
Jam Sekarang
Tanggal
Salam Sapa :
Status Admin :
User : User Online

Popular Posts