[NumLock]

потому что TMaxLogPalette определена в Windows как:

Код:

  TMaxLogPalette = packed record
    palVersion: Word;
    palNumEntries: Word;
    palPalEntry: array [Byte] of TPaletteEntry;
  end;

т.е. макс. 256 цветов. но можно ее переопределить на 65536, к примеру, цветов:

Код:

type
  PMaxLogPalette = ^TMaxLogPalette;
  TMaxLogPalette = packed record
    palVersion: Word;
    palNumEntries: Word;
    palPalEntry: array [Word] of TPaletteEntry;
  end;