Форум: "Media";
Текущий архив: 2002.11.04;
Скачать: [xml.tar.bz2];
ВнизПомогите с bmp-шкой. ПЛИЗЗЗ!!!!! Найти похожие ветки
← →
ArtUl (2002-06-28 03:55) [0]Как у цветной bmp-шки снести цветовую информацию(сделать черно белой) как это делает PhotoShop(он делает ее ч-б с коэффициентами телевидения, у меня есть эта функция преобразования только по пиксельно менять цвет как-то медленно)
Подскажите пожалуйста как мне решить эту проблему или как быстрее менять цвет.
← →
MBo (2002-06-28 07:19) [1]хочешь сделать bmp c серой шкалой 256 градаций?
← →
ArtUl (2002-06-28 08:22) [2]Типа того.
← →
MBo (2002-06-28 09:24) [3]function MakeGrayBmp(b:TBitmap):TBitmap;
var
ct:array[0..255] of TRGBQuad;
i:integer;
begin
Result := TBitmap.Create;
Result.Width:=b.Width;
Result.Height:=b.Height;
Result.PixelFormat:=pf8bit;
for i:=0 to 255 do begin
ct[i].rgbRed:=i;
ct[i].rgbBlue:=i;
ct[i].rgbGreen:=i;
ct[i].rgbReserved:=0;
end;
SetDIBColorTable(Result.Canvas.Handle,0,$FF,ct);
Result.Canvas.Draw(0,0,b);
end;
← →
Viewer (2002-06-28 11:47) [4]Если надо цветное перевести в ч/б то, в зависимости от гамма-корреции (стандарта):
Y=(299*R+587*G+114*B)/1000; // CCIR 601
Y=(222*R+707*G+71*B)/1000; // ITU
R:=G:=B:=Y
← →
Yurko (2002-07-10 03:17) [5]Делай так:
bmp.Monochrome := true;
Страницы: 1 вся ветка
Форум: "Media";
Текущий архив: 2002.11.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.009 c