var

  Header, Bits: Pointer;

  HeaderSize: DWORD;

  BitsSize: DWORD;



begin

 GetDIBSizes(Bmp.Handle, HeaderSize, BitsSize);

  Header := AllocMem(HeaderSize);

  Bits := AllocMem(BitsSize);

  try

    GetDIB(bmp.Handle, bmp.Palette, Header^, Bits^);

    StretchDIBits(Canvas.Handle, DestRect.Left, DestRect.Top,

      DestRect.Right, DestRect.Bottom,

      0, 0, Bmp.Width, Bmp.Height, Bits, TBitmapInfo(Header^),

      DIB_RGB_COLORS, SRCCOPY);

  finally

    FreeMem(Header, HeaderSize);

    FreeMem(Bits, BitsSize);

  end;



프린트를 위해 위의 프로시저를 사용해 보려는데 제 컴에서는 빨간 부분이 안먹히네요.

undeclared indentifier: 'DestRect'라고 나와요.



uses에

printers, Graphics, jpeg 요것들 다 썼는데요....

혹시 제가 빠뜨린게 있나 해서요??

몇 시간을 봐도 보이질 않네요. 혹시 지나가던 님의 눈에 보이신다면 ㅜㅜ 좀 알려주세요.