Belajar tentang IF Pada Delphi 7

Nah TemenTemen Ayo latihan penggunaan if, gk usah panjang lebar wes Langsung aja mulai prakteknya  biar gak lama deh  Pertam-tama Buka aplikasi borland delphi 7

klik start ====>pilih  all program pilih borland delphi 7.Atau pilih dekstop ====> Pada icon, lalu klik 2 kali/tekan enter pada keyboard, tungu proses kemudian  akan muncul program delphi 7 gambar dibawah ini,

Klik Label(Berfungsi untuk menampilkan Text)>klik pd from Designer

 kemudian akan muncul tampilan disamping biar gak binung ganti nama dengan ( Masukan Nilai )cara ketik nama  baru di Object Inspector >  klik caption rubah deh namanya Label1 menjadi Masukan Nilai

Kemudian Buat label sekali lagi untuk ( Keterangan ) caranya sama  seperti membuat buat Masukkan Nilai

Kemudian klik Edit (Berfungsi untuk menampilkan dan input,output data)  klik pd fromDesigner 

Kemudian akan muncul  biar gak binung untuk membuat prosesnya ganti aja nama dengan cara ketik nama  baru di Object Inspector> name kalau sudah di rubah di object treeview dan from Designer masih ada namanya untuk menghapus atau mengkosongkan  nama di from Designer klik Object Inspector > text hapus deh namanya

Buat Edit sekali lagi untuk Output (untuk mengeluarkan hasil proses) cara sama,  seperti membuat Input.

Kemudian klik  Button(Berfungsi untuk melakukan eksekusi terhadap suatu proses ) klik pada from Designer kemudian akan muncul di bawah ini biar mudah ganti name menjadi Hasil

Kemudian klik 2x pada Bottom1/(Hasil)  kemudian akan keluar tampilan seperti di bawah ini

kemudian  ketikan script pada code Edittor 

var

  nilai:integer;

begin

  nilai := strtoint(Input.text);

  if nilai >70 then Output.Text := 'Lulus'

  else Output.Text := 'Tidak lulus';

Hasil setelah selesai di disen di from Designer 

Kalau ingin menjalankan atau mengetahui script yg kita ketik tadi benar klik run(Berfungsi untuk menjalankan program yang buat)

Gimana mudahkan

Syukur alhamdulillah penulis panjatkan kehadirat Allah SWT, yang senantiasa melimpahkan rahmat, taufik dan hidayah–Nya, sehingga penulis dapat menyelesikan Tugas,  Tugas ini dapat di selesaikan karena adanya bantuan, kerja sama dan sumbangan pemikiran dari berbagai pihak. Oleh kerena itu, penulis mengucapkan banyak terima kasih  yang setulusnya kepada :

1.   Bapak dan Ibu tercinta, atas dukungannya baik moral maupun materi dan segala pengorbanan, kasih sayang serta doa yang tak henti-hentinya yang selalu mengiringi kehidupan Penulis. Tak lupa rasa terima kasih juga kepada Kakak Roni  yang telah memberikan dorongan dan semangat dalam

2.  Rekan – rekan satu jurusan yang telah banyak membantu dan memberikan saran yang tidak tenilai harganya kepada penulis terutama Anggit, Kholik, Rima, Gama, Rian, Ardi, Firas, Fara, Bhaqi, Udin, Hendra, Aziz, Aris  .

3.  Kepada pihak-pihak yang belum Penulis sebutkan di atas, bukan berarti Penulis melupakan dan mengabaikan anda semua, Penulis mengucapkan terima kasih yang tak terhingga.

Harapan penulis semoga artikel  ini menjadi sumbangan positif terhadap pengembangan di dalam dunia teknologi informasi dan komunikasi khususnya dalam pendidikan teknik komputer.

Semoga segala bimbingan dan bantuan yang di berikan kepada penulis akan mendapatkan balasan yang setimpal dari Allah SWT. Dan akhirnya penulis menyadari bahwa laporan tugas akhir masih jauh dari sempurna, oleh karena itu penulis masih mengharapkan kritik dan saran yang bersifat membangun dari semua pihak guna kesempurnaan