Как я могу получить список визуально отличных цветов?

Question

Мне нужно назначить цвета, чтобы различать разные предметы. Простой случай: заказывайте ряды разного цвета по желанию клиента.

Я не хочу, чтобы пользователь выбирал цвет для каждого клиента, я хочу сделать это во время выполнения.

Если есть один клиент, я буду использовать «красный», если есть два «красных» и «белый», ...

Конечно, я могу создать свою собственную функцию GimmeRandomColour(i: index), которая использует i и функцию RGB для создания хороших случайных цветов (но в этом случае создание хороших цветов может быть сложным). Или я могу сказать, если i равно 0, дайте мне clRed, ... (таким образом, создание многих цветов может быть проблемой).

Как получить «хороший список цветов» с приемлемым уровнем контрастности?

Answer 1

Нет встроенной функции в Delphi. См. Этот вопрос о способах создания приятных цветовых схем.

Алгоритм случайного создания эстетически приятной цветовой палитры

Answer 2

Обычный подход заключается в использовании значений $ 00, $ 33, $ 66, $ 99, $ CC и $ FF (Random(6) * $33) для каждого цветового компонента RGB.

Это приведет к 216 различным цветам, которые можно безопасно использовать.

См. Примеры в Википедии .