Delphi Guru

Sistem penomoran yang sering dipakai adalah sistem penomoran angka arab. Angka arab terdiri dari sembilan angka yaitu 0,1,2,3,4,5,6,7,8,9. Selain sistem penomoran arab ada sistem penomoran lain yang juga sering dipakai, yaitu sistem romawi. Sistem penomoran romawi menggunakan 7 simbol yang bisa dikombinasikan untuk merepresentasikan angka 1 s.d. 1.000.000. Sismbol-simbol dalam sistem romawi yaitu : I = 1, V = 5, X = 10, L = 50, C = 100, D = 500, M = 1000. Contoh : 1973 (Arab) sama dengan MCMLXXIII (Romawi). Pada artikel berikut ini akan diberikan cara untuk mengkonversi angka romawi kedalam sistem arab. Berikut ini source code nya : function RomanToArabic(const romanNumber : string) : integer ; const romanChars = 'IVXLCDMvxlcdm?!#' ; decades : array [0..8] of integer = (0, 1, 10, 100, 1000,10000, 100000, 1000000, 10000000) ; OneFive : array [boolean] of byte = (1, 5) ; var newValue, oldValue : integer ; cIdx, P : byte ; begin result := 0; ...

Untuk mempercantik tampilan cxGrid, kita bisa melakukan perubahan warna baris-barisnya. Kita bedakan warna antara baris ganjil dan genap. Untuk melakukan ini, ikuti langkah-langkah berikut : 1.        Masukkan komponen cxGrid -           Set alignmentnya menjadi alTOP -           Ganti viewnya yang tadinya DBTable menjadi Table (jika anda akan langsung mengkases data ke database bisa tetap menggunakan DBTable), namakan dengn : cxGridTableGrid1TableView1 -           Tambahkan tiga kolom mis :  Nama Barang, Harga 2.        Masukkan komponen cxStyleRepository -           Klik Kanan > Edit -           Tambahkan dua style dengan klik tombol Add -   ...