Q&A

  • 마킹정보를 읽기 위해 흑백판단을 해야하는데 어떻게?
Image[x,y]값인지 PixcelData 값인지 $8C1DC7D,......,$8C1DC7D,...... 처럼
값만 증가하는데 어느 값으로 흑백인지 알 수 있나요?

<!--
  bmp : TBitmap;
  Image : array of array of byte;
  PixelData : pByte;
  x,y : integer;
begin
  bmp:= TBitmap.Create;
  bmp.LoadFromFile('c:\Sheet_Image.bmp');

  bmp.PixelFormat :=pf8bit;
  SetLength(Image,bmp.width,bmp.height);

  for y:=0 to bmp.height -1 do
  begin
        PixelData:=bmp.ScanLine[y];
        for x:=0 to ((bmp.width + 7) div 8) - 1 do
        begin
            if bmp.Canvas.Pixels[x,y] = clBlack then  //흑색
            begin
                showmessage('black:' + inttostr(x) + ',' + inttostr(y));

                Image[x,y]:=PixelData^; //8픽셀의 흑백 정보가 있는 1비트짜리 흑백비트맵
                inc(PixelData);
            end;
        end;
  end;
-->
1  COMMENTS
  • Profile
    전명재 2006.12.05 01:47
    $8C1DC7D  이런 값은 RGB 값이 아닌가 싶습니다만,
    흑백이라면 값이 일정하지 않을까 싶은데요, 결국 흑백이라면
    흑색과 흰색만 있을거고, 그레이 스케일이라면 RGB값이 모두 같겠죠