Попробуйте BitMap.PixelFormat := pf15bit поставить до указания ширины и высоты. Могу ошибаться, но кажется, что так вы сэкономите память при создании изображения.
__________________
Начинающий программист уверен, что в 1 килобайте 1000 байт.
Законченный программист уверен, что в 1 километре 1024 метра.
|