Thursday, May 6, 2010

Password di Delphi 7

Sebetulnya banyak cara utk buat password di delphi baik yang terkoneksi ke database maupun hanya sebatas di script aja. Dalam kesempata ini saya akan membuat password dengan delphi 7 dengan menggunakan inputbox.

Langkah2nya :
1. buat sebuah form (misal form1)
2. pilih event - onshow (2x click)
3. tulis script berikut :

procedure form1onshow( )
var a, b : string;
begin
a := inputbox('LOGIN','Masukkan nama login anda',' ');
if a = 'pakguru' then
b := inputbox('LOGIN','Masukkan password anda',' ');
if b = 'master' then
form1.caption:='Horeee... berhasil' // ganti dg aplikasi yang akan di jalankan
else
exit; // klu gagal program di tutup
end;

jalankan dengan menekan F9.

tulis yang di cetak tebal saja
selamat mencoba.

Mesin Pencari Web




MERAUP DOLLAR





Penggunaan blog merupakan fasilitas yang sangat penting pada era ini sebagai media untuk menyalurkan aspirasi minat bakat seseorang secara luas. Namun kurang memuaskan jika belum bisa menghasilkan dollar, artinya kita menggunakan blog sekaligus meraup dollar didalamnya.
Cara yang paling mudah adalah dengan clik disini
atau clik gambar di bawah ini





Your ID

Sign by Dealighted - Coupons and Deals

Sign by Dealighted - Coupons and Deals

Isi Daftar Hadir Dulu Ya.........


Free shoutbox @ ShoutMix