Cara Membuat Aplikasi Perulangan Pada Delphi

delphi, coding, windows, oop, programming, pascal, bahasa pemrograman

Cara Membuat Aplikasi Perulangan Pada Delphi
a. Komponen yang di butuhkan antara lain :
  • Label   : 2 buah
  • Edit     : 2 buah
  • Button : 2 buah
  • Memo  : 1 buah
b. Tata cara membuat antara lain :

1. Buatlah :
  • Komponen “Label” sebanyak 2 buah dengan masing-masing Caption yaitu Nilai Awal dan Banyaknya Perulangan.
  • Komponen “Edit” sebanyak 2 buah tanpa di berikan Caption.
  • Komponen “Button” sebanyak 2 buah dengan Caption berupa Do While dan For Down To.
  • Komponen “Memo” sebanyak 1 buah.
delphi, coding, windows, oop, programming, pascal, bahasa pemrograman

2. Masukan code  pada komponen Button :
  • Dengan Caption Do While dengan coding seperti :
delphi, coding, windows, oop, programming, pascal, bahasa pemrograman

Penjelasan :
  • a dan b dijabarkan sebagai integer.
  • a diubah dari string ke integer pada edit1.
  • b memiliki nilai 1.
  • Pada memo 1 di tambahkan kata Perulangan while do.
  • Terdapat baris kosong pada memo atau longkap 1 baris.
  • b diubah dari string ke integer pada edit2.
  • Di tambahkan kata Perulangan ke - , kemudian b diubah dari integer ke string dan lalu di tambahkan = , serta kemudian a diubah pula dari integer ke string.
  • a memiliki nilai awal bahwa a = a+1 dan akan berlanjut terus di tambah 1 sesuai dengan nilai a nya berapa.
  • b memiliki nilai awal bahwa b = b+1 dan akan berlanjut terus di tambah 1 sesuai dengan nilai a nya berapa.
  •  Dengan Caption For Down To dengan coding seperti :
delphi, coding, windows, oop, programming, pascal, bahasa pemrograman

Penjelasan :
  • a dan b dijabarkan sebagai integer.
  • a diubah dari string ke integer pada edit1.
  • Pada memo 1 di tambahkan kata Perulangan for to do.
  • Terdapat baris kosong pada memo atau longkap 1 baris.
  • b diubah dari string ke integer pada edit2 dan akan berkurang 1
  • Di tambahkan kata Perulangan ke - , kemudian b diubah dari integer ke string dan lalu di tambahkan = , serta kemudian a diubah pula dari integer ke string.
  • a memiliki nilai awal bahwa a = a-1 dan akan berlanjut terus dikurang 1 sesuai dengan nilai a nya berapa.
3. Jalankan aplikasi nya dengan menekan run atau menekan tombol F9 misalkan diinput sebagai berikut :
  • Do While :
                                Input pada edit 1          Input pada edit 2  Output
delphi, coding, windows, oop, programming, pascal, bahasa pemrograman
  • For Down To :
                                Input pada edit 1       Input pada edit 2  Output
delphi, coding, windows, oop, programming, pascal, bahasa pemrograman

Subscribe to receive free email updates:

0 Response to "Cara Membuat Aplikasi Perulangan Pada Delphi"

Post a Comment