Mumpung libuur. . .aku sempetin buat belajar inii. 🙂
Buat teman-teman yang lagi asiiik membuat program khususnya yang berhubungan dengan Sistem Informasi Administrasi untuk sebuah instansi atau perusahaan dengan menggunakan soft Delphi 7 rasanya kurang lengkap kalau tidak ada halaman login. (itu menurutku siii).
Untuk keamanan data yang kita miliki dalam sistem, halaman login ini sangat penting untuk sebuah sistem Administrasi yang kita buat, karena SI sifatnya sangat rahasia. Halaman login yang aku buat ini berisi Nama Pemakai dan Password.
Buat teman-teman yang lagi belajar atau lagi nyari – nyari tutorial tentang pemrograman Delphi, mungkin postingan ini bisa bermanfaat buat kalian, ya meskipun hanya program sederhana.
Terlebih dahulu kita buka program yang sudah kita buat sebelumnya. Kalau mau buat baru juga boleh.
Sebagai contoh punyaku adalah SI LKP PIKOM. . .
untuk teman-teman yang mau buat baru dari awal juga boleh, silahkan telusuri langkah-langkahnya. . . 🙂
1. Buka aplikasi Delphi yang kamu gunakan yaitu delphi 7 dan buat lembar kerja baru dengan mengklik pada menu File | New |Form
2. Setelah muncul lembar kerja baru, pada formulir baru tersebut lakukan perubahan terhadap dua buah properties yang ada pada objek inspector berikut:
Properties Caption diisi dengan Login Admin
Properties Name diisi dengan FormAwal (tanpa spasi)
Lalu simpanlah dengan memilih File|Save dan berikan nama FAwal.
3. Setelah FAwal disimpan, selanjutnya kita menambahkan komponen. Kita perlu menambahkan lima buah komponen pada Form yaitu:
Dua buah komponen Label yang simbolnya pada tab standard ke dalam form baru kamu. Dan kemudian ubah nama label tersebut sesuai dengan keinginan kamu.
Untuk mengubah nama label tersebut, kita ubah pada properties caption kemudian ubah nama label tersebut. Contoh punyaku adalah Nama Pemakai dan Password.
4. Setelah label jadi letakkan dua buah komponen Edit yang simbolnya terletak pada tab yang sama dimana kamu mengambil label tadi, kemudian yang perlu kita atur pada properties yaitu properties name,text dan Password Char.
Punyaku untuk
Edit1
Name diganti dengan EdNama
Text dikosongkan
PasswordChar tetap dengan #0
Edit2
Name diganti dengan EdPass
Text dikosongkan
PasswordChar dirubah dengan *
5. Kemudian masih pada tab yang sama, yaitu pada tab standard tadi, letakkan 1 buah Button yang simbolnya di bawah Form Edit tadi dengan merubah properties name dan captionnya.
Punyaku dirubah dengan
Button1
Name dirubah BtnLogin
Caption dirubah &Login
Berikut contoh peletakan pada form Login :
6. Setelah form jadi, untuk melaksanakan pemeriksaan terhadap password, kamu perlu menambahkan kode pada kejadian OnClick milik tombol Login. Klik ganda pada tombol Login dan tambahkan kode seperti dibawah ini:
procedure TFormAwal.Button1Click(Sender: TObject);
begin if(EdNama.Text = 'idahceris') and (EdPass.Text = 'senyum') then FormMenu.ShowModal Application.MessageBox('Maaf anda tidak bisa Login. . .!!','Warning’,0); exit; end; end.
Kode diatas mengasumsikan bahwa nama pemakai adalah idahceris dan password-nya adalah senyum. Jika tidak terjadi kecocokan, kotak dialog yang berisi pesan “Maaf anda tidak bisa login” akan tampil.
7. sekarang coba kamu jalankan form yang sudah kamu buat tadi. . .good luck yah?
note :
FormMenu.Show Modal berfungsi jika password dan nama pemakai yang kamu inputkan benar,maka tampil Form selanjutnya yang menjadi form tujuan yaitu FormMenu. Silahkan anda rubah sesuai dengan nama form yang kamu buat.
nanti kalo ada tugas pake delphi tanya pada empunya deh 😀
hoooaaam. . .masih ngantuuk. . . 😀
belajar bareng ajja deh? 🙂
wahh….ternyata mahir delphi ya… 🙂
saya ada sesuatu nih buat mbak…..
http://asriltandjung.wordpress.com/2011/12/27/pr-blogger-part2/
waduuuh mas asriil. . .
gak mahiir cuma lagi belajar ini?
waaah,saya coba pelajari dulu yah? 🙂
Delphi ya. Hmmm,. Eh ia mba, bedanya sama VB apa ya?
Saya lagi mulai belajar serius VB, tapi liat Delphi jadi ketarik gini ya.. Heeheee 😀
hehehe. . .
emmm. . .prbedaanya y delphi buatan borland kalau vb buatan microsoft. 😀
maksud mas dian perbedaan dari segi appanya ya. ?
sebenarnya dua2nya bagus lhow mas? 🙂 tapi kalau idah lebih suka delphi karena:
1. Delphi lebih powerfull disegala bidang. 🙂
2. Delphi True Compiler, jadi kalau kamu buat program murni pake komponen2 delphi dijamin file Exe-nya gak perlu dipasang2 ke program instaler file Exe-nya tinggal copy paste ke komputer lain dijamin langsung jalan.
3. Sedangkan VB Bukan true compiler, jadi harus pake komponen2 activeX untukk bisa jalankan program Exe-nya? Tapi ya kelebihannya kalau VB lebih manusia bahasanya. 🙂
begitu mas dian?
piye? 🙂
hehehe konsepnya juga sama kalo pake database ya mbak… saya akan tampilkan dulu password di textbox dengan visible false
nah untuk textbox masukinpassword akan menyamakannya pada texbox password yang tampil saat kita memasukkan id
trus tinggal menyamakannya jika txtmasukipassword := txtpassword maka berhasil login
d(^o^)
mantep nich…. mbak idah
boleh juga kak ekoo. . . 🙂
databasenya biasanya pakai apa kamu kak? 🙂
wah bisa juga nih,mbak
tapi kalo usernya ada beberapa orang,gmana dong mbak caranya?
kalau user diatas itu di tujukan dan dibuat untuk keamanan data yang kita punya saja, jadi yang tau user dan password hanaya orang-orang tertentu yang punya wewenang. 🙂
kalau usernya banyak bisa saja, tapi akan lebih dinamis kalau memakai PHP, walaupun sebenarnya memakai delphiPun bisa. 🙂
usernya banyak berarti membutuhkan wadah dunk, database maksudnya. . . 🙂
Thanks infonya…
visit my blog ya….
trimakasih……
Pusing Uey teu jadi uae duka aby na teu bisaeun meurenannya tapi ok lah tutornya sangat membantu
mboten pareng pusing2 nggih kak, maturnuwun sampun mampir? 😆
kak, coding yang pake var ada kah?
adaa. . .
itu contohnya ada. . . 😆
ditunggu postingan selanjutnya ya? 😉
lagi puyeng nyari referensi, ternyata di blog ini jawabannya!!! terimakasih byk ya..
azwar
Direktur CV.Bumi Software Mataram
iya sama-sama.
semoga bermanfaat. . .
ass. mba tlg berikan conding untuk mencari jumlah total di dbgrid? trm kasih
hehehe. . .
nanti juga ada. . .
tunggu saatnya saja. 😀
pas di if(… nya error trus,,,,,,,
knpa ya??
apakah if yang bagian ini?
if(EdNama.Text = ‘idahceris’) and. . . .
kalau misal iya, itu untuk komponen Editnya harus dikasih nama dulu. . .diubah namanya mendjadi EdNama.
dicoba lagi saja. . . 😉
bagaimana menghubungkan form login ke form menu,, apakah form login dan form menu utama harus di kasih koding lg…………………..
tentu saja iyya. . .
ada penambahan koding sedikit dan pengaturan supaya sebelum login kita tidak bisa ke halaman atau form utama. . . 😉
coba sist ganti yang if nya,,
soalnya kalo pake if yang sist pake, nama pemakai adalah idahceris dan password-nya adalah senyum yg malah muncul “Maaf anda tidak bisa login”. 😀
hihihi. .
itu kan contooh form login punyakuuu. . .
mana punyamu? 😆
jadi tak isi ceris dengan pass swnyum. . . ^_*
Algoritma nya simpel sebenernya ya.
Yang lebih rumit itu kalo misalnya digabungin sama koneksi ke database, session, atau enkripsi paswwordnya misalnya, hehehe
Kalo saya gak pernah make Delphi, mba idah, makenya VB terus, hehe
begitulah ceritnya. . .
dengan ilmu yang masih simpel jadi algoritmanyapun ikut simpel. 😆
kalau mau belajar session atau enkripsi, silahkan ke ahlinya langsung. .
yaitu rachmadin.com. 😆
Mbak kaluw buat program deteksi wajah menggunakan delphi gimana yah???
lumayan codingnya mas. .
mungkin akan lebih mudah menggunakan matlab mas?
kan ikut citra digital?
kalau pakai md 5 gmn caranya? trus pakai edit 3?
================================================
harus pakai database mas tyo. . . 😉
install md 5 nya gmn ?
klo login trus masuk ke form yg dah da gm cara’a tlng kasih tau dok ka
============
sudah ada. . .
tapi belum sempat share. . . 😉
mav mba
ko saya ikutin coding anda,
padahal database sata sama dengan yg saya tulis d user name n password
tp knpp yg muncul psannya tidak bisa login
apakah anda mengisikan pass dan user sudah sama dengan apa yang anda buat dalam program?
thanks mantaf buat belajar delphi 😀
==========
Ok. . .sama-sama.
terimaksih sudah berkunjung. 😉
saya pertama belajar delphi nih…pas saya coba eror pas di FormMenu.show nya…jd bingung…
mas van sudah membuat form selanjutnya belum., . .
form untuk masuk, setelah login berhasil. . . 😉
:jempol: saja hehehhe , kangen sama aku nggak wakkakkaka
hiiiiiiiih. . .
orang lagi hiatus kayak orang nifas ni om. . . 😆
40 hari. 😀
kuangeeeeeeeen. . . 😉
wkakwakkwa emang sengaja di samakan 😀
thanks y buat contoh programx,,,l’ bz tlong d tmplin yg mkek mysql ug donk,,,,
===========
insyaAlloh mas. . .
kan beruntun beljarnya? 😉
makasih tutorialnya,
=======
terimakasih kembali sudah berkunjung. . . 😉
sudah saya sudah sama kan smua……
=========
kalau bisa add YM saya saja, supaya lebih cepat nanti komunikasinya. 😉
idah_ceris
klo d plajarin sungguh2 program delphi seru juga …….:D
=====================================
Betul sekali, mas tedy?
mari belajar Delphi? 🙂
Algoritmanya agak aneh tuh,,
Masa jika username dan password benar maka yang tampil ‘Maaf anda tidak bisa Login. . .!!
maaf mas. . .
mohon dibaca dengan seksama, kalau memang kurang teliti bisa saya ketik kembali disini untuk intinya.
jika tidak terjadi kecocokan, kotak dialog yang berisi pesan “Maaf anda tidak bisa login” akan tampil.
algoritma disini saya ambil dari Buku yang telah saya pelajari, Abul Kadir.
bagaimana cara mengkoneksikan database ms.office 2003 dg delphi7,,,,
======================================================
Ms Officenya ada pada Ms Accsess atau Ms Excel?
kalau passwordx itu di tulis dilistingx kya’ yang di atas khan berarti password itu paten trus kalau mau dirubah passwordx harus coodingx yang di rubah,,btul khan mba’?pertanyaan saya kalau saya mau rubah passwordx tapi saya tidak otak atik coodingx bgmn?
======================================================
Iya, benar sekali.
Untuk sementara ini saya baru mempelajari untuk password seperti diatas.
Password itu berguna untuk melindungi data yang kita miliki dalam suatu sistem.
Password yang tahu hanya orang2 tertentu saja.
Mba,, gimana carax ngilangin Form Login tadi ketika udah masuk d FormMenu??
=============================================
Jika sudah berhasil masuk ke FormMenu, maka FormLogin akan hilang dengan sendirinya mba. . .
Terimaksih. 🙂
bagaimana dengan c++, c++ menurutku lebih ahli…………..
Monggo dishare saja di blog.
Terimakasih sudah berkunjung. ^_*
KALAU YANG AHLI SAJA CANTIK DAN MANIS BOLEH LAH BELAJAR BARENG
Tapi sayang tidak cantik, tidak pula manis.
[…] memakai aplikasi Delphi selalu di bawah OS Win XP. Tapi karena kemarin ada teman yang ingin membuat program memakai delphi dan setelah di install di WIN 7 ternyata aplikasinya tidak bisa di […]
Application.MessageBox(‘Maaf anda tidak bisa Login. . .!!’,’Warning’,0);
koq yang ini eror gan?
Peringatan errornya seperti apa?
Bisa dijelaskan?
bgus
terimakasih. . 🙂
keren….. tq!!! yang saya perlukan adalah mengubah hit textnya menjadi * dan sudah terjawab….. oh kunjungan balik yah di Rahmatdi99
Terimakasih kembali sudah berkunjung. 🙂
Insya Alloh berkunjung balik. 🙂
Nice 😉
kunjungi balik ya 😀 http://guenchanz.wordpress.com/
Terimakasih, Insya Alloh. 😉
ak binggung FormMenu.ShowModalnya kk 😦
error2 trs
Peringatan error yang muncul seperti apa?
Bisa ditampilkan di sini tidak?
mbak bsa minta sourc code nya yg lengkap gk?
Itu yang saya tulis sudah lengkap koq, Mba. 🙂
mba aku ank MI dan aku pusying banget hadepin VB sm Delphi , baca blogmu sdikit ada pencerahan nih \m/
Semester berapa, Mba? 🙂
Terima Kasih sudah mampir ya? ^_*
kalau else error terus itu kenapa ya mba padahal cara ya sudah benar
Setelah Else di isi kode apa ya?
Karena saya tidak menggunakan Else di sini.
minta coding membuat ornamenlah dengan delphi 7
Dikirim email atau gimana, ya?
FormMenu.ShowModal dari mana asal nya
Itu perintah untuk menampilkan. . .
kalo login yang bertingkat punya ga artikelnya……………??
klo punya share donk…………………..
Belum mencoba. . .
ba, saya mau nanya kalo buat login tapi ada potonya gimana? atau buat program misalkan jual beli yang pake poto gimana caranya ya?
Saya sudah pernah mencoba, tapi belum saya share, Inysa Alloh saya share di sini. . .
hmm delphi aku masih basic banget. mohon pencerahannya.
Sama2 baru belajar ini, Pak. 🙂
Terima Kasihsudah berkunjung. . .
mbk klo buat tombol reset gimana mbk?? misalkan lupa pasword gitu??? qw bingung enaknya gimana ya?? qw pake koneksi ke database utk loginnya
Maaf, saya belum mulai praktik kembali menggunakan Delphi. 🙂
Insya Allah kalau ada waktu belajar lagi. 🙂
Terima Kasih sudah berkunjung. . .
membuat menu menu lain tidak aktif sebelum login gimana mba mhon bantuannya
Biasanya pada settingannya bernilai “false”. ..
cara membuat tunneling dengan delphi gimana?
Belum pernah mencoba, Pak. Maaf, ya. . .
maaf mbak mau tanya kalau koding buat menampilkan laporan khusus nota bgaimana yah, mohon bantuannya…?
ligon dengan mengatur hak akses bisa gak u di delphi sama bikin tree viewnya juga
kak, itu kan kalo loginnya salah keluar message peringatan
tapi kalo pas loginnya bener trus pingin di tampilin show messagenya bener .. tau ga codenya apa?
bisa contohkan mba cara bikin FormMenu.ModalAwal
soalnya saya benar2 masih dari 0 ^_^, dan ketika mencoba cara di atas terjadi error FormMenu.ModalAwal tersebut
wah tertarik sejak bisa internetan untuk belajar pemrograman.. kalau belajar pemrograman tanpa basic sekolah/belajar autodidak dr referensi blog n buku kira2 bisa nyambung gak yah? apa belajar pemrograman harus punya dasar sekolah dulu? mhn pendapatnya..
q coba projeknya kox ada yang eror..
bagian FormMenu.ShowModal
mbak, bagian FormMenu.ShowModal tu mksdny pa?
kok error trus dicoba..
pa msh ada komponen lain nya?
bagian Application.MessageBox(‘Maaf anda tidak bisa Login. . .!!’,’Warning’,0); jga eroor.itu mnggunkn komponen lagi?
mbak, saya buat login delphi pada edit saya masukkan password dan d propertisnya saya ubah menjadi ***
dlm form nya saya tambahkan checkbox untuk menunjukkan password nya tapi saya masih belum bisa. itu coding nya gimana ya?
terimakasih sangat membantu sekali
ass.
maaf mbk mau nanya tady saya sudah run ko malah sintak eror di “Application.MessageBox(‘Maaf anda tidak bisa Login. . .!!’,’Warning’,0);” ini penjelasaan erornya.
1.[Error] Unit1.pas(40): Missing operator or semicolon
2.[Error] Unit1.pas(40): Unterminated string
3.[Error] Unit1.pas(42): Incompatible types: ‘Integer’ and ‘procedure, untyped pointer or untyped parameter’
4.[Fatal Error] Project2.dpr(6): Could not compile used unit ‘Unit1.pas’.
mohon bantuannya…
Wa’alaikumsalaam. ..
1. Cek titik koma atau operator lainnya pada barisan tersebut,
2. Cek petik dua pada barisan tersebut,
3. Cek parameter,
4. Unit1.pas akan digunakan untuk apa? Sudah terisi belum?
mbak judul proposal apa yg bagus yah kalau pake sistem informasi
Horeee berhasil..
Terima Kasih ya Mba…..
min … cara membuat program SI keuangan tuh gmn sih … soalnya q baru belajar Delfhi7 sudah diberi tugas membuat program.
ketika sudah login terus masuk ke form2 ko messangBoxnya ikut muncul.. itu permasalahannya di mana ya,,
aslmkm mbak… ini saya mau tanya mbak… mungkin da yang bisa bantu… aku udah pake buat aplikasi pake delphi 7, terus aku cob ainstal di komputer lain aplikasinya dan databasenya udah saya copikan semua tapi kneapa tidak mau jaln ya? kalo tidak di instal program delphinya…
Mba,, Punya saya kok nyangkut di Application.MessageBox(‘Maaf anda tidak bisa Login. . .!!’,’Warning’,0);
padhal saya sudah ikuti persis punya mba..
Apa mungkin tanda petiknya, ya. Coba edit tanda petik atas, ya. Kadan kalau hanya copy saja kurang maksimal. Semoga bisa, ya.
ijin sedot. trus nek arep di kei elseif kepiye mbak bro?
kalo untuk membuat aplikasi deteksi wajah buat login pc menggunakan delphi kira kira cocok kagak ngan,,, terimakasih
Mba… Kok ngga bisa login yah…??? Kurangnya di mna mba’ soalnya sya cobain… Formnya ngga bisa jalan tuh…
mau tanya donk, kok eror di bagian Aplikasi.Mesageboxnya ya?
Thanks mbk idah,,,,
Tutornya bagus, mudah di mengerti.
Mau belajar buat biodata dengan delphi,,
Bisa di kirim tutornya ke
Email: 49manhajsabila@gmail.com
Kalau ada.
Thanks,,,,,,,,
deh,,di coba malah salah di listingnya,,,
mbak mau nnya
punya saya gk bisa login sllu error di codingnya di bagian “FormMenu.ShowModal”
kenapa yah mbak ,,bisa di jelasin
Ini langsung copy dari postinganku, atau ketik ulang?
Maaf ka, mau tanya siapa tau bisa bantu saya.
saya kesulitan dalam pembuatan program login, form login saya user dan pass nya pada koding saya kosongkan dan ada database nya yg saya sambungkan dengan ms.Access.
Ketika input username tanpa pass mau muncul warning, begitu juga sebaliknya. tapi ketika masukan user dan pass bersamaan tidak mau login tapi muncul warning yang seharusnya muncul apabila mengisi user tanpa pass.
Coba untuk tanda petik dua diketik ulang, ya. Jangan copy paste. Dicoba dulu.
thank artikelnya.
[…] Mumpung libuur. . .aku sempetin buat belajar inii. 🙂 Buat teman-teman yang lagi asiiik membuat program khususnya yang berhubungan dengan Sistem Informasi Administrasi untuk sebuah instansi atau perusahaan dengan menggunakan soft Delphi 7 rasanya kurang lengkap kalau tidak ada halaman login. (itu menurutku siii). Untuk keamanan data yang kita miliki dalam sistem, halaman login ini… https://idahceris.wordpress.com/2011/12/26/cara-membuat-form-login-dengan-delphi-7/ […]
[…] Mumpung libuur. . .aku sempetin buat belajar inii. 🙂 Buat teman-teman yang lagi asiiik membuat program khususnya yang berhubungan dengan Sistem Informasi Administrasi untuk sebuah instansi atau perusahaan dengan menggunakan soft Delphi 7 rasanya kurang lengkap kalau tidak ada halaman login. (itu menurutku siii). Untuk keamanan data yang kita miliki dalam sistem, halaman login ini… https://idahceris.wordpress.com/2011/12/26/cara-membuat-form-login-dengan-delphi-7/ […]
[…] Cara membuat form login dengan Delphi 7. Langkah Catatanku […]