Преобразовать цветной TBitMap 24Bit в GrayScale 8Bit

САБЖ собственно... Я сделал так: создал второй битмап с 8битным представлением цвета, задал палитру цветов в 256 оттенков серого и потом цвету каждого пикселя поставил в соответствие цвет пикселя первого битмапа. Но это работает страшно долго.. - То ли я криво написал, то ли само-по-себе. Если кто знает более быстрый способ - может подскажете