掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
画像を拡大して印刷するには? (ID:23590)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
TNkPrinterコンポーネントを持っていないので印刷はノーチェックですが、 下記の方法ではどうでしょうか? procedure TForm1.Button1Click(Sender: TObject); var DstRect: TRect; Dst: TImage; begin Dst := TImage.Create( Self ); Dst.Width := 1900; Dst.Height := 800; DstRect := Rect( 0, 0, Dst.Width, Dst.Height ); Dst.Canvas.StretchDraw( DstRect, Image1.Picture.Bitmap ); NkPrinter.BeginDoc(''); NkPrinter.Canvas.Draw( 1000, 230, Dst.Picture.Bitmap ); NkPrinter.EndDoc; Dst.Free; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.