• Skip to primary navigation
  • Skip to main content
  • Skip to primary sidebar

Jaranguda

Belajar Mengajar

  • Home
  • Sponsor/Jasa
  • Tentang
Home » Membuat Login dengan Delphi XE tanpa Database

Membuat Login dengan Delphi XE tanpa Database

Last Updated on 4 October 2012 By tommy Leave a Comment

Buat design form seperti gambar dibawah ini
delphiform1
komponen yang digunakan
2 TEdit, 2 TLabel dan 1 TButton. Property yang diubah
Label1 : Caption menjadi Username
Label2 : Caption menjadi Password
TButton : Caption menjadi Login

klik dua kali pada tombol login dan paste script dibawah ini

if (edit1.Text <> 'jaranguda') or (edit2.Text <> 'jaranguda.com') then
begin
  MessageDlg('Username atau Password yang anda masukkan kurang tepat', MTWarning, [MBOK], 0);
  Exit;
end;
showmessage('Selamat anda berhasil login');

lengkapnya

procedure TForm1.Button1Click(Sender: TObject);
begin
if (edit1.Text <> 'jaranguda') or (edit2.Text <> 'jaranguda.com') then
begin
  MessageDlg('Username atau Password yang anda masukkan kurang tepat', MTWarning, [MBOK], 0);
  Exit;
end;
showmessage('Selamat anda berhasil login');
end;
 
end.

Screenshoot :

delphiform1
password atau username salah
berhasil login
program dijalankan

untuk menjalankan program tekan F9

Tulisan menarik lainnya

  • Membuat Program Launcher dengan Delphi XE

    Setelah di tulisan sebelumnya https://jaranguda.com/membuat-program-launcher-dengan-gambas/ kita menggunakan Gambas, maka sekarang kita akan mencoba membuat aplikasi…

  • Membuat Program Aritmatika dengan Delphi XE

    Program yang akan kita buat disini adalah aritmatika (tambah, kurang, kali dan bagi) dan source…

  • Membuat Script Login dengan PHP dan MySQL

    Update 13 Feb 2014 PHP + MySQLi bisa dilihat di Membuat Script Login Sederhana dengan…

  • Menghitung Usia/Umur dengan Delphi

    Buat design aplikasinya seperti gambar dibawah ini 2 buah TLabel 1 buah TButton 1 buah…

Filed Under: Delphi Tagged With: form login

Reader Interactions

Leave a Reply Cancel reply

Your email address will not be published. Required fields are marked *

Primary Sidebar

Pencarian

Tanya Jawab tentang DevOps SRE CPE, gabung di https://t.me/devopsindonesia

Terbaru

  • Solusi Playwright Firefox version `GLIBCXX_3.4.30′ not found (required by /lib64/libicuuc.so.69)
  • Cara Upgrade Fedora 35 ke Fedora 36
  • Ekstrak Gzip File dan Ambil Total dengan Python
  • Cara Menggunakan filter dengan Fluentd
  • Cara Membuat Public dan Private Key SSH untuk Login Server

Komentar

  • one on Solusi Error EFAKTUR ETAXSERVICE-20017 Client Tidak Terdaftar
  • Rafik on Password Terbaru ZTE F609 Indihome
  • Akbar Alfayiz on Password Terbaru ZTE F609 Indihome
  • Achmad mujaeni on Kemana Menghilangnya Saldo BCA 50 ribu
  • tommy on Cara Mengatasi SSH Error REMOTE HOST IDENTIFICATION HAS CHANGED

Tulisan Populer

  • Password Router Huawei HG8245H5 Indihome 1m views
  • Password Terbaru ZTE F609 Indihome 780.9k views
  • Password Superadmin Huawei HG8245A 290k views
  • Cara Setting Manual Modem GPON ZTE F609 Indihome 266.8k views
  • Cara Setting Wireless ZTE F609 Indihome 249.8k views
  • Mengaktifkan Port LAN di Huawei HG8245 Indihome 164.6k views
  • Akses UseeTV Indihome via Wireless ZTE F609 154.5k views
  • Cara Reset Password ZTE F609 Indihome 145.7k views
  • Kemana Menghilangnya Saldo BCA 50 ribu 132k views
  • Cara Setting DHCP Server Modem/Router ZTE F609 108.3k views

Kategori

  • Delphi
  • dll
  • Gambas
  • Internet
  • Java
  • Lazarus
  • Linux
  • PHP
  • Review
  • Teknologi

Sponsor

kadal.id
Untuk jadi sponsor, hubungi kita lewat halaman sponsor
© 2021. Jaranguda
  • Linux
  • PHP
  • Internet
  • Teknologi
  • Delphi
  • Gambas
  • Java