Aplikasi lain dengan Pengulangan (Delphi)

Masih dalam ulang mengulang berulang pengulangan,aplikasi kali ini juga diberikan listing yang berupa pengulangan,ya untuk lebih memahami saja dalam perdelphian rekan2 :D
sederhana sih cuma ngegedein label pake combobox,,
bentuknya kaya gini



oke dah kita mulai saja,buka delphi rekan semua,,,bentuklah formnya ya kaya gini saja dah,, tambahkan satu buah combobox (ada di palllete standard)

nah sekarang kita mulai dengan listingnya,,,
1. klik from1 lalu di object inspectornya beri event pada form show dan beri listing seperti ini
ups lupa
tambahkan variabel dgn nama "a,ulang" dengan tipe data integer di bawah
var form1:TForm1;
a,ukuran:integer;

maksudnya saat form tampil,pada combobox1 akan tampil angka dari 8 sampai 30 :$
2. Untuk merubah ukuran label1,pilih event pada combobox1 dengan event change
lalu beri liting kaya gini

maksudnya pada saat kita pilih2 angka di combobox1 maka otomatis ukuran label dalam form akan berubah
3. finish dan run in dah,sok tah coba
:

Posted in: Delphi