WIXLIB

Pemrograman Visual(Borland Delphi 7.0)

Pengenalan Aplikasi Visual Aplikasi adalah adalah suatu subkelasperangkat lunak komputer yangmemanfaatkan kemampuan komputerlangsung untuk melakukan suatu tugas yangdiinginkan pengguna Biasanya dibandingkandengan perangkat lunak sistem yangmengintegrasikan berbagai kemampuankomputer, tapi tidak secara langsungmenerapkan kemampuan tersebut untukmengerjakan suatu tugas yangmenguntungkan pengguna. Contoh utamaperangkat lunak aplikasi adalah pengolahkata, lembar kerja, dan pemutar media.

Visual adalah dapat dilihat Maka Pemrograman(aplikasi) visualadalah pengembangan bahasapemrograman untuk mendesain sebuahaplikasi yang user friendly (dapat dilihatoleh alat visual manusia yaitu mata) daninteraktif dengan end-user

Pendahuluan Borland Delphi7.0 Delphi adalah sebuah bahasapemrograman dan lingkunganpengembangan perangkat lunak. Produkini dikembangkan oleh Borland Dengan menggunakan Free Pascal yangmerupakan proyek opensource, bahasa inidapat pula digunakan untuk membuatprogram yang berjalan di sistem operasiMac OS X dan Windows CE

Keunggulan bahasa pemrograman initerletak pada produktivitas, kualitas,pengembangan perangkat lunak,kecepatan kompilasi, pola desain yangmenarik yang menarik serta diperkuatdengan pemrogramannya yang terstruktur(Madcoms, 2002: 1)

Langkah-Langkah MenjalankanDelphi : Klik tombol STARTPilih All ProgramsPilih Borland Delphi 7Klik Delphi 7

IDE (Integrated DevelopmentEnvironment) Delphi Lingkungan pengembangan terpadu atauIntegrated Development Environment(IDE) adalah bagian dari Delphi yangdigunakan untuk memungkinkanpemrograman secara visual merancangtampilan untuk para user (antarmukapemakai) dan menuliskan listing programatau kode

1. Menu BarBerfungsi untuk memilih tugas-tugas tertentu,seperti memulai, membuka, dan menyimpanproject, mengompilasi project menjadi fileexecutable (EXE), dan lain-lain2. Tool Bar/Speed BarMemiliki fungsi yang sama seperti menu bar,tetapi berfungsi seperti jalan pintas karena lebihpraktis dalam penggunaannya

3. Component PaletteComponent Palette berisi kumpulan ikon yangmelambangkan komponen-komponen yang terdapatpada VCL (Visual Component Library). Pada ComponentPalette, akan ditemukan beberapa page control, sepertiStandard, Additional, Win32, System, Data Access danlain-lain. Ikon tombol pointer terdapat di setiap pagecontrol

4. FormForm Designer merupakan suatu objek yang dapatdipakai sebagai tempat untuk merancang program aplikasi.Form berbentuk sebuah meja kerja yang dapat diisi dengankomponen-komponen yang diambil dari Component Palette

5. Object InspectorObject Inspector digunakan untuk mengubah properti dankarakteristik dari sebuah komponen. Object Inspector terdii daridua tab, yaiti Properties dan Events.Tab Properties digunakan untuk mengubahproperti komponen.Proerti dengan tanda menunjukkanbahwa propeti tersebutmempunyai subproperti.Tab Events, bagian yang dapat diisi dengan kode programtertentu yang berfungsi unuk menangani event-event (kejadiankejadian yang berupa sebuah procedure) yang dapat diresponoleh sebuah komponen

6. Object Tree ViewObject Tree View menampilkan diagram pohon darikomponen-komponen yang bersifat visualmaupunnonvisual yang telah terdapat dalam form, datamodule, atau frame. Object Tree View juga menampilkanhubungan logika antarkomponen7. Code EditorCode Editor merupaka tempat menuliskan kodeprogram atau pernyataan-pernyataan dalam Object Pascal.Code Editor dilengkapi dengan fasilitas highlight yangmemudahkan pemakai menemukan kesalahan.

Title bar yang terletak pada bagian atas jendela code editor menunjukkannama file yang sedang disunting, serta pada bagian informasi yang perluuntuk diperhatikan, yaitu :Nomor baris/kolom yang terletak pada bagian paling kiri. Bagian iniberfungsi untuk menunjukkan posisi kursor di dalam jendela Code Editor.Modified menunjukkan bahwa file yang sedang disunting telah mengalamiperubahan tersebut belum disimpan. Teks ini akan hilang jika telahmenyimpan perubahan.Insert/Overwrite yang terletak pada bagian paling kanan menunjukkanbahwa modus pengetikan teks dalam jendela Code Editor. Insertmenunjukkan bahwa modus penyisipan teks dalam keadaan aktif,sedangkan Overwrite menunjukkan bahwa modus penimpaan teks dalamkeadaan aktif

Langkah Awal PembuatanProject : Pilih menu File – New – Applications sehingga padalembar kerja Delphi akan tampak sebuah form kosong Simpan rancangan proyek program aplikasi yang masihkosong tsb dengan perintah File – Save All sehinggatampil kotak dialog Save Unit1 As seperti yang tampakpd gambar di bawah :

Pilih lokasi penyimpanan, kemudian kotak dialogberikutnya yang akan muncul adalah kotak dialog SaveProject1 As seperti yang tampak pd gambar di bawah : Setelam menyimpan file Unit dan Project ke harddisk, maka Delphiakan membentuk file-file berikut:- project1.dpr, file project yang berisi program utama dr aplikasi- unit1.pas, file unit yg digunakan utk menangani kejadian pdform- unit1.dfm, file yg berisi daftar komponen berikut properti nya

Setelah menyimpan project ini, jalankandengan cara memilih menu Run – Run,klik tombol Runatau dengan tekantombol F9.

Latihan Program Pengenalan Object-Object padaComponent Palette : Label, Edit, Button,RadioButton, Checkbox, ComboBox,Panel, RadioGroup Mengatur Properties untuk Form danmasing-masing object sesuai kebutuhan Perintah Default untuk Hapus masingmasing Object Perintah keluar dari aplikasi

Sintaks Button Hapus

Sintaks Button Keluar

Pemrograman Visual(Borland Delphi 7.0)

Materi Pembahasan1. Fungsi String2. Pernyataan Percabangan If.Then.Else3. Pernyataan Percabangan Case.Of

a.CONCAT (s1,s2, sN)Menggabungkan dua atau lebih string menjadi satu string.- Gunakan Concat untuk menggabungkan jumlah string.Masing-masing parameter bertipe string. Hasil berupapenggabungan dari seluruh parameter string.- Gunakan operator plus ( ) mempunyai kesamaanfungsi dengan Concat yaitu untuk menggabungkan duastring.Operator plus lebih cepat proses operasinya daripada fungsiConcat.Contoh:var S:string;Beginedit1.text : Concat(‘Universitas’,’ Gunadarma’);end;HASIL : “Universitas Gunadarma”

b. COPY (S, Awal, Jumlah)Menghasilkan sebuah substring dari suatu string,dengan kata lain fungsi copy digunakan untukmengambil beberapa karakter dari suatu teks tertentu.- S adalah data bertipe string. Awal dan jumlah bertipeinteger. Copy menunjukkan karakter yang diambildarisuatu teks tertentu. Awal menunjukkan posisiawalpengambilan karakter dan Jumlahmenunjukkan jumlah karakter yang akan diambil.Contoh :var S:string;beginS: ‘UNIVERSITAS’;edit1.text: Copy(S,4,5);end;HASIL : “VERSI”

c. DELETE (S, Awal, Jumlah)Menghapus substring dari suatu string, dengan kata lainfungsi delete digunakan untuk menghapus beberapakarakter dari suatu teks tertentu.- S adalah data bertipe string. Awal dan jumlah bertipeinteger. Delete menghapus karakter dari suatu tekstertentu. Awal menunjukkan posisi awal karakteryang akan dihapus, dan Jumlah menentukanjumlah karakter yang akan dihapus.Contoh :var S:string;beginS: ‘UNIVERSITAS Gunadarma’;Delete(S,1,12); edit1.text: S;end;HASIL : “Gunadarma”

d. INSERT (S1, S2, Awal)Menyisipkan string dalam suatu string yang lain, dengankata lain fungsi insert digunakan untuk menyisipkanbeberapa karakter ke dalam suatu teks tertentu.- S1 dan S2 adalah data bertipe string, dan S1menunjukkan string yang akan disisipkan sedangkanS2 adalah string yang menjadi tujuan operasipenyisipan. Awal menunjukkan posisi awalpenyisipan karakter S1 ke dalam teks S2.Contoh :var S:string;beginS: ‘SISTEM’;Insert(‘ INFORMASI’,S,7); edit1.text: S;end;HASIL : “SISTEM INFORMASI”

e. LENGTH (S)Menghitung jumlah karakter dalam suatu string.- S adalah sebuah string, dan fungsi length akanmenghasilkan nilai bertipe integer.Contoh :var S:string;T:integer;beginS: ‘BORLAND DELPHI’;T: Length(S);edit1.text: inttostr(T);end;HASIL : “14”

f. LOWERCASE (S)Mengubah bentuk penulisan suatu string menjadi hurufkecil.- S adalah sebuah string.Contoh :var S:string;beginS: ‘SISTEM INFORMASI’;edit1.text: Lowercase(S);end;HASIL : “sistem informasi”

g. UPPERCASE (S)Mengubah bentuk penulisan suatu string menjadi hurufbesar/kapital.- S adalah sebuah string.Contoh :var S:string;beginS: ‘SISTEM informasi’;edit1.text: Uppercase(S);end;HASIL : “SISTEM INFORMASI”

PERNYATAAN PERCABANGAN1. Pernyataan Bersyarat If-Then-Else- digunakan untuk menjalankan suatupernyataan atau suatu blok pernyataan,tergantung pada nilai yang diuji.- Bentuk Penulisan :a.b.c.If kondisi Then Pernyataan1 ;If kondisi Then Pernyataan1 Else Pernyataan2 ;If Kondisi Thenbegin pernyataan1 ; . ; pernyataan-n end;

d.e.If kondisi Thenbegin pernyataan1.1 ; . pernyataan-1.n ;endElse Pernyataan2.1 ;If kondisi Thenbegin pernyataan1.1 ; . pernyataan-1.n ;endElsebegin pernyataan2.1 ; . pernyataan-2.n ;end;;;;

Lanjutan Percabangan Bersyarat If-ThenElseCatatan :- kondisi : suatu ekspresi logika atauberupa syarat percabangan .- Perintah If akan menguji ekspresi logika yangada di sebelah kanannya. Jika kondisi bernilaitrue akan dikerjakan penyataan setelah perintahThen. Tetapi jika kondisi bernilai false akandikerjakan pernyataan setelah perintah Else.

Lanjutan Percabangan Bersyarat If-ThenElseContoh-1 :Var bil:integer;hsl:string;BeginIf (bil 60) Thenhsl: ‘LULUS’Elsehsl: ‘GAGAL’;End;

Lanjutan Percabangan Bersyarat If-ThenElseContoh-2 :Var nilai:integer;hsl:string;BeginIf (nilai 50) Thenhsl: ‘E’Else If (nilai 50) And (nilai 65) Thenhsl: ‘D’Else If (nilai 65) And (nilai 75) Thenhsl: ‘C’Else If (nilai 75) And (nilai 85) Thenhsl: ‘B’Else hsl: ‘A’;End;

PERNYATAAN PERCABANGAN2. Pernyataan Bersyarat Case-Of- digunakan untuk menyederhanakanpenggunaan if-then-else yang terlalu panjang.Hanya saja percabangan bersyarat case-of inibiasanya dipakai untuk percabangan denganlebih dari dua pilihan.- Bentuk Penulisan :a.Case kondisi Of daftar-1 : pernyataan-1 ; daftar-2 : pernyataan-2 ; . ; daftar-n : pernyataan-n ;End;

Lanjutan Percabangan Bersyarat Case-Ofb.Case kondisi Of daftar-1 : pernyataan-1 ; daftar-2 : pernyataan-2 ; . ; daftar-n : pernyataan-n ;Else pernyataan-x);End;

Lanjutan Percabangan Bersyarat Case-OfContoh :Var nilai:integer;hsl:string;BeginCase nilai Of0.50 : hsl: ‘E’;51.74 : hsl: ‘D’;75.84 : hsl : ‘C’;85.94 : hsl: ‘B’;Elsehsl: ‘A’;End;

Latihan Program Program Fungsi String

Program Nilai Mahasiswa (menggunakanFungsi If)

Fungsi Pengulangan Pengulangan For-To-Do Pengulangan While-Do Pengulangan Repeat-Until

Pengulangan For-To-Do digunakan untuk melaksanakan pengulangansatu pernyataan atau satu blok programbeberapa kali yang ditentukan oleh nilai awaldan akhirBentuk Penulisan :- [pencacah] merupakan bilangan integera. Bilangan Awal Akhir (PengulanganMenaik)For [pencacah] : [awal] To [akhir] pernyataan-1 ;

Lanjutan Pengulangan For-ToDoAtauFor [pencacah] : [awal] To [akhir]Begin pernyataan-1 ;----------- ; pernyataan-n ;End;

b. Bilangan Awal Akhir (PengulanganMenurun)For [pencacah] : [awal] To [akhir] pernyataan-1 ;AtauFor [pencacah] : [awal] To [akhir]Begin pernyataan-1 ;----------- ; pernyataan-n ;End;

Pengulangan While-Do Digunakan untuk mengulangsatu pernyataan atau suatublok pernyataan atau selama while suatu kondisi (syarat)bernilat True(Benar). Bentuk PenulisanWhile kondisi Do pernyataan-1 ;AtauWhile kondisi DoBegin pernyataan-1 ;---------------- ; pernyataan-n ;End;

Lanjutan Pengulangan WhileDo Prosedur alur pengulangan sebelumnya adalahsbb:1. Program akan menguji nilai kondisi 2. Jika kondisi bernilai false, makapernyataan tidak terlaksanakan dan programmenghentikan pengulangan3. Jika kondisi bernilai true, maka pernyataan akan dilaksanakan satu kali4. Kembali ke prosedur 15. Program menghentikan pengulangan danmenjalankan baris berikutnya