RGB --> 256, переход между палитрами Опции

[compiler]

Добрый день!
Собственно нужна функция на ФП которая получая RGB-параметры возвращала бы номер этого(или максимально близкого к этому цвету) в стандартной палитре. [ RGBToP(const r, g, b:word):word; ]
Желательно БЕЗ использования асм.
Поиск особых результатов не дал(кроме не к чему не ведущей темы 2003-года)

заранее благодарен

[volvo]

где можна посмотреть примеры по использованию?

Обычное использование: сначала создается палитра с помощью CreatePalette(), пример есть в DRKB... Потом - из значений компонент собирается цвет, индекс которого будешь искать, и наконец, находим индекс через GetNearestPaletteIndex(палитра, цвет)...

Ну, конечно, если тебе больше нравится создавать велосипеды самому - нет проблем...