Delphi

Dasar - Dasar Delphi  dickycoz64 Mari kita mulai membuka program DELPHI. Ketika pertama kali Anda buka, Anda akan disuguhkan oleh sebuah form kosong tempat kita meletakan unit-unit yang disediakan secara GUI, berbeda dengan PASCAL yang mengandalkan Keyboard, sebaliknya delphi mengandalkan mouse untuk meletakkan unit-unit yang ada. Apa itu unit ?, masih ingatkan yang namanya unit di PASCAL?. Apa sudah lupa.?, uhhh percuma saya kasih keterangan di pengantar PASCAL, buka lagi lah !.

Tampilan Delphi 6 Command Unit Delphi 6

Dibalik Form kosong yang disediakan oleh Delphi, ada sebuah unit tempat mengetikan event-event program. Coba Anda perhatikan perintah-perintah atau tag yang ada pada unit command delphi tersebut. Hmmm... saya rasa Anda sudah familiar dengan tag-tag tersebut. Ada tag dengan perintah unit standar USES dan ada procedure TYPE. Wow mirip sekali yah dengan PASCAL !. Pada Delphi Anda tidak perlu pusing-pusing menuliskan unit yang akan dipakai, dia akan secara otomatis dituliskan, tapi ingat jangan sok tahu merubah tag-tag yang otomatis dituliskan oleh Delphi, bisa-bisa program yang Anda buat tidak akan berfungsi. Saya perlihatkan itu agar Anda tahu kenapa saya mengenalkan Bahasa Pascal terlebih dahulu kepada Anda dalam mempelajari Delphi ini.. Kembali ke Form kosong. Sebagai perkenalan Anda dengan delphi sekarang coba letakkan unit apa saja terserah Anda. Ada ratusan unit yang disediakan oleh Delphi, sebagai latihan meletakkan unit, pakai saja UNIT STANDARD, disitu ada unit Frames , Main Menu , Pop Up Menu , Button , Edit , Label dan seterusnya. Klik dua kali unit yang akan diletakkan, misal Anda akan meletakkan Button , klik dua kali icon button, maka otomatis akan ditaruh pada form kosong. Rapihkan letak dari unit yang Anda taruh di form dengan DRAG AND DROP kemana saja terserah Anda, asal jangan diluar Form, sebab saya jamin Anda tidak akan bisa meletakkan unit diluar form, coba saja sendiri . Setelah Anda letakkan unit-unit yang ada secara sembarangan, cobalah Anda klik RUN atau tekan tombol F9. Tidak akan terjadi apa-apa sekalipun Anda tekan tombol button yang Anda letakkan di form kosong dalam mode RUN berkali-kali, sebelum Anda memberikan event pada unit tersebut....! , Apa itu EVENT ?. Event adalah suatu kejadian atau peristiwa yang memakai hukum sebab akibat, sebagai contoh misalkan saya menjitak kepala Anda.., misalkan..!. Tentunya Anda akan bereaksi dengan menendang saya misalnya atau mungkin Anda akan membalasnya dengan menjitak kepala saya lagi, atau setidaknya Anda akan marah kepada saya. Begitu juga Event dalam Delphi, unit-unit yang Anda letakkan pada form kosong tersebut tidak akan bereaksi sebelum Anda memberikan suatu kejadian yang membuat tombol tersebut bereaksi terhadap unit yang lainnya. Bagaimana caranya membuat EVENT ?, mudah saja sebab Anda sudah mempelajari Bahasa Pascal, hanya sedikit penyesuaian yang perlu Anda lakukan. OK sekarang kita mulai mencoba bagaimana caranya membuat event dalam Delphi, sebelumnya tutup form yang sudah diletakkan unit-unit sampah yang mungkin saja Anda mengikuti saya untuk meletakkan unit-unit tersebut secara tidak karuan. Caranya : Klik File -- Close All kemudian Delphi akan menanyakan kepada Anda Apakah proyek akan disimpan ?, jawab saja tidak. Kemudian klik lagi File -- New -- Pilih Aplication , maka form baru akan dibuatkan lagi oleh Delphi. Setelah form baru dibuatkan oleh Delphi, sekarang Anda lihat window disebelah kiri. Disitu ada yang namanya OBJECT INSPECTOR. Kalau tidak ada klik View - klik object inspector atau tekan tombol F11. Pada OI Properties ( Selanjutnya saya akan menyebut Object Inspector ini dengan istilah OI, ingat baik-baik sebab cape ketiknya.) cari bacaan ClientHeight dan ClientWidth, rubah nilainya menjadi ClientHeight 200 dan ClientWidth 300 , maka ukuran form kosong yang dibuatkan oleh delphi akan berubah ukurannya menjadi 200 X 300 Pixel. Setelah itu cari di OI kata Caption rubah nama nya menjadi Latihan 1. Setelah selesai dengan pengaturan ukuran form, sekarang letakkan Unit Label pada form tersebut, Atur posisinya agar berada diatas tapi jangan terlalu atas. Klik sekali unit label1, pada OI rubah Caption nya dengan : Hallo Delphi Saya datang..! , kemudian rubah ukuran font nya dengan cara mengklik FONT pada OI, setelah itu klik tanda ANCHOR yang berbentuk titik 3 ( ... ) disampingnya, maka akan dikeluarkan window untuk merubah ukuran font. Pilih jenis font nya Arial dengan ukuran 16. Masih di OI untuk label1, sekarang cari di OI kata Name, rubah namanya menjadi Teks1. Kemudian cari lagi di OI kata Visible , rubah menjadi False. Setelah selesai dengan pengaturan Label, sekarang letakkan dua buah Unit Button pada form, atur letaknya secantik mungkin ganti caption untuk button1 menjadi Tampil dan button2 menjadi Sembunyi , setelah itu kita berikan event pada kedua tombol tersebut. Klik dua kali tombol Tampil, maka command event akan dikeluarkan, lalu ketik perintah berikut ini teks1.visible := True; , Kemudian klik tombol Shift+F12 pilih form1, untuk menampilkan form lagi bila terhalangi oleh command event. Setelah form ditampilkan lagi sekarang klik dua kali tombol Sembunyi , pada command event ketik perintah berikut : teks1.visible := False; . Setelah itu tekan tombol Shift+F12 lagi untuk menampilkan form. Perlu diingat, Anda hanya menambahkan perintah diatas saja, sedangkan perintah yang otomatis diberikan oleh delphi tidak perlu dirubah. Lihat cara penulisan event dibawah ini. procedure Tform1.Button1Click(sender : TObject);   >> dibuat oleh delphi. begin   >> dibuat oleh delphi. Ketik disini perintah diatas end;   >> dibuat oleh delphi. Setelah semuanya diberi event, sekarang tekan tombol F9 untuk melihat hasil kerja Anda. Kalau Anda benar, maka tampilannya akan seperti gambar dibawah ini. Jika tombol tampil Anda klik maka teks Hallo Delphi saya datang akan ditampilkan, sebaliknya bila tombol sembunyi Anda klik maka teks tersebut akan hilang lagi. Latihan 1, membuat Event Nah.. itulah pelajaran membuat event pertama untuk Anda, bagaimana mudah bukan..?, sekarang tombol tersebut berfungsi, karena telah diberikan event untuk tombol tersebut. Simpanlah pekerjaan Anda dengan nama unit Latihan1.pas dan nama proyeknya adalah Latpro1.dpr , Ingat nama file Unit dan nama file proyek tidak boleh sama..

Terlalu mudah...!, Apa..!. OK setelah Anda simpan pekerjaan Anda, Klik file -- Close All. Setelah di close sekarang buka file project yang telah Anda buat, klik file -- open project -- pilih latpro1.dpr -- klik ok. Tambahkan unit-unit baru pada latpro1.dpr yang telah Anda buat dengan dua buah button dan satu buah memo, atur letaknya sehingga seperti gambar dibawah ini : Modifikasi latihan 1 Rubah caption untuk button3 jadi Rubah Teks dan button4 dengan Selesai , berikan event pada button Rubah Teks dengan teks1.Caption := memo1.Text; dan button Selesai dengan form1.close; Jalankan lagi latpro1.dpr lihat hasilnya. Sekarang teks yang ada di atas yaitu Hallo Delphi saya datang , bisa Anda rubah dengan memasukan teks pada memo dan mengklik tombol Rubah Teks, sedangkan tombol selesai bila di klik maka program akan keluar. Latihlah kemampuan membuat event yang telah Anda pelajari disini dengan merubah-rubah value yang ada pada OI.