Latihan 5. Mengenal Tipe Data Di Delphi 7 Tipe data itu istilah tempat untuk menentukan / memberikan nilai suatu variabel sesuai dengan nilai yang diberikan. Istilah lainnya batasan pengenal untuk semua nilai yang diterima oleh program / aplikasi. Contoh Mudahnya jika menambahkan angka atau harga suatu barang dalam aplikasi delphi, jika kita memberikan tipe data string ( kalimat / alphanumerik ) maka hal tersebut akan ditolak karena nilai tidak dapat ditambah karena tidak sesuai dengan tipe data yang harusnya ada. Berikut Macam Macam Tipe Data Di Delphi : 1. Tipe Data Integer merupakan tipe data bilangan bulat yang hanya mengenal bilangan decimal dan tidak dapat mengenal bilangan pecahan. bentuk umumnya sebagai berikut : Var Nilai_1:integer; begin Nilai_1:100000; 2. Tipe Data Real merupakan tipe data bilangan yang mengenal bilangan bulat dan juga bilangan pecahan, jadi kalau urusan pembagian yang jawabannya pecahan digunakan type data Real. Bentuk Umumnya Sebagai Berikut : Var Nilai_2: Real; Begin Nilai_2: 10,5;
1
3. Tipe Data Char merupaan tipe data yang sama dengan String berupa nilai Anumerik, hanya berbeda dari kapasitas ruang dari datanya kalau Tipe Data Char hanya mengenal 1 Karakter saja 4. Tipe Data String Merupakan Tipe data yang isinya berupa Anumerik yang tidak dapat diberikan operator perhitungan karena bukan bersifat numerik value. Berikut Bentuk Umumnya Var Nilai_3: String; Begin Nilai_3: ‘Eko Wardoyo’; Dalam Delphi Default Tipe data yang tampil di form Adalah Berupa String, Jadi kalau mau membuat fungsi operator atau penambahan,pengurangan,kali,bagi kita harus merubah tipe datanya dulu menjadi Tipe data numerik bisa Real / Integer. Untuk Perintah untuk merubah Tipe data Sebagai Berikut : strtofloat : untuk merubah tipe data string ke tipe data Real. strtoint : untuk merubah tipe data string ke tipe data integer. floattostr : untuk merubah tipe data real ke tipe data string. inttostr : untuk merubah tipe data integer ke tipe data string.
2
Berikut Materi Merubah Tipe Data : Buat Tampilan Form Sebagai Berikut
Ubahlah Properties Name nya Sebagai Berikut :
Berikut Alur Logikanya : - Pada saat program berjalan , kita akan memasukkan nilai 1 dan nilai 2 dengan angka / numerik untuk melihat hasil penjumlahannya
3
- Pada Saat Button_tambah diklik maka hasil akan memberikan nilai hasil dari Nilai 1 di tambah Nilai 2. - Pada Saat Button_Bersih diklik maka akan membersihkan nilai 1 dan nilai 2. - Pada Saat Button_Keluar di klik maka akan keluar dari program.
Berikut List Code Programnya : 01 procedure Tfrm_materi7.button_tambahClick(Sender: TObject); 02 begin 03 04
a:=strtoint(edit_nilai1.Text);
05
b:=strtoint(edit_nilai2.Text);
06 07
c:=a+b ;
08 09
edit_hasil.Text:=inttostr(c);
10 11 end;
a,b,c adalah variable penamaan dari nilai yang muncul pada edit box di delphi. karena kita mau membuat penjumlahan, maka kita akan mengubah tipe data dari default string menjadi tipe data integer. Dengan memberikan penamaan sementara dan kode perubahannya strtoint yakni merubah tipe data string menjadi integer. Pada Saat menampilkan c kita merubah kembali tipe data c yang tadinya integer menjadi string karena Tampilan default pada editbox delphi adalah string. 1 var 2 frm_materi7: Tfrm_materi7; 3
a,b,c:integer;
4
jika kita menggunakan penamaan variable maka jangan lupa untuk menambahkan tipe data dari variable di code list delphi Var seperti diatas. Kemudian scroll up unitnya dan cari tulisan seperti diatas var kemudian ditambahkan dengan format variable_1 , Variable2 : tipe data; 1 procedure Tfrm_materi7.button_bersihClick(Sender: TObject); 2 begin 3 4
edit_nilai1.text:='';
5 6
edit_nilai2.text:=''; edit_hasil.Text:='';
7 8 end;
Pada Saat Button Bersih diklik maka akan menghapus seluruh teks pada edit box. 1 procedure Tfrm_materi7.button_keluarClick(Sender: TObject); 2 begin 3 4
close;
5 6 end;
Pada Saat Button Keluar di klik maka akan keluar dari program. Berikut Tampilan Saat Dijalankan :
5
saat klik tambah muncul hasil nilai1 + nilai2
Saat Bersih Di Klik Seluruh Teks Hilang
6