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

Jaranguda

Belajar Mengajar

  • Home
  • Sponsor/Jasa
  • Tentang

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

  • Cara Menonaktifkan Pager di macOS
  • Cara Mengupdate Nama Apple silicon-as-a-Service Scaleway
  • Cara Force Delete Namespace di Kubernetes
  • Install PHP MariaDB di Mac Monterey
  • MacOS Minta Install Git

Komentar

  • Ari on Cara Mematikan SSID Molecool Balifiber
  • kiki anarki on Mengambil Data dari Situs BPJS Ketenagakerjaan dengan PHP cURL
  • musgan on Password Router Huawei HG8245H5 Indihome
  • ghabily on Mengambil Informasi Router Alcatel Lucent G-241W-A dengan PHP
  • nea on Mencari urutan angka yang hilang di PHP

Tulisan Populer

  • Password Router Huawei HG8245H5 Indihome 1.1m views
  • Password Terbaru ZTE F609 Indihome 784k views
  • Password Superadmin Huawei HG8245A 314.2k views
  • Cara Setting Manual Modem GPON ZTE F609 Indihome 272.2k views
  • Cara Setting Wireless ZTE F609 Indihome 256.1k views
  • Mengaktifkan Port LAN di Huawei HG8245 Indihome 169.1k views
  • Akses UseeTV Indihome via Wireless ZTE F609 156.5k views
  • Kemana Menghilangnya Saldo BCA 50 ribu 150.3k views
  • Cara Reset Password ZTE F609 Indihome 147.2k views
  • Cara Setting DHCP Server Modem/Router ZTE F609 112.9k views

Kategori

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

Sponsor

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