Hello, FPC developers' list.
CreateGrayScalePalette raises an exception. The problem is that palette is created with count = 0 and every color assigment increase color count. I dont know why it is done so but as result you cannot assign palette colors from highier indexes to lower. It is not a big problem but CreateGrayScalePalette doesnot follow this rule and raises an exception.
Attached patch fixes CreateGrayScalePalette.
