Tanjung Ringgit Meriam Jepang Lombok Timur MY TRIP & MY ADVENTURE

Berikut Hasil Dokumentasi Kami dalam Perjalanan dan Pertualangan di Tanjung Ringgit yang dimana terdapat peninggalan Jepang yaitu Meriam Jepang.

Tanjung Ringgit terletak di Desa Pemongkong, Kecamatan Jerowaru,Kabupaten Lombok Timur, NTB

Pantai PINK . Bukit Pantai PINK Lombok Timur MY TRIP & MY ADVENTURE

Berikut  adalah Gambaran Perjalanan dan Petualangan Kami di Pantai PINK yang terletak di desa Sekaroh, kecamatan Jerowaru, kabupaten Lombok Timur

Selamat Mencoba iya Guys ...!!!

 

Tanjung Bloam .Desa Sekaroh,Kec.Jerowaru,Kab.Lombok Timur MY TRIP & MY ADVENTURE

Berikut Hasil Dokumentasi Kami dalam Perjalanan dan Pertualangan di Tanjung Bloam yang terletak di Desa Sekaroh, Kecamatan Jerowaru,Kabupaten Lombok Timur, NTB

PROGRAM PERHITUNGAN GAJI PADA DELPHI 7 Menggunakan IF-THEN-ELSE

PROGRAM PERHITUNGAN GAJI PADA DELPHI 7

Kali ini kita akan membuat Program sederhana menggunakan program Delphi 7 dengan Perintah IF-THEN

Yang dimana desaignnya seperti dibawah ini :

Label1 : Nama Pegawai  = edit1

Label2 : Jabatan                                = Combobox1

Label3 : Gaji Pokok          = Edit2

Groupbox : Status

                RadioButton1 : Tetap

                RadioButton2 : Honorer

Label4 : Tunjangan Status  = edit3

Label5 : Total Gaji = edit5

Button1 : Hitung

Button2 : Hapus

Button3 : Keluar

Looping Pada Delphi

Beberapa Contoh Program Sederhana Pada Delphi

 Kali ini kita akan pelajari bersama contoh program sederhana while do repeat until :

 

Perulangan While Do dan Repeat Until

Berikut contoh Perulangan While Do dan Repeat Until : 

A. Contoh design form.



B. Komponen yang dibutuhkan.
1. 3(tiga) komponen label (ada di tab standard component pallete).
2. 3(tiga) komponen edit (ada di tab standard component pallete).
3. 1(satu) komponen memo (ada di tab standard component pallete).
4. 2(dua) komponen Radiobutton (ada di tab standard component pallete)