30 June 2011

Effand Nozh

Form Log in Dengan Delphi

Hari ini saya akan membagikan tutorial membuat form log in
Yaitu terdiri dari Username dan password
Dan ketika di klik log in maka anda akan diantar ke form selanjutnya yaitu yang utama . ….
Langsung anda buat form anda seperti ini

Setelah anda buat  form anda seperti diatas . . .. .
Maka klik 2X button submit anda
Kemudian masukan listing program dibawah ini

procedure TForm1.Button1Click(Sender: TObject);
begin
if (Edit1.text = '') and (edit2.text = '') then
Application.MessageBox('password benar', 'Information',
      MB_OK or MB_ICONINFORMATION)
else
Application.MessageBox('Pastikan password benar', 'Warning',
      MB_OK or MB_ICONERROR)
end;

*Listing source tombol reset
procedure TForm1.Button2Click(Sender: TObject);
begin
Edit1.Text := '';
Edit2.Text := '';
end;

Jika anda ingin membuat password nya dengan password anda
Atau nama anda tinggal anda edit di
if (Edit1.text = 'disini anda set nama') and (edit2.text = 'disini anda set password anda')

jika anda bingung silahkan tinggalkan coment anda ..
Selamat Berjuang Go n Keep Your Spirit . .









Effand Nozh

About Effand Nozh -

Author Description here.. Nulla sagittis convallis. Curabitur consequat. Quisque metus enim, venenatis fermentum, mollis in, porta et, nibh. Duis vulputate elit in elit. Mauris dictum libero id justo.

Subscribe to this Blog via Email :