Praktikum Pemrograman 1
Mengenal Delphi I. Pendahuluan Delphi muncul dari bahasa pemograman yang cukup populer yaitu Pascal. Sejak saat itu, mulai dirilis beberapa versi Pascal diantaranya Turbo Pascal yang dirilis oleh Borland International pada tahun 1983. Turbo Pascal versi pertama hanya dapat dijalankan pada lingkungan sistem operasi DOS. Latar belakang munculnya Delphi adalah mengembangkan bahasa Pascal yang yang bersifat visual. Hal ini dikarenakan pemrograman Windows dengan Turbo Pascal dirasa cukup sulit. Hasil dari pengembangan tersebut adalah dirilisnya Delphi 1 pada tahun 1995. Delphi dan bahasa pemrograman visual lainnya merupakan bahasa pemrograman yang menerapkan konsep pemrograman event driven. Pada pemrograman event driven sebuah aplikasi bekerja berdasarkan kejadian (event) tertentu, kejadian ini dapat berupa masukan dari aplikasi, user, atau peralatan lain seperti printer, clock, dan lain-lain. II. Mengenal IDE Delphi Layaknya software visual lainnya (visual basic), Delphi juga memiliki IDE (Integrated
Development
Environment)
atau
lingkungan
pengembangan
tersendiri. Melalui IDE, dapat dilakukan desain form, penulisan kode program maupun melakukan pembaharuan aplikasi. IDE Delphi dapat dibagi menjadi tujuh bagian, yaitu : 1. Menu : Memiliki kegunaan seperti halnya pada aplikasi windows lainnya. Segala sesuatu yang berhubungan dengan IDE Delphi dapat dilakukan melalui menu. 2. Speed Bar : Sering disebut toolbar, berisi kumpulan tombol pada menu yang sering digunakan (shortcut). 3. Component Palette : Berisi kumpulan ikon komponen-komponen VCL (Visual Component Library) dan komponen-komponen non VCL. Komponen merupakan pustaka (library) yang digunakan untuk membangun aplikasi. 4. Form Designer : Merupakan tempat perancangan GUI atau jendela aplikasi.
5. Code Explorer : Berfungsi untuk menuliskan kode program. Kode program yang dituliskan dalam bentuk pernyataan-pernyataan bahasa Object Pascal. 6. Object Tree View : Berisi daftar komponen yang ditambahkan atau diletakkan pada suatu form aplikasi. 7. Object Inspector : Digunakan untuk mengatur properti dan metode sebuah komponen. Jendela Utama
Component Palette Page
Jendela Form Designer
Jendela Object Inspector
Jendela Code Explorer
Gambar 1. IDE Delphi III. Petunjuk Praktikum Contoh 1 1. Buat directory / folder baru dengan nama : nama_nim. 2. Jalankan aplikasi delphi 7 melalui Start + All Programs + Borland Delphi 7 + Delphi 7.
3. Untuk membuat sebuah aplikasi, pertama-tama harus diciptakan sebuah proyek baru dengan cara : Pilih Menu + File + New Application. 4. Maka pada layar akan terlihat sebuah form kosong. Pada contoh pertama ini, anda belum akan mengubah properti maupun menangani kejadian (event) apapun.
5. Untuk menyimpan proyek aplikasi anda, pilih menu File + Save All. Arahkan penyimpanan pada directory atau folder yang telah anda buat. Selanjutnya Delphi akan menampilkan kotak dialog yang meminta anda memasukkan nama form dan unit (kode program aplikasi), isikan dengan main.pas. Kemudian anda diminta mengisikan nama proyek, isikan dengan proj1.dpr.
Gambar 2. menyimpan unit
Gambar 3. Menyimapn Proyek 6. Setelah menyimpan proyek, pada harddisk akan terbentuk beberapa file, yaitu : a. proj1.dpr : berisi program utama dari aplikasi yang dibuat. b. Main.pas : berisi kode program. c. Main.dfm : berisi daftar komponen yang diletakkan pada form beserta properti-propertinya. d. Proj1.dof dan Proj1.cfg : yaitu file konfigurasi proyek aplikasi yang dibuat. 7. Untuk menjalankan program dilakukan melalui menu Run + Run atau menekan tombol “F9”. Contoh 2 1. Buat aplikasi baru, dan beri nama proyeknya dengan proj2.dpr dan main,pas.
2. Tambahkan tombol pada form component, melalui component pallete + standard + button. Maka pada form anda mempunyai sebuah tombol dengan teks “button1”. Ubah teks menjadi “tombol 1” melalui object inspector “button1” + Properties , dan ubah teks pada “Caption” menjadi “tombol 1”.
Gambar 4. Merubah Caption Komponen Button 3. Tambahkan tombol pada form component, melalui component pallete + standard + button. Maka pada form anda mempunyai sebuah tombol dengan teks “button2”. Ubah teks menjadi “tombol 2” melalui object inspector “button2” + Properties , dan ubah teks pada “Caption” menjadi “tombol 2”. 4. Tambahkan tombol pada form component, melalui component pallete + standard + button. Maka pada form anda mempunyai sebuah tombol dengan teks “button3”. Ubah teks menjadi “tombol 3” melalui object inspector “button3” + Properties , dan ubah teks pada “Caption” menjadi “tombol 3”. 5. Tambahkan kotak edit pada form component, melalui component pallete + standard + edit. Maka pada form anda mempunyai sebuah kotak edit dengan teks “edit1”. Kosongkan teks pada “edit1” melalui object inspector “edit1” + Properties , dan hapus isi properti “text”.
Gambar 5. Merubah teks komponen edit 6. Aturlan peletakan komponen-komponen tersebut sehingga form terlihat seperti berikut :
Gambar 6. Rancangan Form Aplikasi 1 7. Klik ganda pada button1, maka akan muncul jendela code explorer untuk “event on click” button 1.
8. Tuliskan kode program berikut di antara “begin” dan “end;” Edit1.Text:='Tombol 1 Di Klik........Terimakasih'; 9. Lakukan hal yang sama untuk button2. 10. Tuliskan kode program berikut di antara “begin” dan “end;” untuk button3 Application.MessageBox('Halo, Tombol 3 Baru Saja Diklik', 'Informasi', MB_OK or MB_ICONEXCLAMATION); 11. Jalankan aplikasi dan amati perbedaan hasil yang diperoleh setelah mengklik tombol1, tombol2 dan tombol3. IV. Tugas Praktikum 1. Buatlah Aplikasi untuk menghitung total pembayaran suatu pembelian dengan menambahkan pajak 10 % dari total pembelian. 2. Rancanglah form aplikasi anda seperti berikut :
3. Komponen-komponen yang digunakan Komponen Properti Isi Label1 Caption Total Pembelian Label2 Caption Pajak 10 % Label3 Caption Total Pembayaran Edit1 Text {kosong} Edit2 Text {kosong} Edit3 Text {kosong} Button1 Caption Hitung 4. Tuliskan kode berikut pada event “onclick” tombol “hitung” : procedure TForm1.Button1Click(Sender: TObject); var TotalPembelian : Currency; begin ThousandSeparator:='.'; TotalPembelian:=StrToCurr(Edit1.Text); Edit2.Text:=CurrToStrF(0.1 * TotalPembelian, ffNumber,0); Edit3.Text:=CurrToStrF(1.1 * TotalPembelian, ffNumber,0); end; 5. Tambahkan komponen berikut : Komponen Properti Label4 Caption Label5 Caption Edit4 Text Edit5 Text 6. Buatlah proses penghitungannya.
Isi Uang Dibayarkan Uang Kembali {kosong} {kosong}
V. Tugas Rumah (dikumpulkan saat praktikum berikutnya) Buatlah artikel tentang tipe-tipe data pada Delphi.
