싸나이 wrote:

> Bitmap이미지를 출력하려는데요,

> BitMap를 제대로 얻어서 Width와 Height도 이상없이 듬직한데,

> 그냥 찍으면 된다고 해서 그냥 찍었더니.

> 아글쎄 A4에 쥐똥만하게 나오잖아요.

> 어케하는지요. 공식적인 프로젝트 진행중이라서 잘 해야 하거들랑요.

> 도와주세요.

>

> 여기전까진 Printer의 셋팅 값들이 모두 정상이고,

> Printer.BeginDoc;

> printer.Canvas.Draw(

> {요건 용지의 중앙에 나오게 하려고}

> (Printer.PageWidth - Bitmap.Width) div 2,

> (Printer.PageHeight - Bitmap.Height) div 2,

> Bitmap);

> Printer.EndDoc;

>

안녕하세요. 홍세빕니다.

아래 코드처럼 사이즈를 정해주고 출력해보세요.

var

FRec : TRect; // 그림이 나타날 영역

begin

printer.begindoc;

try

SetMapMode(printer.canvas.handle,MM_LOMETRIC);

FRec.Left := 300;

FRec.Top := 300;

FRec.Right := 1000;

FRec.Bottom := 1000;

Printer.Canvas.StretchDraw(FRec, Image1.Picture.Graphic);

Printer.EndDoc;

except

Printer.Abort;

raise;

end;

end;

프린터와 모니터의 해상도는 많은 차이가 있습니다. 일반적으로 프린터의 해상도가 더 높습니다. 그러므로 그림이 그렇게 쥐똥(?) 만하게 나오는 겁니다.



프린터와 모니터의 해상도를 구해서 적절하게 비트맵을 키워줘야 합니다.

예를 들어 프린터가 모니터보다 해상도가 3배 높다면 그림을 3배 키워 인쇄를 하면 되겠죠.



아래에 간단한 예제... Win32 API 의 예제..



The following example shows the code required to print a string of text and a bitmapped image. The string of text, centered at the top of the page, identifies the path and filename for the file that contains the bitmapped image. The bitmapped image, centered vertically and horizontally on the page, is drawn so that the same proportions used to draw the image in the application's window are maintained.



/*

* Initialize the members of a DOCINFO

* structure.

*/



di.cbSize = sizeof(DOCINFO);

di.lpszDocName = "Bitmap Printing Test";

di.lpszOutput = (LPTSTR) NULL;

di.lpszDataType = (LPTSTR) NULL;

di.fwType = 0;



/*

* Begin a print job by calling the StartDoc

* function.



*/



nError = StartDoc(pd.hDC, &di);

if (nError == SP_ERROR) {

errhandler("StartDoc", hwnd);

goto Error;

}



/*

* Inform the driver that the application is

* about to begin sending data.

*/



nError = StartPage(pd.hDC);

if (nError <= 0) {



errhandler("StartPage", hwnd);

goto Error;

}



/*

* Retrieve the number of pixels-per-logical-inch

* in the horizontal and vertical directions

* for the display upon which the bitmap

* was created.

*/



fLogPelsX1 = (float) GetDeviceCaps(pd.hDC, LOGPIXELSX);

fLogPelsY1 = (float) GetDeviceCaps(pd.hDC, LOGPIXELSY);







/*

* Retrieve the number of pixels-per-logical-inch

* in the horizontal and vertical directions

* for the printer upon which the bitmap

* will be printed.

*/



fLogPelsX2 = (float) GetDeviceCaps(pd.hDC,

LOGPIXELSX);

fLogPelsY2 = (float) GetDeviceCaps(pd.hDC,

LOGPIXELSY);





/*

* Determine the scaling factors required to

* print the bitmap and retain its original

* proportions.

*/



if (fLogPelsX1 > fLogPelsX2)

fScaleX = (fLogPelsX1 / fLogPelsX2);

else

fScaleX = (fLogPelsX2 / fLogPelsX1);



if (fLogPelsY1 > fLogPelsY2)

fScaleY = (fLogPelsY1 / fLogPelsY2);



else

fScaleY = (fLogPelsY2 / fLogPelsY1);



/*

* Compute the coordinate of the upper left

* corner of the centered bitmap.

*/



cWidthPels = GetDeviceCaps(pd.hDC, HORZRES);

xLeft = ((cWidthPels / 2) -

((int) (((float) bmih.biWidth)

* fScaleX)) / 2);

cHeightPels = GetDeviceCaps(pd.hDC, VERTRES);



yTop = ((cHeightPels / 2) -

((int) (((float) bmih.biHeight)

* fScaleY)) / 2);



/*

* Create a memory DC that is compatible with

* the printer and select the bitmap (which

* the user requested) into this DC.

*/



hdcMem = CreateCompatibleDC(pd.hDC);



if (!SelectObject(hdcMem, hbm))



errhandler("SelectObject Failed", hwnd);





/*

* Use the StretchBlt function to scale the

* bitmap and maintain its original proportions

* (that is, if the bitmap was square when it

* appeared in the application's client area,

* it should also appear square on the page).

*/





if (!StretchBlt(pd.hDC, xLeft, yTop,



(int) ((float) bmih.biWidth * fScaleX),

(int) ((float) bmih.biHeight * fScaleY),

hdcMem, 0, 0,

bmih.biWidth, bmih.biHeight,

SRCCOPY))

errhandler("StretchBlt Failed", hwnd);





/* Delete the memory DC. */



DeleteDC(hdcMem);



/*

* Retrieve the width of the string that



* specifies the full path and filename for the

* file that contains the bitmap.

*/



GetTextExtentPoint32(pd.hDC, ofn.lpstrFile,

ofn.nFileExtension + 3,

&szMetric);



/*

* Compute the starting point for the

* text-output operation. The string will

* be centered horizontally and positioned



* three-lines down from the top of the page.

*/



xLeft = ((cWidthPels / 2) - (szMetric.cx / 2));

yTop = (szMetric.cy * 3);



/*

* Print the path and filename for the bitmap,

* centered at the top of the page.

*/



TextOut(pd.hDC, xLeft, yTop, ofn.lpstrFile,

ofn.nFileExtension + 3);





/*

* Determine whether the user has pressed

* the Cancel button in the AbortPrintJob

* dialog box; if the button has been pressed,

* call the AbortDoc function. Otherwise, inform

* the spooler that the page is complete.

*/



nError = EndPage(pd.hDC);



if (nError <= 0) {

errhandler("EndPage", hwnd);



goto Error;

}



/* Inform the driver that document has ended. */



nError = EndDoc(pd.hDC);

if (nError <= 0)

errhandler("EndDoc", hwnd);



Error:

/* Enable the application's window. */



EnableWindow(hwnd, TRUE);



/* Remove the AbortPrintJob dialog box. */



DestroyWindow(hdlgCancel);





/* Delete the printer DC. */



DeleteDC(pd.hDC);





싸나이 wrote:

> Bitmap이미지를 출력하려는데요,

> BitMap를 제대로 얻어서 Width와 Height도 이상없이 듬직한데,

> 그냥 찍으면 된다고 해서 그냥 찍었더니.

> 아글쎄 A4에 쥐똥만하게 나오잖아요.

> 어케하는지요. 공식적인 프로젝트 진행중이라서 잘 해야 하거들랑요.

> 도와주세요.

>

> 여기전까진 Printer의 셋팅 값들이 모두 정상이고,

> Printer.BeginDoc;

> printer.Canvas.Draw(

> {요건 용지의 중앙에 나오게 하려고}

> (Printer.PageWidth - Bitmap.Width) div 2,

> (Printer.PageHeight - Bitmap.Height) div 2,

> Bitmap);

> Printer.EndDoc;

>