Delphi : Angka Otomatis

Assalamu'alaikum Wr Wb

Selamat malam gan , pada artikel kali ini saya akan membahas tentang baimana membuat nomor secara Otomatis pada komponen stringgrid dengan menggunakan Delphi 7. Untuk selengkapnya monggo disimak disimak gan ulasan berikut

Delphi : Angka Otomatis

Pada artikel ini komponen yang akan digunakan diantaranya : Button , EditText, Stringgrid dan Label.

Untuk membuat nomor atau angka secara Otomatis pada stringgrid agan dapat menggunakan fungsi for to do. Sebelum melakukan looping dengan fungsi tersebut akan lebih baik jika stringgrid disetting secara manual pada bagian fixedCols seperti gambar berikut

Kemudian untuk bagian pengaturan banyak baris dan kolom (RowCount and ColCount) akan disetting dengan menggunakan komponen EditText dan Button

Setelah banyak baris dan kolom pada stringgrid dapat diatur dengan menggunakan tombol button, fungsi for to do dapat dimasukkan kedalam prosedur ketika tombol button ditekan (ButtonClicked) dengan syntax sebagai berikut

Syntax diatas ditujukan untuk stringgrid pada kolom pertama atau kolom ke 0 (karena pada Delphi kolom dan baris pertama adalah nol, nol ) dan dimulai dari baris kedua atau baris ke 1 hingga banyak baris yang dimiliki oleh komponen stringgrid. Sehingga bila proses yang dilakukan benar maka pada bagian kolom pertama baris kedua akan tertulis angka 1 pada baris kedua dan seterusnya secara berurutan.

Sekian gan artikel kali ini bila mengalami kesulitan agan dapat meninggalakan komentar dibawah ini.

Wassalamu'alaikum. Wr. Wb