Thursday, March 06, 2014

Tutorial Membuat Splash Screen Pada Aplikasi Delphi

Tags

Cara Membuat Splash Screen, Dalam setiap membuat sebuah aplikasi khususnya dengan menggunakan bahasa pemrograman delphi pastinya anda ingin menampilkan sebuah form untuk mengawali program aplikasi tersebut. Seperti Selamat datang, gambar progress bar yang sedang berjalan dan setelah itu sebuah menu utama terbuka.

Dengan memberikan sebuah splash screen atau selamat datang pada sebuah aplikasi anda dapat memberikan beberapa komponen agar nantinya pada saat menu utama telah terbuka dalam aplikasi yang telah dibuat, seorang user tanpa harus menunggu aplikasi tersebut sedang melakukan Koneksi ke database MySQL atau database seperti firebird, portgresql dan database lainya. Dengan menambahkanya ke form splash screen tersebut.


Pada kesempatan kali ini saya akan membagi Tutorial Membuat Splash Screen Pada Aplikasi Delphi yang pernah saya terapkan pada program aplikasi sederhana yang pernah kami buat.

Cara Membuat Splash Screen Delphi 7


1. Buka program Delphi
2. Buat sebuah project baru atau buat sebuah form baru jika anda sebelumnya telah membuat aplikasi dan ingin ada terapkan.
3. Buat sebuah label dan Timer letakkan pada Form 2
Gambar Splash Screen Delphi 1

4. Klik Label dan Pada object inspector pilih propertis > caption > ganti dengan nama Selamat Datang (Form 2)
Gambar object inspector delphi

5. Klik pada menu View > klik view source
gambar menu view delphi

6. Hapus kode seperti dibawah ini yang ada pada source code project tersebut atau beri tanda " // " disetiap kode tersebut untuk mengatasi jika kode splash screen mengalami error dan akn dikembalikan seperti semula.
Application.Initialize;
Application.Title := 'Project1';
Application.CreateForm(TForm1, Form1);
Application.Run;

7. Ganti kode / source code pada nomor 6 dengan kode dibawah ini
Form2 := TForm2.Create(Application);
Form2.Show;
Form2.Update;
while Form2.Timer1.Enabled do   // running splash
Application.ProcessMessages;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Form2.Hide;
Form2.Free;
Application.Run; 
8. Simpan project dan RUN

* Jika pada saat di jalankan / RUN masih error periksa kembali source code pada nomor 7.  

Sekian mengenai cara membuat form selamat datang di aplikasi delphi, semoga membantu anda semua.

Silahkan berkomentar dengan baik, asal tidak melanggar peraturan dibawah ini.
1. NO SPAM
2. NO SARA
3. NO LINK AKTIVE

Terimakasih
EmoticonEmoticon