TPrinter를 이용해서 출력하는데....
처음에는 빈페이지만 나오고 그다음부터는 정상적으로 작동합니다....
왜 이런 현상들이 벌어지는거죠...
아래와같이 코딩하였습니다...
PrintDialog := TPrintDialog.Create(Self);
PrintDialog.Options := [];
if PrintDialog.Execute then begin
Printer.BeginDoc;
M := TImage.Create(Self);
M.Width := FirstLeft*2 + ColWidth*ColCount;
M.Height := FirstTop + RowHeight*RowCount + 5;
DrawToCanvas(M.Canvas);
Printer.Canvas.CopyRect(Printer.Canvas.ClipRect, M.Canvas, M.Canvas.ClipRect);
M.Free;
Printer.EndDoc;
end;