【解決方法】画像をpicturboxに印刷する


よう皆
スクロール可能なパネルとパネル内のピクチャボックスを持つフォームがあります。
https://s6.uupload.ir/files/a_aekt.jpg[^]

ピクチャボックス内の画像を完全に印刷したい。

しかし、それは正しく動作せず、私たちが見ている画像の一部を印刷してしまいます!
私の問題をうまく説明できたと思います。 私を導いてください。

私が試したこと:

私のコードは次のとおりです。

Private Sub PrintDocument1_PrintPage(sender As Object, e As PrintPageEventArgs) Handles PrintDocument1.PrintPage
      Dim bmp = New Bitmap(PictureBox1.DisplayRectangle.Width, PictureBox1.DisplayRectangle.Height)
      PictureBox1.DrawToBitmap(bmp, PictureBox1.ClientRectangle) ' New Rectangle(0, 0, bmp.Width, bmp.Height))
      e.Graphics.DrawImage(bmp, 0, 0)
      e.Graphics.CompositingQuality = CompositingQuality.HighQuality
      e.Graphics.SmoothingMode = SmoothingMode.HighQuality
      e.Graphics.InterpolationMode = InterpolationMode.HighQualityBicubic
  End Sub

解決策 1

Picturebox を使用してプリンターに描画しないでください。PictureBox の image プロパティを直接使用し、それをプリンターの Graphics コンテキストに描画します。
PictureBox は、そこに含まれる画像とは形状やサイズが大幅に異なる場合があることに注意してください。

コメント

タイトルとURLをコピーしました