Cara Membuat Aplikasi Perulangan Pada Delphi
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
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.
2. Masukan code pada komponen Button :
- Dengan Caption Do While dengan coding seperti :
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.
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
- For Down To :
Input pada edit 1 Input pada edit 2 Output
0 Response to "Cara Membuat Aplikasi Perulangan Pada Delphi"
Post a Comment