Delphi палитра

[ilich7]

Делаю:

bmp := TBitmap.Create;
bmp.LoadFromFile('1.bmp'); // ч/б картинка с белым фоном
bmp..PixelFormat := pf1Bit;
bmp.SaveToFile('2.bmp'); // здесь фон у картинки красный!!!

вроде что-то с палитрой, как её изменить, чтобы у рисунка оставался фон белый ?

[ResourceSpace]

Доброе утро! У TBitmap имеются проблемы с "опусканием" количества цветов меньше pf24bit. А ниже чем pf8Bit вроде вообще не поддерживается. Используйте pf8Bit.

[ilich7]

Здравствуйте ! С pf1Bit всё нормально работает, нужно сделать так:

bmp := TBitmap.Create;
bmp..PixelFormat := pf1Bit;
bmp.LoadFromFile('1.bmp'); // ч/б картинка с белым фоном
bmp.SaveToFile('2.bmp'); // здесь фон у картинки красный!!!

тогда всё нормально )

[Аватар]

  bmp := TBitmap.Create;
  bmp.LoadFromFile('1.bmp'); // ч/б картинка с белым фоном
  bmp.Monochrome:=True;
  bmp.PixelFormat := pf1Bit;
  bmp.SaveToFile('2.bmp'); // здесь фон у картинки красный!!!

[ResourceSpace]

При вызове LoadFromFile() оно меняется на тот который установлен в файле.

P.S. гм... Не пользовался этим, любопытно... Так нет обычных глюков... Буду тоже знать, спасибо.