Леонид, прошу прощения, но у меня - не работает (напомню - речь идёт об http://dev.hiasm.com/xf//getfile/7785).
Предлагаемая схема code_7794.txt использует числовые значения цвета, а значит есть вероятность, что найдётся юзер, у которого clBtnFace=255 (или 65280), и все старания - напрасны. Кроме того, Flat нужен False!