Membuat loading sederhana pada delphi dibutuhkan beberapa komponen yaitu progressbar dan timer. progressbar digunakan untuk menampilkan proses loading. Sedangkan timer digunakan untuk membuat pewaktu pada progressbar.
Semoga Bermanfaat.
Sumber Terkait:
http://fajar-el-ridikc.blogspot.com/2014/07/delphi7-delphi-membuat-loading-progress.html#.VlqBovkrLIU
https://catataneko.wordpress.com/2012/02/02/delphi-membuat-loading-progress/
- Buatlah desain form seperti dibawah ini.
- Tahap selanjutnya adalah double klik pada komponen timer1 dan tuliskan program dibawah ini
- Tahap terakhir adalah klik run atau jalankan maka hasil akan tampak seperti dibawah ini.
dengan format desain seperti dibawah ini.
| Komponen | Properties | Input Value |
|---|---|---|
| form | caption font position |
Membuat Loading 8 pt poDesktopCenter |
| label1 | caption font |
Loading... 30 pt |
| timer1 | enabled interval |
True 1000 |
| progressbar1 | smooth max |
True 10 |
if progressbar1.Position=10 then
begin
timer1.Enabled:=false;
ShowMessage('Selamat Datang');
end
else
begin
progressbar1.Position:=progressbar1.Position+1;
end;
Sumber Terkait:
http://fajar-el-ridikc.blogspot.com/2014/07/delphi7-delphi-membuat-loading-progress.html#.VlqBovkrLIU
https://catataneko.wordpress.com/2012/02/02/delphi-membuat-loading-progress/



