SELAMAT DATANG MAHASISWA D3.IX SELAMAT BELAJAR KEMBANGKAN DAN ASAH KEMAMPUANMU DISINI.. DI STTAL..

Monday, March 4, 2013

Membuat Form loading pada Delphi 7

Satu lagi mas. cara bikin form loading gak susah kok asal sabar aja...gini ceritanya mula mula buka aplikasi delphinya dan ini Saya anggap anda sudah menginstal borland delphi pada PC/Laptop anda.
Berikut ini langkah-langkah untuk membuatnya:
1. Buka Delphi anda, kalau saya memakai borland delphi 7
2. Buat 2 buah form
    (1) form buat loading dengan nama "Form1"
    (2) form akhir "yang akan tampil setelah proses loading selesai" dengan nama "Form2"
3. Berikan komponen 'timer' pada "Form1", kemudian ubah value intervalnya pada menu properties menjadi "100"
    Jika ingin loadingnya lebih cepat, nominal value intervalnya diperkecil
4. Masih pada "Form1", tambahkan progress bar dengan nama "ProgressBar1"
5. Pada "Form2" tambahkan 'label', ganti namanya dengan 'Selamat Datang'
6. Klik dua kali pada timernya, kemudian masukkan kode berikut ini:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
ProgressBar1.Position:=ProgressBar1.Position+1;
if ProgressBar1.Position=100then
begin
Timer1.Enabled:=False;
Form1.Hide;
Form2.Show;
end;
end;

end.


7. Nah, sekarang anda bisa menjalankannya dengan pilih tombol "run" atau tekan "F9"




mana yang susah ...???? gampangkan


3 comments:

anggoroz world said...

itu form1 kemana?? meskipun form2 udah di tutup tapi nyatanya aplikasi masih running saja....

Unknown said...

yo cari sendirilah...

Unknown said...

Karena form1 mode hide

Post a Comment

 
Design by Free WordPress Themes | Bloggerized by Lasantha - Premium Blogger Themes | Lady Gaga, Salman Khan