Автор Маргарита Леонтьева задал вопрос в разделе Другие языки и технологии
Рандомный цвет в Lazarus и получил лучший ответ
Ответ от Johnsilver[гуру]
цвет в компе - сочетание 3-х основных цветов, красного, зеленого и синего. 1 цвет задается своей яркостью от 0 до 255, т. е. 1 байтом
0 - цвета нет, 255 - максимальная яркость
функция RGB возвращает цвет в типе TColor - общепринятом формате. аргументами ей как раз будут вышеописанные цвета
так цвет RGB(255,0,0) будет ярко красным, а цвет RGB(0,0,255) ярко синим. цвет RGB(255,255,255) - белый, а цвет RGB(0,0,0) -черный
задавая случайным образом цвета можно получать случайные оттенки.
Ответ от East RX[гуру]
var x: Byte;
x := Random(191);
Color := RGB($DC + (x div 6), $14 + x, $3C + x);
Даст случайный цвет от/до:
var x: Byte;
x := Random(191);
Color := RGB($DC + (x div 6), $14 + x, $3C + x);
Даст случайный цвет от/до:
Ответ от 22 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Рандомный цвет в Lazarus