Delphi – Membuat Loading Progress
- Pertama tama Buat Design Form Seperti Dibawah ini, Sebagaimana yang sudah dikatakan tadi akan ada 2 form yang dibuat yakni form_loading dan form_menu.
- Ubah Properties namenya sebagai Berikut :
Berikut Alur Program Logikanya :
- Pada Saat Form Loading Berjalan nanti Progress Bar akan berjalan sampai penuh.
- Saat Progress Bar Penuh Maka Form Loading Akan Hide Dan memunculkan Form Menu Utama.
- Pada Saat Button Keluar di Klik Pada Menu Utama akan mengeluarkan form Menu Utama dan Juga Form Loading nya, yang sebelumnya di Hide.
_______________________________________________________________________________________________
Berikut ini List Programnya :
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| procedure Tfrm_loading.Timer1Timer(Sender: TObject); begin if progressbar1.Position=100 then begin frm_menu_utama.Show; frm_loading.Hide; timer1.Enabled:=false; end else begin progressbar1.Position:=progressbar1.Position+5; end; end; |
Pada Saat Form Create
Maka Progress bar berjalan sesuai dengan interval yang sudah di setting
pada timer. Dan Jika sudah sampai pada batas akhir progress maka timer disable agar tidak melakukan / menjalankan code kembali. kemudian menyembunyikan form loading dan menampilkan form menu utama.
1
2
3
4
5
6
7
| procedure Tfrm_menu_utama.Button1Click(Sender: TObject); begin frm_loading.close; frm_menu_utama.Close; end; |
Jika button Keluar di Klik maka, kita settting keluar dulu form loading baru form menu utama karena form loading sebelumnya hanya kita sembunyikan tidak kita close. Nah Selesailah Materi kita kali ini.
Berikut Tampilah hasil Aplikasinya :
Nah mudah bukan, Pastinya dunk Karena itu Belajar delphi itu menyenangkan *hehehehe karena sudah selesai akhirnya bisa sarapan pagi juga /(^.^”)
ehhh tapi tunggu dulu. mau kasih tips juga untuk temen temen yang mau
copy paste code program di atas bisa klik icon yang ada pada source
codenya – perhatikan gambar dibawah ini.
Setelah dikilk nanti akan mencul note
dari web browser temen temen yang bisa temen temen lakukan untuk
pengcopyan source codenya.klik disini
Tidak ada komentar:
Posting Komentar