Di Delphi, tipe TColor menentukan warna suatu objek. Ini digunakan oleh properti warna banyak komponen dan oleh properti lain yang menentukan nilai warna.
Unit Grafik berisi definisi konstanta yang berguna untuk TColor. Misalnya, peta clBlue menjadi biru, peta clRed menjadi merah.
Nilai "CL" Lebih Banyak = Lebih Banyak Warna
Anda dapat menentukan TColor sebagai 4-byte angka heksadesimal alih-alih menggunakan konstanta yang ditentukan dalam unit Grafik. Tiga byte yang rendah mewakili intensitas warna RGB (merah, hijau, biru) untuk biru, hijau dan merah. Perhatikan inversi dari warna hex khas: Untuk TColor, urutannya biru-hijau-merah.
Misalnya, merah dapat didefinisikan sebagai TColor ($ 0000FF).
Ubah RBG menjadi TColor
Jika Anda memiliki nilai untuk intensitas merah, hijau, dan biru (angka dari 0 hingga 255 - tipe "byte"), inilah cara mendapatkan nilai TColor:
var r, g, b: Byte; warna: TColor; mulai r: = StrToInt (ledRed. Teks); g: = StrToInt (ledGreen. Teks); b: = StrToInt (ledBlue. Teks); warna: = RGB (r, g, b); Shape1.Brush. Warna: = warna; akhir; "LedRed", "ledGreen" dan "ledBlue" adalah tiga kontrol edit yang digunakan untuk menentukan intensitas masing-masing komponen warna. Shape1 adalah kontrol TShape Delphi.
Navigator kiat Delphi:
»Cara Mengurai File Terbatas TAB di Delphi
«IsDirectoryEmpty - Delphi berfungsi untuk Menentukan apakah Direktori Kosong (tidak ada file, tidak ada sub-folder)