RemapTableSize example for Delphi

   if (((LEADImage1.BitmapBits = 16) And
       (LEADImage1.IsGrayscale <>GRAY_NO)) Or
       (LEADImage1.BitmapBits = 64) Or
       (LEADImage1.BitmapBits = 48)) Then
      LEADImage1.RemapTableSize := 65536
   else
   begin
      if (LEADImage1.BitmapBits = 12) Then
         LEADImage1.RemapTableSize:= 4096
      else
         LEADImage1.RemapTableSize:= 256;
   end;