WIC 이미지에서 픽셀을 읽는 방법

Question

아래 코드 (이 스레드에서 : How to use Delphi 2010's new WIC capability on Canon files?)는 WIC 이미지를 BitMap으로 엽니 다.

그러나 WIC 픽셀 값의 동적 범위가 큰 경우이 코드는 넓은 동적 범위를 비트 맵 픽셀이 수용 할 수있는 낮은 범위로 확장해야하기 때문에 많은 정보를 잃게됩니다.

procedure TForm116.Button1Click(Sender: TObject); 
var 
    WIC: TWICImage; 
begin 
    WIC := TWICImage.Create; 
    try 
    WIC.LoadFromFile('MyFilename.raw'); 
    Image1.Picture.Graphic.Assign(WIC); 
    finally 
    WIC.Free; 
    end; 
end; 

사람이 나에게 나를 TWICImage에서 직접 픽셀 값을 읽게 것이다 샘플 코드를 표시 할 수 있습니다, 그래서 정보의 손실없이 이미지 데이터를 액세스 할 수 있습니까? 직접 사용할 수없는 경우 RGB 값에서 계산할 수있는 각 픽셀의 강도 (그레이 스케일) 값이 필요합니까? 같은

뭔가 : 당신은 assign()에은 TBitmap에 TWICImage 수있게 한 다음 비트 맵의 ​​픽셀 또는 주사선 속성에 액세스해야

var 
    PixelValue: Integer; // Grayscale 

for Row := 0 to WIC.Width do 
    for Col := 0 to WIC.Height 
    PixelValue := WIC.GetPixelValue(Row, Col); 

Answer 1

는 픽셀 데이터를 얻을 수 있습니다. JPEG를로드 할 때와 매우 비슷합니다. 예를 들어

(안된 의사)

w := TWICImage.Create(); 
w.LoadFromFile(...) 
b := TBitmap.Create; 
b.assign(w); 
ptr := b.ScanLine[...]